Problem z registerserviceprocess

0

Funkcja podana poniżej nie działa w WinXP i aplikacja się nie uruchamia.
Jak zrobić,aby przy odwołaniu się do 'kernel32.dll' eksportu 'RegisterServiceProcess' WinXP nie wywlił błędu ,że kernel32.dll nie ma takiego eksportu i nie zamknął aplikacji tylko ją <ort>kontynłował </ort>nie zwracjając uwagi na funkcję?

function registerserviceprocess(pid, blah:longint):boolean; stdcall;
external 'kernel32.dll' name 'RegisterServiceProcess';

0

Sprawdź jaki jest zainstalowany system i zależnie od tego wykonuj program...

0

Ale przed sprawdzeniem wywoła się inicjacja połączenia z danym exportem i nastąpi błąd.

0

Nie rozumiem, w czym problem?

krnl := LoadLibrary('kernel32.dll');
proc := GetProcAddress(krnl, 'registerserviceprocess');

if proc = 0 then Error else OK;

1 użytkowników online, w tym zalogowanych: 0, gości: 1