Aktion nach(!) Zeichnen des Formulars & Controls zentrieren

[uligerhardt]

Zitat von c.wuensch:

Das mit dem PostMessage habe ich leider immernoch nicht zu meiner Zufriedenheit hinbekommen. Kann mir da vielleicht jemand auf die Sprünge helfen?

Mal sehen.

Erstmal musst du dir eine Message-Konstante definieren:

Delphi-Quellcode:

const
  UM_STARTMODUSCHANGE = WM_APP + 663;

Der genaue Wert der Konstanten ist egal, er sollte nur im von Microsoft angedachten Bereich (> WM_APP) und innerhalb deiner Anwendung eindeutig sein.

An geeigneter Stelle (bei dir vielleicht im OnShow) postest du deine Message:  PostMessage(Handle, UM_STARTMODUSCHANGE, 0, 0); Schließlich musst du die Message auch wieder auffangen:

Delphi-Quellcode:

  TDeineForm = class(TForm)
strict private
  procedure UMStartModusChange(var Message: TMessage); message UM_STARTMODUSCHANGE;
end;

Delphi-Quellcode:

procedure TDeineForm.UMStartModusChange(var Message: TMessage);
begin
  // was auch immer
end;

Das war's auch schon. Jetzt ist nur noch die Frage, ob der Teil mit "was auch immer" für deine Bedürfnisse zum richtigen Zeitpunkt kommt.

HTH, Uli.