10-15-2011، 09:57 PM
سورس یه انتی املاتور برای دلفی
کد:
(************
Author : ChainCoder
Chaincoder@Yahoo.com
************)
Function AntiEmulators:Boolean;
Var
UpTime :DWORD;
UpTimeAfterSleep :Dword;
Begin
UpTime := GetTickCount;
Sleep(500);
UpTimeAfterSleep := GetTickCount;
if ( UpTimeAfterSleep - UpTime ) < 500 Then
Result:= True Else Result:= False;
end;