12-04-2011, 01:26 AM
Delphi ile Dosya silme Programı Yapmak
Merheba arkadaşlar,
Bu dersimizde Delphi ile bilgisayarın hafızasında olan bir dosyanın nasıl silindiğini öğreneceğiz.
Öncelikle bir forma bir buton koyun. Butonun Caption kısmına "sil" yazın. Sonra bilgisayarın masaüstünde bir dosya yapın. Mesela, bir yazı dosyası. Dosyanın ismi "deneme" olsun. Şimdi butona iki kez tıklayalım ve şu kodu yazalım:
Şu pencere ekrana çıkacak:
OK butonuna tıkladığınız zaman dosya silinecek. Ama dikkatle olmak gerek. Çünki adresi yanlış yazdığınızda, adres başka bir dosyayı göstere bilir ve önemli bir dosya silinebilir.
Kolay gelsin
Not: Dersin kaynak dosyası Delphi 2010 versiyonuna göredir.
Merheba arkadaşlar,
Bu dersimizde Delphi ile bilgisayarın hafızasında olan bir dosyanın nasıl silindiğini öğreneceğiz.
Öncelikle bir forma bir buton koyun. Butonun Caption kısmına "sil" yazın. Sonra bilgisayarın masaüstünde bir dosya yapın. Mesela, bir yazı dosyası. Dosyanın ismi "deneme" olsun. Şimdi butona iki kez tıklayalım ve şu kodu yazalım:
Code:
if DeleteFile('C:UsersUSERDesktopdeneme.txt') then
Application.MessageBox('Dosyayı gerçekten silmek istiyormusunuz?','Soru', MB_OKCANCEL or MB_ICONQUESTION);
Şu pencere ekrana çıkacak:
OK butonuna tıkladığınız zaman dosya silinecek. Ama dikkatle olmak gerek. Çünki adresi yanlış yazdığınızda, adres başka bir dosyayı göstere bilir ve önemli bir dosya silinebilir.
Kolay gelsin
Not: Dersin kaynak dosyası Delphi 2010 versiyonuna göredir.
·٠•●♥ Ƹ̵̡Ӝ̵̨̄Ʒ ♥●•٠·˙˜”*°•. || Türk Team - SaNcArHaN71 || .•°*”˜˙·٠•●♥ Ƹ̵̡Ӝ̵̨̄Ʒ ♥●•٠·˙