Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Delphi Shellexecute (https://www.delphipraxis.net/158363-shellexecute.html)

Capa 14. Feb 2011 18:30


Shellexecute
 
Hi,
Wie kann ich Eine Datei starten und die hauptdatei schliessen OHNE das die
hauptdatei noch inuse ist. Habs mit Shellexecute versucht aber da tut er die
hauptdatei noch benutzen, den ich kann die datei nicht löschen.

Das ganze ist ein updateprogramm wo die project1.exe eine update.exe aufruft
die project2.exe die geladen wurde und im temp ordner liegt soll dann die
project1.exe ersetzen allerdings ist die project1.exe noch in benutzung
da ich ja die update.exe noch offen hab. erst wenn ich die update.exe beende
und sie nochmal manuell aufrufe funktioniert das mit dem ersetzen.

Kann mir da vielleicht einer weiterhelfen ?

Mfg Capa

DeddyH 14. Feb 2011 18:43

AW: Shellexecute
 
Wenn die alte Version die Update.exe aufruft, kann sie sich doch anschließend beenden. Die Update.exe wartet dann darauf, dass das Programm geschlossen wurde und ersetzt es dann durch die neue Version.

Capa 14. Feb 2011 18:51

AW: Shellexecute
 
das hab ich ja versucht aber ein einfaches close oder terminate scheint nicht zu helfen
die project1.exe ist immernoch inuse und kann von der update.exe nicht überschrieben werden.
Delphi-Quellcode:
          try
            ShellExecute(0, nil, PChar(ExtractFilePath(paramstr(0))+'temp\update.exe'), nil, nil, SW_Normal);
          except
            ShowMessage('Update fehlgeschlagen!'+#10+#13+'Konnte Update-Datei nicht finden!');
          end;
          Application.Terminate;
so rufe ich immo die datei auf und beende das programm

WM_CLOSE 14. Feb 2011 19:55

AW: Shellexecute
 
Hast du es mal außerhalb des Debuggers probiert? Oder hast du evtl keine Schreibrechte(Vista/7)?

Ansonsten könnte es sein, dass ShellExecute das startende Programm als ParentProcess verwendet.
Wenn dem so ist könnte man evtl mit Hier im Forum suchenCreateProcess der Sache näher kommen.
Prüfen sollte man das mit dem Bei Google suchenProcessExplorer können.

Benutzt du zufällig den Bei Google suchenUnlocker? Der zeigt namlich das mit dem Handle verknüpfte Programm an.

Neumann 14. Feb 2011 21:49

AW: Shellexecute
 
Hallo,
solche Sachen kann man mit AutoIt-Scripten gut lösen. Sachen wie Dateien ersetzen,umbenennen, Archive entpacken usw sind mit ein paar Zeilen Code hinzubekommen, wenn nötig auch mit graphischer Benutzeroberfläche.

Habe mir schon einige für mich sehr praktische Tools gebastelt; z.B. ein Fernwartungsprogramm auf VNC Basis (nur neue Oberfläche mit unserem Firmenlogo) Automatisierung für Ressourcen-Compiler, Sicherung von Firebird Datenbanken sowie Rebuild für Firebird-Datenbanken (macht eine Datensicherung, dann Shutdown der Datenbank, nennt die alte Datenbankdatei um und baut die Datenbank aus der Sicherung wieder auf).

Gruß

Ralf

himitsu 14. Feb 2011 22:11

AW: Shellexecute
 
ShellExecute wird im Falle eines Fehler mit der eventuellen Zieldatei garantiert keine Exception werfen.
Try-Except ist alles komplett fehl am Platz.
> Stattdessen gibt diese Funktion den "Erfolgsbericht" als Result zurück, welches man also auswerten sollte.


Ja, auch ShellExecute könnte eine Exception werfen, aber wenn, dann lag es an einem fehlerhaften Aufruf, wie z.B. einem ungültigen Pointer/String ... also wenn es da doch mal knallt, dann lag es an einem Bediehnungsfehler/Programmierfehler und keiner zu erwartenden Ausnahmebehandlung.
> Try-Except bleibt also falsch und es würde in soeinem Fall die eigentliche Fehlerursache sträflichst verfälschen.

Capa 15. Feb 2011 16:38

AW: Shellexecute
 
also habs nun mit CreateProcess versucht
im Process Explorer wird die project1.exe unter explorer.exe aufgeführt indem
moment wo er die update.exe startet ist sie erst unter der project1.exe und dann ca 1-2sec
später steht sie ganz alleine da also ohne parent, in dem moment verschwindet auch die project1.exe
ausm PE. Trotzdem tut er es nicht updaten bzw die project1.exe nicht löschen.
Und ja ich teste es ohne Debugger.

Warum tut try except das verfälschen wenn es nur darum geht das die update.exe ihre arbeit nicht machen kann ?


EDIT: mom seh gerade wenn ich auf einstellungen schaue da steht unter Parent die project1.exe doch drin

WIng2005 15. Feb 2011 17:08

AW: Shellexecute
 
Hallo Capa,

ich hatte mal einen ähnlichen Fall so gelöst:

Eine Starter-Datei prüft, ob Updates vorliegen. Ist dass der Fall, wir die eigentliche Anwendung ausgetauscht und dann erst gestartet.
Der Start meines Programmes erfolgte also stets über eine 2. Datei.

Capa 15. Feb 2011 17:14

AW: Shellexecute
 
mhh die idee ansich ist nicht schlecht aber ich hab halt in meinem programm das updatefenster
schon eingebaut ^^ bzw soll es halt auch so funktionieren das nach nem update gesucht werden
kann wenn das programm schon läuft.

EDIT: Mir ist da gerade was aufgefallen!
wenn ich die project1.exe starte und dann den updateprocess ausführe spinnt die update.exe rum
weil halt nen parent gesetzt ist.
starte ich aber die update.exe macht der das update und startet dann wieder das programm,
wenn ich dann wieder update mache klappt alles genau so wie es soll.
und solange ich das fenster nicht schliesse klappt das alles und ich kann das so oft durchlaufen
lassen wie ich will.

Warum also nicht wenn ich die project1.exe als erstes starte, liegt das vielleicht daran
das die update.exe ne consolenapplication ist?

WM_CLOSE 15. Feb 2011 17:35

AW: Shellexecute
 
Hast du dir auch die vielen Parameter angeschaut, die man CreateProcess mitgeben kann?
Ich glaube man konnte da auch einen neuen Prozess erstellen, der dann nicht unter dem tartendem Prozess läuft.
Schau dir mal die structs (=^records) an, die bei MSDN-Library durchsuchenCreateProcess mitgegeben werden.


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:40 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz