onCreateD Funktion?

[toms]

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
{$j+}
const
  StartUp: Boolean = True;
{$j-}
begin
 if StartUp then
 begin
   StartUp:= False;
   // Hier dein Code ausführen...
 end;
end;