Gönderen Konu: program kendini kopyalasın bir kere çalışsın  (Okunma sayısı 375 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

tdoktoru

  • Üye
  • ***
  • Rep: +0/-0
  • Çevrimdışı Çevrimdışı
  • Ä°leti: 37
program kendini kopyalasın bir kere çalışsın
« : 02 Temmuz 2009 10:49:02 »
s.a arkadaslar çalıştırılan .exe dosyamın açıldıktan sonra kendisini c:\klasörüne atmasını istiyorum daha sonra kendisini kapatıp c:\attıgı exe dosyasını çalıştırmasını istiyorum bir örnekle açıklayabilirmisiniz
Kayıtlı

barutali

  • Global Moderatör
  • *****
  • Rep: +34/-0
  • Çevrimdışı Çevrimdışı
  • Cinsiyet: Bay
  • Ä°leti: 1.152
  • Arkandan Bir Sigara Daha Yaktım ...
    • HerÅŸeyi bilen ÅŸey
Ynt: program kendini kopyalasın bir kere çalışsın
« Yanıtla #1 : 02 Temmuz 2009 12:40:03 »
1 )ilk olarak delphi nde JVCL yoksa JVCL i kur ...

2 )Sana anlatıcağım işlemleri yapmadan önce projenin exe sinin bi kopyasını al lazım olcak...

Kopyasını aldıktan sonra ...

3 )Formuna 1 adet JvDataEmbedded1 bileÅŸemi koy..

4 )Üstünde Sağ tıkla ve LoadFromFile dan kopyasını aldığımız exe yi seç...

5 )formun OnCreate (oluşturulunca) olayına aşağıdaki kodu ekle ...

Kod :

Kod: (delphi) [Seç]

  JvDataEmbedded1.DataSaveToFile('C:\iç.exe');
  WinExec('C:\exenin_adı.exe',SW_SHOWNORMAL);
  Application.Terminate;



İşlem bitti artık C:\ ye dosyayı atıp çalıştırdıktan sonra kendisini kapatıcaktır ...

Neden bu kodlar olmadanki bir yedeğini aldık ? Çünkü sürekli kapatıp açarken aynı kodu işler kısır döngüye döner hata verir...

Kolay gelsin ...

Örnek Proje :

http://rapidshare.com/files/251004973/Yeni_Klasoer.rar.html
Kayıtlı
En İyi Öğrenme Metodu Yaparak Ve Yaşayaraktır. M.K.Atatürk.

tdoktoru

  • Üye
  • ***
  • Rep: +0/-0
  • Çevrimdışı Çevrimdışı
  • Ä°leti: 37
Ynt: program kendini kopyalasın bir kere çalışsın
« Yanıtla #2 : 02 Temmuz 2009 15:34:31 »
tÅŸk ederim
Kayıtlı