سورس کدی جهت پنهان کردن EXE در TaskManager

[دنیای دلفی]

من يك تغييري كوچكي در يكي از Dll ها دادم باعث شد كه حتي Process Finerها نتواند ليست پروسس ها را نيز بدست آورند .

براي اعمال اين كار به روش زير عمل كنيد :
به جاي اين خط

if lstrcmpiw(Info^.ProcessName.Buffer,'Project1.exe') = 0 then

اين رو بگذاريد :

توي Var اين فانكشن هم اينو حتما بنويسيد :

Dest: PWideChar;

 DestSize: Integer;

    if lstrcmpiw(Info^.ProcessName.Buffer, StringToWideChar(ExtractFileName(Application.ExeNa  me),Dest,DestSize)) = 0 then

و در قسمت Uses ها هم

uses

  Windows,sysutils,Forms,

  NativeAPI;

به اين صورت باشد .

حالا حال كامل ببريد