Kullanıcı

Hoşgeldiniz Ziyaretçi. Lütfen giriş yapın veya kayıt olun.
E-posta adresinize aktivasyon iletisi gelmediyse lütfen buraya tıklayın.
30 Temmuz 2010 09:48:06

Kullanıcı adınızı, şifrenizi ve aktif kalma süresini giriniz

Sohbet Penceresi

Son 5 Notlar:

  aruda
09 Temmuz 2010 15:09:00
merhaba arkadaÅŸlar ilk defa bi soru soracam
son olarak üzerinde çalıştığım bi proğramda sorun var
datadan belirli bi kritere göre arama yapıyor bunlardan çift olanları teke düşürüp gride nasıl yazdıra bilirim
örnek vererek anlatırsam daha sağlam olur sanırsam

datadan k
ynshacker
10 Temmuz 2010 03:07:46
GÃœZEL SÄ°TE SEVDÄ°M ;D
  maydin60
14 Temmuz 2010 14:45:20
aloo nasılsınız...
LoneLy
15 Temmuz 2010 18:16:38
 maske msnden bi konuÅŸalım kanky.
  maydin60
17 Temmuz 2010 15:16:16
ınterbase procedure soruma cevap verecek sevgili bir kul yokmu arkadaşlar ?

Show 50 latest
« önceki sonraki »
Sayfa: [1]   AÅŸağı git

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

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı tdoktoru

  • Üye
  • ***
  • Ä°leti: 42
  • Rep: +0/-0
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ı

Çevrimdışı barutali

  • Global Moderatör
  • *****
  • Ä°leti: 1.316
  • Rep: +38/-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) [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.Kemal ATATÃœRK

Çevrimdışı tdoktoru

  • Üye
  • ***
  • Ä°leti: 42
  • Rep: +0/-0
Ynt: program kendini kopyalasın bir kere çalışsın
« Yanıtla #2 : 02 Temmuz 2009 15:34:31 »
tÅŸk ederim
Kayıtlı
Sayfa: [1]   Yukarı git
« önceki sonraki »