Forum: Lazarus (IDE)
by Moombas,
22. Okt 2021
Danke für die Tipps.
Ggf. bin ich mal wieder zu verbohrt in meiner Denkweise^^
Es geht nur darum ein gestartetes Programm zu überwachen und Aktionen auszuführen wenn es beendet wurde.
Aber das überwachende Programm soll natürlich in der Zeit weiter bedienbar sein.
Daher wollte ich das per Timer + Prüfen ob PID noch existiert im Hintergrund machen.
Ich dachte über die PID wäre das am...
Forum: Lazarus (IDE)
by Moombas,
21. Okt 2021
Sieht vielversprechend aus, schaue ich mir an. Danke schon mal.
Lazarus kennt TlHelp32 nicht, evtl. auch weil ich Lazarus 64bit nutze. Gibts dafür eine Alternative?
ich denke das sollte jwatlhelp32 sein. Teste ich mal.
Forum: Lazarus (IDE)
by Moombas,
21. Okt 2021
Hi,
ich möchte bei mir etwas umstellen und daher prüfen ob ein Prozess, der aktuell wie folgt gestartet wird,...:
CreateProcessWithLogonW(PWideChar(User), nil, PWideChar(PW), 0, nil, PWideChar(ws), CREATE_DEFAULT_ERROR_MODE, nil, PWideChar(param), @si, @pif) then
sleep(500);
if PIf.dwProcessId > 0 then
begin
AppPID := PIf.dwProcessId;
CloseHandle(PIf.hProcess);