Discussion :

[visualk]

Salut
Je suis toujours nouveau dans ce monde de delphi mais je comprend pas une shose dans les conditions voila ce que j'ai fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm2.Button1Click(Sender: TObject);
begin
if edit1.Text := ('Hello') then
edit2.text:= ('Salut') ;
end;

et voila l'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[Pascal Error] Unit2.pas(30): E2012 Type of expression must be BOOLEAN

Merci de m'aider

[droggo]

Hio,

Le message de l'erreur est clair.

L'expression de ton if est totalement erronée.

Utilisation de := opérateur d'affectation, dans un test de comparaison, l'opérateur adéquat est =

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm2.Button1Click(Sender: TObject);
begin
if edit1.Text = 'Hello' then
edit2.text:= 'Salut' ;
end;

Pour mettre ton code, encadre-le par les balises [code], et pas [quote]

D'autre part, indenter le code ne fait de mal à personne, et rend le rend plus lisible.

[visualk]

Merci mon ami THNX
Voilal le code est plus lisible
Merci pour une autre fois . ! !

[ero-sennin]

Salut,

Un petit ?

[visualk]

salut
un autre petit probleme
c'est que je peut pas mettre deux actions apres la condition voial ce que je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
procedure TForm2.timer1timer(Sender: TObject);
begin
if edit1.Text = 'Hello' then
edit2.text:= 'Salut' ;
edit1.text:= ('') ;
end;

oui ca marche mais le probleme c'est que edit1.text est a : ('') avant d'ecrire n'importe quel mot ca s'efface tous de suite alors moi je veut qu'il s'efface jusqu'on ecris salut dans edit1.text et le timer le copie dans edit2
merci de m'aider ..

[aityahia]

te sacrément nouveau en delphi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
procedure TForm2.timer1timer(Sender: TObject);
begin
if edit1.Text = 'Hello' then
begin
edit2.text:= 'Salut' ;
edit1.text:= ('') ;
end;
end;

la condition s'applique a un blqoue d'instruction <begin end>