ÇAlışan Programımım Kendi Boyutunu Bulma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

ÇAlışan Programımım Kendi Boyutunu Bulma

Mesaj gönderen vkamadan »

Merhaba arkadaşlar,
Ben kendi aplikasyonum içinden boyut bilgisini almak istiyorum.
Amacım EXE dosyamda bir değişiklik meydana geldiğinde bunu anlayıp kullanıcıyı uyarmak. ( Virus v.s..)
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
TRSoft
Kıdemli Üye
Mesajlar: 636
Kayıt: 13 Şub 2004 11:39
Konum: Konya
İletişim:

Mesaj gönderen TRSoft »

aşağıdaki kod vermesi lazım

Kod: Tümünü seç

Var
  Dosya: TSearchRec;
  Boyut : Integer;
begin
     FindFirst(application.ExeName, faAnyFile, Dosya);
     Boyut:=Dosya.Size; // integer tipinde bayt olarak verir.
End;
denenmemişdir..
İlimle geçen bir gece,
ibadetle geçen bin geceden hayırlıdır.
HZ. MUHAMMED (S.A.)
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

Çok Teşekkür ediyorum.
Vermiş olduğunuz kod ile işimi hallettim.
Çalışmalarınızda başarılar.
Volkan KAMADAN
www.polisoft.com.tr
Cevapla