OnCloseQuery ile netice alamıyorum!...

[sertkayasalih]

Herkese Merhaba,

Projemde kullanacağım dosyayı klasörden yüklerken CopyFile ile ismini değiştirerek aynı klasör içine yedeğini alıyorum.

Bu işlem sırasında yedeğini aldığım dosyayı globalde var altında yedek : PCHAR şeklinde tanımladım.

Programı kapatırken AnaFormda OnCloseQuery eventına
....
DeleteFile(yedek);
....

şeklinde kullandım.


- Yapmak istediğim program kapanırken klasör içinde yedek aldığım dosyayı silmek.

Ama bir türlü bunu yapamadım

İlk defa karşılaştığımdan başka çözüm yolunu bulamadım.

- Çözüm için yardımcı olanlara şimdiden teşekkür ederim

[freeman35]

yedek : PCHAR yerine yedek : string; kullan

Kod: Tümünü seç

if fileexist then DeleteFile(yedek)
else showmessage('Yedek dosyası bulunamadı');

break point koyup değişkenlerin içeriklerine bak. Yedek "tam yolu + dosyaadı.uzantısı" olmak zorunda.

kolay gele

[sertkayasalih]

Merhaba freeman35,

- Yanıtınız için çok teşekkür ederim
Sorun çözüldü.