TEdit: Eingabe an nächstes Editfeld weitergeben

[Mike_on_Tour]

[quote="uligerhardt"]

Zitat von Mike_on_Tour:

Vielleicht WM_NEXTDLGCTL?

OK, das mache ich ja schon. Zum besseren Verständnis hier mal etwas Code:

Delphi-Quellcode:

iLaenge := Length (Trim (TEdit(Sender).Text));
// Länge der vorhandenen Eingabe (!) auf Maximum prüfen
if (iLaenge > (TEdit(Sender).MaxLength - 1))
  then begin
    // hier nächstes Editfeld ermitteln und Wert aus 'Key' übergeben
    // z.B. so
    //tNextEdit.SelStart := Length (tNextEdit.Text);
    //tNextEdit.Text := tNextEdit.Text + Key;
  end
  else begin
    // Länge der vorhandenen Eingabe entspricht Maximum minus 1,
    // deshalb nächstes Feld auswählen
    // der Wert von Key wird noch ins Editfeld eingetragen  
    if (iLaenge = (TEdit(Sender).MaxLength - 1))
      then begin
        Perform (WM_NEXTDLGCTL, 0, 0);
      end;
  end;

Mir fehlt also der Ansatz, wie ich das nächste Feld ermitteln kann (für tNextEdit).