bon soir
ya t'il une fonction en delphi ressemble à la fonction selectcase de vb.
car je veut que l'element de choix soit un string,
mais le message d'erreur "ordinal type required"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 procedure TForm1.Button2Click(Sender: TObject); var m :string; begin m:=edit1.Text; begin case m of 'janvier': showmessage('janvier'); 'fevrier': showmessage('fevrier'); end; end;
Partager