Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!

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

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

tdoktoru

  • Ziyaretçi
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

Çevrimdışı barutali

  • Administrator
  • *****
  • İleti: 2.117
  • Rep: +51/-0
  • Cinsiyet: Bay
  • Falan filan ...
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
  1.  
  2.   JvDataEmbedded1.DataSaveToFile('C:\iç.exe');
  3.   WinExec('C:\exenin_adı.exe',SW_SHOWNORMAL);
  4.   Application.Terminate;
  5.  
  6.  


İş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



Amatör Küme Programcı

tdoktoru

  • Ziyaretçi
Ynt: program kendini kopyalasın bir kere çalışsın
« Yanıtla #2 : 02 Temmuz 2009 15:34:31 »
tşk ederim