Einzelnen Beitrag anzeigen

dominikkv

Registriert seit: 30. Sep 2006
Ort: Gundelfingen
1.109 Beiträge
 
Delphi 2007 Professional
 
#9

Re: aus der zwischenablage holen und editfenster wechseln?

  Alt 12. Okt 2007, 20:41
Zitat von PaddyMu:
Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
     Laenge:=3;
     Laenge:=length(Edit1.Text);
     Edit2.SetFocus;
end;
da.. ist bestimmt ein saublöder fehler drin^^
na klar xD

1.) ist laenge eine globale Variable?
Regel: so lokal wie möglich deklarieren

2.) diese prozedure wird immer ausgeführt wenn ein sich der inhalt des edits ändert. also bei jedem tastendruck den man macht.
und zwar wird laenge zuerst 3 zugewiesen, dann gleich dannach die länge vom edit.string -> warum zuesrt 3? bringt überhaupt nÜx
und dann wird das fokus verändert...
du willst ja nur verändern wenn die länge größergleich 3 ist.
also ganz einfach:
Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
  if length(Edit1.Text) >= 3 then
    Edit2.SetFocus;
end;
Dominik
Wer anderen eine Grube gräbt, hat ein Gruben-Grab-Gerät!
  Mit Zitat antworten Zitat