Depack Programlardan Kurtulmanın 1-2 Yolu (Delphi)
-
Programları aspack tarzı programlarla şifreledikten sonra depack edip tekrardan içeriği
değiştirilebiliyor. Bu gibi programlardan kurtulmak için kendi çapımda 2 yöntem geliştirdim.Yöntem 1…
Aspack ile şifrelenmiş uygulamayı depack eden programlar uygulamayı bi yere kadar çalıştırıp OEP adresi alıyorlar.Programın form create eventine ;
if paramstr(1)='' then
halt;uygulama açılırken parametre ile açılmıyorsa uygulama kendini kapatıyor.Bu depack programlarıylada çok uğraştım ama
parametreyle birlikte açtıramadım.O yüzden Offset alamıyo program ve Depack Yapamıyor.
Örnek Uygulama : http://rapidshare.com/files/256390352/parametre.rar.html
Yöntem 2…
delphi decompiler tarzı programlar için ama sadece kaydettiğimiz program classlarını kapatır.
delpi decompilerin class name si: “TDeDeMainForm” dir (tırnaklar yok)
Program açıldığı anda classnameden programı kapattırarak programın tamamen arabelleğe alınmasını engelliyoruz.bunu titledende yapabilirdik ama titleler değiştirilebiliyor.
Classnameden killeme kodu (ordan buradan buldum)
procedure killprogram(classname : string; windowtitle:string);
const
PROCESS_TERMINATE = $0001;
var
processhandle:Thandle;
processid:integer;
thewindow:HWND;
begin
thewindow:=FindWindow(pchar(classname),nil);
GetWindowThreadProcessId(thewindow,@processid);
processhandle:=OpenProcess(process_terminate,FALSE,processid);
TerminateProcess(processhandle,4);
end;
kullanım şekli
killprogram('TDeDeMainForm','TDeDeMainForm'); formun createsine ekleyinböylece delphidecompiler decomp edemeden kapanıyor bunu diğer programlardada kullanabilirsiniz.
örnek uygulama: http://rapidshare.com/files/256391009/classname.rar.html
class nameleri bulma programı;
örnek uygulama: http://rapidshare.com/files/256391615/classname_goesterici.rar.htmluygulamaların içinde kodlarda vardır… Dosyaları Taratmayı unutmayın...
-
dosdum linkleri yenileyebilirmisin?