Autor |
Beitrag |
Jaegermeister1992
Hält's aus hier
Beiträge: 10
|
Verfasst: So 22.11.09 22:39
Ich habe ein Programm geschireben nun soll bei klick auf Button1 die Datei Setup.exe ausgeführt werden
ich habe dafür durch suchen diesen Code gefunden:
Delphi-Quelltext 1: 2: 3:
| begin ShellExecute(Handle, 'open','Dateien/UNO-Spiel.exe', nil, nil, SW_SHOW); end |
so dies funktioniert nicht da er die Datei einfach nicht startet.
Dann habe ich statt der Setup Datei einfach mal den Windows Taschenrechner als Pfad angegeben udn schwup gehts
Könnt ihr mir bitte helfen das dies Funktioniert danke habe echt lange gesucht aber nichts gefunden was funktioniert...
mfg Jo Moderiert von Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Di 24.11.2009 um 12:59
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: So 22.11.09 22:54
Shellexecute hat auch einen Rückgabewert, den man nur mal so ganz nebenbei auswerten könnte, dann weiß man eventuell woran es liegt. 
|
|
Xentar
      
Beiträge: 2077
Erhaltene Danke: 2
Win XP
Delphi 5 Ent., Delphi 2007 Prof
|
Verfasst: So 22.11.09 23:24
Gib den kompletten Dateipfad an.
_________________ PROGRAMMER: A device for converting coffee into software.
|
|
jaenicke
      
Beiträge: 19326
Erhaltene Danke: 1749
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Mo 23.11.09 02:05
Erstens das und zweitens wird es mit open wegen der benötigten Adminrechte nicht gehen. Heißt: kompletten Pfad angeben und statt open das Verb runas, dann klappt es.
|
|
Jaegermeister1992 
Hält's aus hier
Beiträge: 10
|
Verfasst: Di 24.11.09 13:32
Setup startet leider immer noch nichts:(
-Komplettetn Pfad und runas
|
|
Xentar
      
Beiträge: 2077
Erhaltene Danke: 2
Win XP
Delphi 5 Ent., Delphi 2007 Prof
|
Verfasst: Di 24.11.09 13:37
Und den Rückgabewert hast du dir bestimmt auch schon angesehen?
_________________ PROGRAMMER: A device for converting coffee into software.
|
|
JDF
      
Beiträge: 29
WinNT, Win2k, WinXP, Win2003
d6ent, d7pro, bds2006ent, vs2003
|
Verfasst: Di 24.11.09 14:07
Hallo!
wenn die Setup.exe zu einer InstallShield-Installation gehört, dann ist die Setup.exe allein nicht lauffähig.
(meiner Erfahrung nach)
Bei mir hat folgendes funktioniert:
Delphi-Quelltext 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21:
| program Jacke;
uses Windows;
var PInfo1, PInfo2: TProcessInformation; StartupInfo: TStartupInfo;
begin if CreateProcess('_isdel.exe', nil, nil, nil, FALSE, CREATE_DEFAULT_ERROR_MODE or NORMAL_PRIORITY_CLASS, nil, nil, StartupInfo, PInfo1) then begin if CreateProcess('Setup.exe', nil, nil, nil, FALSE, CREATE_DEFAULT_ERROR_MODE or NORMAL_PRIORITY_CLASS, nil, nil, StartupInfo, PInfo2) then begin WaitForSingleObject(PInfo1.hProcess, INFINITE); end; end; end. |
Gruß
Jürgen
Moderiert von Narses: Delphi-Tags hinzugefügt
|
|
|