Forum: Win32/Win64 API (native code)
by Harry Stahl,
11. Jul 2015
So, der Kunde war noch mal so nett und hat das Programm mit der ergänzten Error-Abfrage ausgeführt. Der Fehler tritt an dieser Stelle auf:
QueryServiceConfig('TimOnizeServer',Info);
Die Meldung lautet:
"FehlerTyp: EAccessViolationInfo: Zugriffsverletzung bei Adresse 00409842 in Modul 'Timoserv.exe'. Schreiben von Adresse 75D549C1"
Forum: Win32/Win64 API (native code)
by Harry Stahl,
11. Jul 2015
Stimmt, das wäre schon mal eine Idee gewesen:oops:.
Forum: Win32/Win64 API (native code)
by Harry Stahl,
11. Jul 2015
Ich habe hier einen Dienst, der als Datenserver läuft. Beim Start des Programms prüft es, ob es auch als Dienst im System eingetragen ist. Dazu verwende ich die folgende Funktion:
function hs_ExistsService: Boolean;
Var
Info : TServiceDescriptor;
Buf : Array of char;
N : String;
Size : DWord;
begin