Registriert seit: 30. Aug 2009
4 Beiträge
|
Re: Datei öffnen mit
14. Okt 2009, 13:46
Delphi-Quellcode:
procedure TForm1.Button16Click(Sender: TObject);
begin
//s.h.a.r.k's Lösung
ShellExecute(Application.Handle,'open',PChar('Autohotkey.exe -'+warkeysp+'\autowarkey\My_AutoWarkey_Script.ahk'),nil,PChar(warkeysp+'\Autowarkey\autohotkey'),sw_ShowNormal);
//DeddyH's Lösung
ShellExecute(Application.Handle,'open',PChar('My_AutoWarkey_Script.ahk'),PChar(warkeysp+'\Autowarkey\autohotkey\autohotkey.exe'),PChar(warkeysp+'\Autowarkey'),sw_ShowNormal);
end;
warkeysp ist eine Variable in der der Pfad steht also die Pfade stimmen mit ziemlicher Sicherheit
|
|
Zitat
|