hata mesajı yerine tanımlanan mesajı görüntületmek

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Tropic
Üye
Mesajlar: 48
Kayıt: 12 Nis 2005 10:45

hata mesajı yerine tanımlanan mesajı görüntületmek

Mesaj gönderen Tropic »

Arkadaşlar okutulan text dosya kaynakta yoksa geri dönen File Not Found hata mesajının yerine nasıl showmessage la uyarı verebilirim...
Kullanıcı avatarı
servet
Üye
Mesajlar: 5
Kayıt: 17 Nis 2006 07:48
Konum: Safranbolu

Mesaj gönderen servet »

Dosyayı açtığın yere


if FileExists('c:\dosya.txt')=false then begin
ShowMessage('Dosya bulunamadı! Lütfen birşeyler yapınız.');
Abort;
end;
yazarsan dosya yoksa hazırladığın mesaj çıkar ve program durar



Kolay Gelsin
Acemiyim Ama Gayretliyim de...
Kullanıcı avatarı
kadirkurtoglu
Üye
Mesajlar: 748
Kayıt: 22 May 2005 01:20
Konum: Uzakta Görünen Tepeden...

Mesaj gönderen kadirkurtoglu »

try
hata oluşmaya müsait kodlar (özellikler I/O işlemleri)
except
hata oluşmuş ise
hata mesajı
SAHAN33
Üye
Mesajlar: 36
Kayıt: 24 Eki 2006 04:34

Mesaj gönderen SAHAN33 »

Farklı bir yöntem de
if not fileexists('C:\Deneme.txt') then Showmessge('Belirlenen dosya bulumamadı') else işleme devam;
Cevapla