Program Kendi Kendini Silsin [ Delphi ]

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Program Kendi Kendini Silsin [ Delphi ]
#1
Merhaba arkadaşlar,

Bu konuda sizlere, delphi ile geliştirdğimiz bir uygulamanın kendi kendini nasıl silebileceğinden bahsetmek istiyorum.
Daha önce geliştirdiğim bir projemde böyle bir şeye ihtiyaç duyup kullanmıştım.
Bir programcıysanız akla hayale gelmeyecek şeylere gereksinim duyabiliyorsunuz yada böyle şeyler karşınıza çıkabiliyor.
Lafı fazla uzatmadan kodlama aşamasına geçelim.

Öncelikle gerekli sınıf tanımlamamızı yapıyoruz;
Kod:
uses shellapi;


Formumuzun FormClose olayına;
Kod:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
    halt(0);
end;


Formumuzun FormDestroy olayına;
Kod:
procedure TForm1.FormDestroy(Sender: TObject);
var
UygulamaYolu:string;
begin
UygulamaYolu := Application.ExeName;
UygulamaYolu := ExtractShortPathName(UygulamaYolu);
ShellExecute(Handle, nil, 'cmd.exe',PWideChar(WideString(' /C del ' + UygulamaYolu)), nil, SW_HIDE);
end;

Kodları eksiksiz olarak yazdığınız takdirde program kapatılırken gönderdiği CMD Komutu sayesinde kendini sildirmiş olacaktır.

Çalış ve kendini imha et şeklinde bir uygulama geliştirmek istiyorsanız bu kodlardan yararlanabilirsiniz.
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Delphi ile Skin Administrator 0 2,087 15-12-2015, 20:12
Son Yorum: Administrator
  Delphi ile masaüstü yolunu alma Administrator 0 2,096 21-11-2015, 12:28
Son Yorum: Administrator
  Delphi ile Formu Gövdeden Sürükleme Administrator 0 2,161 20-11-2015, 09:54
Son Yorum: Administrator
  Delphi ile MD5 Kullanımı Administrator 0 2,441 19-11-2015, 19:47
Son Yorum: Administrator
  Program Parametreyle Başlasın [Delphi] Administrator 0 2,013 08-10-2015, 20:16
Son Yorum: Administrator
  Read Buffer & Write Buffer [Delphi] Administrator 0 2,074 02-10-2015, 19:14
Son Yorum: Administrator

Hızlı Menü:


Konuyu Okuyanlar: 1 Ziyaretçi