Para mayor claridad, este es el código de TCustomForm.AfterConstruction:
Código Delphi
[-]
procedure TCustomForm.AfterConstruction;
begin
if not OldCreateOrder then DoCreate;
if fsActivated in FFormState then
begin
Activate;
Exclude(FFormState, fsActivated);
end;
end;
mientras que DoCreate es así:
Código Delphi
[-]
procedure TCustomForm.DoCreate;
begin
if Assigned(FOnCreate) then
try
FOnCreate(Self);
except
if not HandleCreateException then
raise;
end;
if fsVisible in FFormState then Visible := True;
end;
Ahí es donde se llama a OnCcreate, a menos, que OldCreateOrder sea
true.
// Saludos