Guten Morgen,
das Ereignis OnChange() wird beim TabbedNoteBook vor dem eigentlichen Seitenwechsel ausgelöst, deshalb kann der Focus nicht sofort auf das neue Control gesetzt werden:
Delphi-Quellcode:
procedure TDemoForm.TabbedNotebookChange(Sender: TObject; NewTab: Integer;
var AllowChange: Boolean);
begin
case NewTab of
0: PostMessage(Edit1.Handle, WM_SETFOCUS, 0, 0);
1: PostMessage(Edit2.Handle, WM_SETFOCUS, 0, 0);
end;
end;
Der moderne Nachfolger von TTabbedNoteBook ist TPageControl.
Grüße vom marabu