D12 VCL Eingabefokus nach Menü-Hotkeys

[himitsu]

OnCreate
Nein.

Nur die MainForm ist mit Visible=True ... sonst werden Forms seit längerem mit Visible=False erstellt, sind beim Create also garnicht sichtbar und SetFocus heult, weil nichtfocusierbare Edits nicht fokusierbar sind.

[jaenicke]

Du kannst einfach das Tracking des Menüs mit WM_CANCELMODE beenden:

Delphi-Quellcode:

procedure TMainForm.Form1Click(Sender: TObject);
begin
  //Application.CreateForm(Unit1.TForm1, Application);
  Unit1.Form1 := TForm1.Create(Application);
  Unit1.Form1.Show;
  PostMessage(Handle, WM_CANCELMODE, 0,  0);
end;

Nichts anderes passiert, wenn du z.B. auf das Formular klickst.