Показать сообщение отдельно

  #4  
Старый 15.10.2006, 14:42
ProTeuS
HARDstasy
Регистрация: 26.11.2004
Сообщений: 1,367
Провел на форуме:
4226592

Репутация: 2175


Отправить сообщение для ProTeuS с помощью ICQ
По умолчанию

и еще, функция для обнаружения активного SoftIce:

PHP код:
function IsSoftIce95Loadedboolean;
Var 
hFileThandle;
Begin
result 
:= false;
hFile := CreateFileA('\\.\SICE'GENERIC_READ or GENERIC_WRITE,
FILE_SHARE_READ or FILE_SHARE_WRITEnilOPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL0);
if( 
hFile <> INVALID_HANDLE_VALUE then begin
CloseHandle
(hFile);
result := TRUE;
end;
End
PHP код:
function IsSoftIceNTLoadedboolean;
Var 
hFileThandle;
Begin
result 
:= false;
hFile := CreateFileA('\\.\NTICE'GENERIC_READ or GENERIC_WRITE,
FILE_SHARE_READ or FILE_SHARE_WRITEnilOPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL0);
if( 
hFile <> INVALID_HANDLE_VALUE then begin
CloseHandle
(hFile);
result := TRUE;
end;
End