Envento OnCreate para todos los Forms

[dec]

Hola,

Tal vez como dice el compañero puedas preparar un formulario del que heredarán los que sean menester. Puedes hacerlo "visualmente", creando el formulario y añadiéndolo al inspector de objetos de Delphi. En todo caso la cosa sería más o menos así, en mi opinión:

Código Delphi [-]

type
  TFormEx = class(TForm)
  public
    constructor Create(AOwner: TComponent); override; 
  end;

{ TFormEx }

constructor TFormEx.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  
  {...}
end;

Y a partir de ahí a heredar de "TFormEx", es decir:

Código Delphi [-]

type
  TForm1 = class(TFormEx)
  end;

Para que cuando crees una instancia de "TForm1" se ejecute el constructor de "TFormEx", en el que puedes codificar... aquello que necesites.