Einzelnen Beitrag anzeigen

Dave_lernt_Delphi

Registriert seit: 19. Mär 2009
29 Beiträge
 
Delphi 7 Enterprise
 
#1

Mehrere if schleifen hintereinander.

  Alt 22. Mär 2009, 12:37
hey ihr Delphi-Experten,
ich habe hier folgenden Code:
Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
if Length(Edit1.Text) >= 1 then Edit2.SetFocus;
if Length(Edit2.Text) >= 4 then Edit3.SetFocus;
if Length(Edit3.Text) >= 4 then Edit4.SetFocus;
if Length(Edit4.Text) >= 4 then bt1.SetFocus;
end;

end.
Ich habe also 4 Editierfelder: Wenn im ersten Feld eine Zahl steht soll 'die Maus' (kp wie man das nennt) in das zweite springen,
wenn im zweiten Feld vier zahlen stehen soll 'die Maus' ins dritte feld springen... usw. zuletzt das mit dem 4. Feld, danach soll auf den Button (bt1) gesprungen werden... was muss ich dann an dem Code verändern?
Euer Dave
Ich hoffe, dass ihr mir helfen könnt.
Viele Grüße aus dem Kreis Hildesheim
  Mit Zitat antworten Zitat