Edit feld und 2tes Formular

[svern]

Hey, habe das mit dem Setfocus ausprobiert:

form1.edit1.setfocus

//Editfeld ist ja in Formular 1

Aber es geht immer noch nicht.

Delphi-Quellcode:

procedure TForm1.Edit1Exit(Sender: TObject);
begin
  ANZ_KN:=strtoint(Edit1.Text);
  if (ANZ_KN < 2) or (ANZ_KN > 10 ) then
     showmessage('Wert nicht erwartet!')
  else
     begin
     Form2.Show;
     Form2.FormShow(Sender);
     KN_ANZ_W := False;
     end;
  //Form1.show;
  Edit2.Color:=clInactiveCaptionText;
  Edit1.Color:=clWindow;
  //Form1.show;
  Form1.Edit2.setfocus;
end;


procedure TForm1.Edit2Exit(Sender: TObject);
begin
    ANZ_KA_KN[1]:=strtoint(Edit2.text);     // Kanten von Knoten 1
    Edit2.Color:=clWindow;
end;

Edit2Exit (Edit2 in der Tabulatorreihenfolge als nächstes dran) wird nicht beim Verlassen von Edit2 aufgerufen....

Hätte auch gedacht, dass das mit dem Focus klappen könnte... aber leider ist nichts passiert.