Edit-Feld kriegt den Focus nicht

[mm1256]

Hallo,

ich mache das gerne im "OnPaint", welches immer zuletzt aufgerufen wird. Dazu dann eine Hilfsvariable, und alles ich chic

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    procedure FormPaint(Sender: TObject);
  private
    { Private-Deklarationen }
    FFirstPaint: boolean;
  public
    { Public-Deklarationen }
  end;

procedure TForm1.FormPaint(Sender: TObject);
begin
  if FFirstPaint then begin
    FFirstPaint := false;
    . . . Halleluja
  end;
end;

[Der schöne Günther]

Mein Weltbild wäre ja so einfach gewesen dass ich auf dem Popup-Formular einfach ActiveControl auf das Edit-Feld setze. Aber das kümmert ihn nicht.

Testweise habe ich in der DPR-Datei mal das MainFormOnTaskbar auskommentiert, und dann funktioniert es auch. Verstanden habe ich das alles aber auch nicht

In der VCL fehlt wirklich ein OnFullyInitializedAndReady -Event.