Projemi editliyorlar ve timer'i durduruyorlar.

[Shou]

Merhaba kolay gelsin ben http://stackoverflow.com/questions/1839 ... ot-working Bu adresdeki dll'de timeri kullanıyorum bir kaç uyanık arkadaş projemi editleyip timer'i durdurabiliyor ve projemin kaynak kodlarını görebiliyorlar bunun için nasıl önlem alabilirim yardımlarınızı bekliyorum?

[AliZairov]

Selam. Bu konu bakınız. http://delphiturkiye.com/forum/viewtopi ... =2&t=34137

[Shou]

Selam. Bu konu bakınız. http://delphiturkiye.com/forum/viewtopi ... =2&t=34137

Hocam o konuya zaten baktım oradakı programlar dll için kullanınca dll bozuluyor ve birdaha hiç çalışmıyor o yüzden bilgili biri yardımcı olursa sevinirim.

[AliZairov]

Merhaba. Dll zarar veremez. Yalnızca 1 den fazla sıkıştırınca olur o dediğin. Senin yazılımda dll rolü ne?

[Shou]

Timer ile hile programlarını kontrol ettiriyorum fakat adamlar timer'i durduruyor.

[AliZairov]

Anladım. Siz sıkıştırma olayı tekrar deneyim derim.

İndirip denermisiniz tekrar.
https://mega.co.nz/#!Qo4REAgb!Mt8omtq69 ... 2FDxEAdK58

İçerisinde Run isimli dosyanı editleyiniz.

Kod: Tümünü seç

Start upx.exe ornek.dll

[Shou]

Hocam onu denedım gene timer duruyor şaşırdım kaldım

[mrmarman]

Arkadaşlar eğer bir loader ile engellemevyapılıyorsa, exe üzerinden yürürseniz işinize yaramaz, çünkü adı üzerinde executable file compress yapılıyor. Çalışması için hafızafa önce açılır ve eski haline getirilir.

Timer'i durdurduğunu sadece işlem yapmıyor olduğundan mı bu sonuca varıyorsunuz? Bir button koyup timer'in içindeki prosedure benzerini çalıştıran bir kod yazıp deneyin. O zaman bir fikir oluşur.

[Shou]

Hocam bir button'dan kastın nedir zaten dll kullanıyorum misal 1 sn de bir kontrol edior timer adamlar timer'i durduruyor.

[mrmarman]

DLL kullanıyorsun, dll içinde neler dönüyor bilmiyor musunuz ? Sizin yazdığınız projenin kaynak kodunu görüyor olduklarını iddia edince, sizin Timer'i durduruyorlar anlıyorum.

Bu arada sizin process'i ProcessExplorer ile gözlemleyin. Birisi bunu bulup ilgili threadi sadece suspend ediyor (dondurma işlemi) da olabilir.

Projenizin içeriği ve kodlama sistemini bilmediğimden bu kadarını yazabilirim. Ötesi size kalmış.

[Shou]

Hocam ufak bir form yapmış adam bunu açınca direk timer duruyor bizzat kendim denedim

[mrmarman]

Verdiğiniz linke baktım, oradan yola çıkarak test için şunu yapın.

- DLL'nin adını değiştirin.
- içindeki TMyTimer isimli sınıfın adını TBaskaTimer olarak degisitirin
- MessageBox içindeki mesajları farklı bir mesaj ile değiştirin.

Tekrar derleyip bilgisarınıza load edin.

Sonra bu formu yeniden çalıştırın. Bu defa durduramazsa, sizin DLL'in içinden bu saydığım kısımlardan bir veya bir kaçına bakara process'inizi tespit ediyorlar diyebilirim.

[sabanakman]

Bir de, form üzerinde sahte bir Timer bırakın ama asıl kullanmak istediğiniz işlevi çalışma zamanında (run-time) oluşturup kullanmayı deneyin.

Kod: Tümünü seç

type
  TForm1 = class(TForm)
    Timer1: TTimer; //yanıltıcı Timer
    procedure Timer1Timer(Sender: TObject);//yanıltıcı Timer'ın metodu
  private
    { Private declarations }
    AsilTimer: TTimer;
    procedure AsilTimerKodu(Sender: TObject);
  public
    { Public declarations }
    constructor Create(AOwner:TComponent);override;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
//
end;

procedure TForm1.AsilTimerKodu(Sender: TObject);
begin
//
end;

constructor TForm1.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  AsilTimer:=TTimer.Create(Self);
  AsilTimer.Interval:=1000;
  AsilTimer.Enabled:=True;
  AsilTimer.OnTimer:=AsilTimerKodu;
end;

Bu arada Timer nesnesi çok yoğun işlev anında çalışmayı aksatabiliyor. Eğer bu açılan program, sizin programınızı mesaj bombardımanına tutarak yavaşlamasına sebep oluyorsa bu timer işlevini ayrı bir kanal (thread) içerisinden çalıştırmayı deneyin.

[freeman35]

bir öneride benden timer ıdenetleyen bir timer daha kullanın. Lazarusta var delphi de varmı bilmiyorum, onstoptimer event i varsa, bu event e kod yazıp tekrar başlattırın, bu sayede bir timerı kapatsa diğerini başlatır gibi.
kolay gele

[mrmarman]

bir öneride benden timer ıdenetleyen bir timer daha kullanın. Lazarusta var delphi de varmı bilmiyorum, onstoptimer event i varsa, bu event e kod yazıp tekrar başlattırın, bu sayede bir timerı kapatsa diğerini başlatır gibi.
kolay gele

Zekice.. şahsen beğendim bunu. Bu event buradaki timer'da (en azından public olarak) yok ama olsaydı tetiklenir miydi bilemiyorum.