Thema: FileOpen

Einzelnen Beitrag anzeigen

Benutzerbild von isilive
isilive

Registriert seit: 15. Okt 2008
Ort: Österreich
192 Beiträge
 
Delphi 2009 Professional
 
#18

Re: FileOpen

  Alt 6. Nov 2009, 20:08
Für den Beginn (!) würde ich es so machen:

Delphi-Quellcode:
var befehl:string;
begin
  if edit1.text = 'firefoxthen befehl := 'Pfad zu Firefox';
  if edit1.text = 'delphithen befehl := 'Pfad zu Delphi';

...

  ShellExecute(Handle, nil, PChar(befehl), nil, nil, SW_SHOW);
end;
Beachte dass du für ShellExecute in der 'uses' shellapi hinzufügen musst, sonst findet der Compiler den Befehl nicht.

Wenn dies einmal funktioniert wäre es sicher schöner/einfacher wenn du dann auf eine Combobox umsteigst. Dort kannst du die Einträge dann komfortabel auswählen.
Stefan
Jedoch kann die referenzbasierte Implementierung des Standard-Objektmodells in Kombination mit den komplexen syntaktischen Dereferenzierungsregeln bei einer objektorientierten API wie ein Stolperstein wirken.
  Mit Zitat antworten Zitat