Programm öffnen

[jens106]

sorry leute habe ein wenig zu voreilig gepostet.

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
      if OpenDialog1.Execute then
      ShellExecute(handle,PChar('open'),PChar('silkroad.exe'),PChar(''),PChar(ExtractFilePath(Application.Exename)),SW_SHOW);
end;

so funktioniert das alles aber wie kann ich jetzt in dem objektinspektor eingeben, dass ich nur .exen zulassen will?

ich habe das jetzt so hinbekommen das in dem fenster zwar unten bei Dateitypen *.exe steht aber es werden alle Dateien im Browser angezeigt