Voici ce que je ne sais pas faire :
Merci par avance pour l'aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30 var Form1: TForm1; a,b,c:extended; S:string; implementation {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject); begin a:=strtofloat(Edit1.text); b:=strtofloat(Edit2.text); S:=Edit3.text; { Quel code écrire ici pour calculer c avec la formule S écrite sous forme de texte dans Edit3 et qui fait intervenir les données a et b ? Par exemple on a entré : 2.1 dans Edit1, 1.5 dans Edit2, a*sin(b) dans Edit3 . Le résultat 2.094739471868515 devrait s'afficher dans Edit4} Edit4.text:=floattostr(c); end; end.
Partager