Strings vergleichen?

[Punica]

Dieser Code ist in einem Timer, der vergleicht ob sich der Benutzer ein Befehl geändert hat, alle 60 Sekunden ungefähr ..

[stahli]

Zeig doch einmal mehr von Deinem Code. Sonst können wir schlecht helfen.
Wo werden denn Deine Zeichenketten-Variablen gefüllt?

"Befehl2" sollte vielleicht "BefehlAlt" heißen und müsste global (sorry ) deklariert sein. Sonst verfällt dessen Inhalt nach jedem Timerdurchlauf.

Man kann aber einen Vergleich auch im OnChange-Ereignis einer TEdit einbinden. Dann braucht man dafür keinen Timer einsetzen.

[himitsu]

Timer? Ich dachte sowas macht man via OnChange der Edits.

Delphi-Quellcode:

type
  TMyClass = class(...)
  private
    alterBefehl: String;
  end;

procedure TMyClass.xyz;
var
  befehl: string;
begin
  befehl := 'randomblablablablabla';
  if befehl <> alterBefehl then
  begin
    alterBefehl := befehl;
    //CODE//
  end;
end;

[stahli]

Ich glaube nicht, dass der Fragesteller sich schon mit Klassenentwicklung beschäftigt hat. Daher würde ich eine globale Variable empfehlen.

[himitsu]

Zitat von stahli:

Ich glaube nicht, dass der Fragesteller sich schon mit Klassenentwicklung beschäftigt hat. Daher würde ich eine globale Variable empfehlen.

Bring ihm doch nicht sowas bei ... er ist noch "jung" ... besser er lernt das jetzt richtiger und fängt garnicht erst mit diesen bösen Globalen an.

Wetten er hat seinen kompletten Code eh in der GUI drin (also in Methoden von TForm1), also hat er da eine gute Stelle für diese Variable.