Variables et conditions (2 quest. de newbie :))

Question

Bonjour,

J'ai 2 questions.  La première est comment faire une condition du style suivant en delphi:?
if (($var1 "a") AND ($var2 "b")); [php]

La 2e, j'ai un textbox et une variable, je veux comparer les 2 pour voir si elles sont égalent (une vérification de passwd).  Voici le code entré:

procedure TFrmLOGIN.CmdGOClick(Sender: TObject);
var passwd : string;
begin
passwd:= 'test123';
if passwd = EdPass then
begin
ShowMessage('Le mot de passe est accepté!');
end
else
begin
ShowMessage('Le mot de passe est refusé!');
end;

le problème est que le compilateur (D6, ed. perso)me dit:
[Erreur] accint.pas(36): Types incompatibles: 'String' et 'TEdit'

Comment dois-je m'y prendre?

Merci de votre aide  :)

cs_Homer · Answer

Cette question a été résolut, il reste toutefois la première (comment faire ma condition).

merci :)

a+

cs_Gysmo · Answer

Ta condition en francais ca donne koi?
Je pe pe etre t'aider.

cs_laurentl2000 · Answer

if (($var1 = = "a") AND ($var2 == "b")); 


???
Je dirais plutôt ceci en PHP : 

if ($var1 "a" and $var2 "b") {
...
}


C'est plus clair sans parenthèses inutiles et les { } renferment le code de la condition... 

Voici l'équivalent en Delphi : 

if (var1 'a') and (var2 'b') then
begin
...
end;


Ce n'est pas si loin du PHP quand on regarde mais bon... Personnellement, j'ai commencé la programmation par PHP il y a un peu moins d'un an, et ça fait une semaine que j'ai commencé Delphi... Mais je ne décolle plus de mon PC !  :) 

++, 

Trash

cs_laurentl2000 · Answer

Toutes mes excuses, je n'avais pas remarqué que le post datait de si longtemps... Enfin, cela servira sûrement pour d'autres personnes... 

++, 

Trash,

Variables et conditions (2 quest. de newbie :))

4 réponses

Votre réponse

Discussions similaires