Ausführen von Dateien

Erklärung
Wir machen es uns leicht. Eigentlich könnten wir es programmieren, aber es gibt eine Unit(FMXUtils) mit der wir einfach nur die Funktion aufrufen müssen. Die Datei C:\Programme\Borland\Delphi5\Doc\Filmanex\FMXUtils.pas in den Ordner C:\Programme\Borland\Delphi5\Lib kopieren -  Fertig... Jetzt können wir diese Unit einbinden.

Quelltext
Wichtig: in die Uses-Klausel FMXUtils aufnehmen
  uses FMXUtils;

procedure TForm1.Button1Click(Sender: TObject);
begin
{
 SW_HIDE : das Programm wird versteckt ausgeführt
SW_MAXIMIZE : das Programm wird maximiert ausgeführt
SW_MINIMIZE : das Programm wird minimiert ausgeführt
}
if OpenDialog1.Execute then executeFile(OpenDialog1.FileName,'','',sw_normal); 
end;