Thema: Delphi Editproblem !!

Einzelnen Beitrag anzeigen

Benutzerbild von fkerber
fkerber
(CodeLib-Manager)

Registriert seit: 9. Jul 2003
Ort: Ensdorf
6.723 Beiträge
 
Delphi XE Professional
 
#5

Re: Editproblem !!

  Alt 19. Jun 2005, 10:53
Hi!

Zitat von malo:
Zitat von jfheins:
Hä?

Folgendes:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.Text = '85then form1.Color:=clblack;
end;
:= ist der Zuweisungsoperator, = der Vergleichsoperator in Delphi. Und Strings müssen mit ' ' gekennzeichnet werden

Ich glaube, für Vergleich von Zahlen, sollte man aber besser zahlen vergleichen:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if strtoint(edit1.Text) = 85 then form1.Color:=clblack;
end;
Das andere geht zwar, aber dieser Weg ist IMHO schöner.

Ciao Frederic
Frederic Kerber
  Mit Zitat antworten Zitat