i have two problems hooking the OpenServiceW
This is the call to HookAPI
Code: Select all
OpenServiceWNext : function (hSCManager: SC_HANDLE; lpServiceName: PWideChar; dwDesiredAccess: DWORD): SC_HANDLE; stdcall;
HookAPI('Advapi32.dll', 'OpenServiceW', @OpenServiceWCallback, @OpenServiceWNext);
Code: Select all
function OpenServiceWCallback(hSCManager: SC_HANDLE; lpServiceName: PWideChar; dwDesiredAccess: DWORD): SC_HANDLE;
begin
result := OpenServiceWNext(hSCManager, lpServiceName, dwDesiredAccess);
MessageBox(0, PChar('Result : '+IntToStr(result)+' .. Error : '+IntToStr(GetLastError)+'<'), 'OpenService', MB_OK);
end;
Code: Select all
tempS := WideToAnsiEx(lpServiceName);
MessageBox(0, PChar('tempS), 'Dsfsdf', MB_OK);
regards
snoopy