Eine Funktion automatisch bei Programmstart starten lassen?

[alcaeus]

Zitat von Ultimator:

Naja, man könnte ja eine Boolesche Variable ins OnShow-Ereignis einbauen, und diese beim ersten ausführen der Prozedur auf true stellen, etwa so:

Delphi-Quellcode:

procedure TDeineForm.FormShow(Sender: TObject);
var Ausgefuehrt: boolean;
begin
  if ausgefuehrt = false then
  begin
    //Deine Anweisungen
    Ausgefuehrt := true;
  end
  else
    ShowMessage('Deine Anweisungen wurden bereits ausgeführt.');
end;

Da liegst du falsch, denn die Variable ist lokal und wird bei jedem Aufruf von OnShow neu "erstellt". Du bräuchtest eine Klassenvariable dafür.

Greetz
alcaeus