Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Wert1 höher oder niedriger als Wert2


FSS - So 04.06.06 21:44
Titel: Wert1 höher oder niedriger als Wert2
Hallo,

ich habe da mal wieder ein Problem, das vermutlich ganz einfach zu lösen ist.
Das Programm soll einen Wert, der in ein Edit eingegeben wird mit einem Wert, welcher in einem Label steht vergleichen.
Ist der Wert im Edit kleiner als der Wert im Label, soll das Programm eine bestimmte Aktion durchführen, und wenn er größer ist eine andere Aktion durchfüheren.
Ich bräuchte also eine If-Anweisung

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
if Edit1.Text (*größer als*) Label1.Caption then
  begin
    ...
end else if Edit1.Text (*kleiner als*) Label1.Caption then
  begin
    ...
  end;


Weiß jemand wie das geht?

FSS

Moderiert von user profile iconraziel: Code- durch Delphi-Tags ersetzt


Stefan-W - So 04.06.06 21:48

du kannst doch die zeichen < oder > nutzen


mkinzler - So 04.06.06 21:49

Also prinzipiell so:

Delphi-Quelltext
1:
if StrToInt(Edit1.Text) > StrToInt(Label1.Caption) then                    

Das Problem ist nur, da0 du sicherstellen mußt das im edit nur sinnvolle Werte eingegeben werden können, also ab besten ein MaskedEdit nehmen.


FSS - So 04.06.06 22:01

Ok, jetzt funktioniert es, danke für eure Hilfe.

FSS