Fehler bei SetFocus() nach Wechseln der ActivePage im PageControl

**TheFrog**

Guten Morgen,

ich habe ein ganz banales Problem:

Wenn ich bei einer PageControl die ActivePage setze und gleich danach den Focus auf ein Control setze, welches auf dem soeben aktivierten TabSheet sitzt, dann erhalte ich die Fehlermeldung: "Deaktiviertes oder unsichtbares Fenster kann den Fokus nicht erhalten"

markieren

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

begin

  PageControl1.ActivePage := TabSheet2;

  Edit2.SetFocus; // Control auf TabSheet2

end;

Mir ist klar, was diese Fehlermeldung bedeutet. Mir ist nicht klar, an welcher Stelle ich den Focus setzen soll/kann.

Ich habe es schon im OnChange()-Ereignis der PageControl versucht, aber dieses wird beim Zuweisen von ActivePage nicht aufgerufen.

Danke für jede Hilfe!

Hans.

Fehler bei SetFocus() nach Wechseln der ActivePage im PageControl

Fehler bei SetFocus() nach Wechseln der ActivePage im PageControl

Forumregeln