Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Prozess sanft beenden (ohne Fenster) (https://www.delphipraxis.net/154139-prozess-sanft-beenden-ohne-fenster.html)

Alien426 29. Aug 2010 17:15

Prozess sanft beenden (ohne Fenster)
 
Bevor ich zum Thema komme, kurz eine Rechtfertigung. Ich weiss, dass es dieses Thema schon in der einen oder anderen Form gibt. Ich denke, dass es trotzdem seine Daseinsberechtigung hat.

Kurze Einführung:
Ich habe den Apache Webserver auf einem USB-Stick. Bisher startete ich ihn per Batch-Skript (start "Apache" http.exe -w) und konnte dann im Konsolen-Fenster einfach [Strg]+[C] drücken und er wurde beendet.

Jetzt schreibe ich ein kleines Programm in Delphi, das am Ende als Icon in der TNA sitzen und per Kontextmenü den Apache starten und beenden soll.

Zur Zeit führe ich Apache mit ShellExecuteEx() aus, was mir den Prozess-Handle liefert. Den kann ich dann in TerminateProcess() benutzen, um zu beenden. Das gefällt mir aber nicht sehr, da
1. der Apache einen Kindprozess startet, der damit nicht beendet wird
2. der Apache nicht sauber beendet wird (Error-Log: "Unclean shutdown of previous Apache run?")

Den ersten Punkt könnte man wohl erledigen, indem man die laufenden Prozesse nach der Exe durchsucht und auch diese abschießt.

Lieber wäre mir aber eine Lösung, die einfacher und zuverlässiger ist und auch den zweiten Punkt erledigt. Zum Beispiel WM_CLOSE zu senden. Aber das geht ja nicht ohne Fenster.

Apache-seitig kann ich nur was ausrichten, wenn er als Dienst installiert ist (httpd.exe -k stop), was ich aber nicht machen möchte, da er ja auf einem Stick laufen und auf dem "Gastsystem" nicht ungezogen sein soll.

himitsu 29. Aug 2010 17:26

AW: Prozess sanft beenden (ohne Fenster)
 
Kann man den Apache nicht auch via Batch beenden?

Du kannst ja mal im WAMP schauen, wie die das machen.

mjustin 29. Aug 2010 18:07

AW: Prozess sanft beenden (ohne Fenster)
 
Auf http://httpd.apache.org/docs/2.2/platform/windows.html ist es dokumentiert:

Zitat:

To run Apache from the command line as a console application, use the following command:

Delphi-Quellcode:
httpd.exe


You can tell a running Apache to stop by opening another console window and entering:

Delphi-Quellcode:
httpd.exe -k shutdown

Viele Grüße,

SirThornberry 29. Aug 2010 19:24

AW: Prozess sanft beenden (ohne Fenster)
 
Für Programme die so etwas nicht unterstützen kann man mit PostThreadMessage die entsprechende Quit-Message in die Messagequeue des Threads absetzen.

Alien426 29. Aug 2010 19:49

AW: Prozess sanft beenden (ohne Fenster)
 
Zitat:

Zitat von himitsu (Beitrag 1045925)
Kann man den Apache nicht auch via Batch beenden?

Du kannst ja mal im WAMP schauen, wie die das machen.

Meinst du XAMPP?

Den Source zur XAMPP Control Panel Application kann man hier runterladen. Ist ein C-Programm. Dort finde ich zwar zwei Kommentare, die wohl für das stoppen zuständig sind ("Kill the first Apache process", "Kill the second Apache process"), aber der ausgeführte Befehl ("apache\\bin\\pv.exe -f -k -q -i [Prozess-ID]") ist seltsam. Weder im XAMPP-Ordner noch beim Standalone-Apache ist diese Anwendung zu finden...

Zitat:

Zitat von mjustin (Beitrag 1045928)

Leider ist hier die Dokumentation irreführend. Der Teil den du weg gelassen hast ist entscheidend.
Zitat:

However, if you do have Apache installed as a service, the shortcut starts the service. If the Apache service is running already, the shortcut doesn't do anything.
Ich dachte auch zuerst, dass es so funktionieren kann. Habe auch von ShellExecute() den Rückgabewert 42 erhalten, aber der Prozess wurde nicht beendet. Wenn man dann in der Konsole den Befehl eingibt erhält man die Meldung "The Apache2.2 service is not started.".

Sir Thornberry, danke für den Tipp. Das werde ich ausprobieren. Tatsächlich hatte ich auf der Seite von SendMessage schon auf den Link zu PostMessage geklickt, aber nicht auf den darauf folgenden... :)

himitsu 29. Aug 2010 20:13

AW: Prozess sanft beenden (ohne Fenster)
 
Ja, Tschuldschung, früher hieß die Windows-Variante mal WAMP (für Linux LAMP). :oops:

Im Root-Verzeichnis von XAMP liegen auch einige Batchdateien.

Zitat:

Zitat von apache_start.bat
@echo off
echo Diese Eingabeforderung nicht waehrend des Running beenden
echo Bitte erst bei einem gewollten Shutdown schliessen
echo Please close this command only for Shutdown
echo Apache 2 is starting ...

apache\bin\httpd.exe

if errorlevel 255 goto finish
if errorlevel 1 goto error
goto finish

:error
echo.
echo Apache konnte nicht gestartet werden
echo Apache could not be started
pause

:finish

Zitat:

Zitat von apache_stop.bat
@echo off
apache\bin\pv -f -k httpd.exe -q
if not exist apache\logs\httpd.pid GOTO exit
del apache\logs\httpd.pid

:exit

starten:
Delphi-Quellcode:
apache\bin\httpd.exe
.
stoppen:
Delphi-Quellcode:
apache\bin\pv -f -k httpd.exe -q
.
vielleicht reicht auch
Delphi-Quellcode:
apache\bin\httpd.exe -q
zum Stoppen

SirThornberry 29. Aug 2010 20:37

AW: Prozess sanft beenden (ohne Fenster)
 
Zitat:

Habe auch von ShellExecute() den Rückgabewert 42 erhalten
Ich hoffe du hast diesen Wert nicht als ProcessID oder dergleichen interpretiert?! Schau mal ins MSDN, da wirst du sehen das es sich nicht wirklich um ein Prozesshandle handelt.

Alien426 29. Aug 2010 20:46

AW: Prozess sanft beenden (ohne Fenster)
 
Zitat:

Zitat von SirThornberry (Beitrag 1045977)
Zitat:

Habe auch von ShellExecute() den Rückgabewert 42 erhalten
Ich hoffe du hast diesen Wert nicht als ProcessID oder dergleichen interpretiert?! Schau mal ins MSDN, da wirst du sehen das es sich nicht wirklich um ein Prozesshandle handelt.

Nein. Ich wollte nur wissen, ob die Ausführung mit dem Parameter "-k shutdown" erfolgreich (>32) war.

EDIT: Kannst du mir auf die Sprünge helfen, wie ich an einen/den Thread des Prozesses ran komme?

Desmulator 30. Aug 2010 06:34

AW: Prozess sanft beenden (ohne Fenster)
 
Wenn ich Apache verwende starte ich ihn ganz einfach über:
Code:
httpd -k start
Da nach ist das Konsolenfenster wieder verfügbar und Apache läuft im Hintergrund.
Zum Beenden benutze ich einfach:
Code:
httpd -k stop
Sonst weiß ich nicht was dein Problem ist. :stupid:

Alien426 30. Aug 2010 11:53

AW: Prozess sanft beenden (ohne Fenster)
 
Zitat:

Zitat von Desmulator (Beitrag 1046003)
Wenn ich Apache verwende starte ich ihn ganz einfach über:
Code:
httpd -k start
Sonst weiß ich nicht was dein Problem ist. :stupid:

Bitte aufmerksam lesen (vor allem wenn man den Stupid-Smiley verwendet).
Apache läuft auf USB-Stick und nicht als Service.

Du könntest übrigens auch einfach mit "net start apache2.2" starten. (Statt apache2.2 kann der Dienst auch mit anderem Namen registriert sein.)


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:57 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