31-10-2013, 12:43 AM
السلام عليكم ورحمه الله
جعل البرنامج يحذف نفسه self delete
هذه احدى الطرق التي تستطيع بها حذف البرنامج تلقائيا
حيث انك ستقوم بانشاء ملف بامتداد Bat
وسرد اكواد الحذف وثم تشغيله
في امان الله
جعل البرنامج يحذف نفسه self delete
هذه احدى الطرق التي تستطيع بها حذف البرنامج تلقائيا
حيث انك ستقوم بانشاء ملف بامتداد Bat
وسرد اكواد الحذف وثم تشغيله
كود :
program Project1;
uses
SysUtils,
Windows,
Classes;
var
StringList: TStringList;
begin
StringList:=TStringList.Create;
StringList.Add('del *Project1.exe');
StringList.SaveToFile('2.bat');
WinExec('2.bat', SW_SHOW);
StringList.Free;
end.في امان الله
لن يفشل ابداا انسان يحاول ثم..... يحاول
![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)