Save dialog iptal olduğunda hata yakalama

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
eyalin
Üye
Mesajlar: 126
Kayıt: 09 May 2005 08:08

Save dialog iptal olduğunda hata yakalama

Mesaj gönderen eyalin »

Arkadaşlar merhaba herkese kolay gelsin.Yapmak istediğim şu.
bir tablomu excele atarken save dialog kullanıyorum.excele kaydetmede sorun yok.Fakat kullanıcı excele ver dedikten sonra save dialoga iptal derse;

Kod: Tümünü seç

The file could not be accessed.Try one the following
diye bir uyarı çıkıyor.devamında işte klasörün varolduğundan,read-only olmadığından emin olun diye devam ediyor.Acaba şöyle bir şey olabilirmi baktım ama bulamadım.

Kod: Tümünü seç

if sdmusteri.cancel then begin
showmessagebox('Kayıt export iptal edildi falan filan');
exit;
gibi birşey nasıl yapabilirim.save dialog event larında pek buna benzer birşey bulamadım ya da varolanları nasıl bunun için kullanırım yardımcı olan tüm arkadaşlara teşekkürler.
eyalin
Üye
Mesajlar: 126
Kayıt: 09 May 2005 08:08

Mesaj gönderen eyalin »

Arkadaşlar yukadaki sorun çözüldü gibi(en azından hata uyarısı gelmiyor)
ama sanki bi mantıksızlık var gibi.Kodum şu;

Kod: Tümünü seç

sdmusteri.Filter:='Excel dosyaları|*.xls|Tüm dosyalar|*.*';
sdmusteri.DefaultExt:='xls';
sdmusteri.Execute;//save dialog çalıştır
if sdmusteri.Execute= false then begin//eğer iptal edilirse Hatayı bu satırla çözdüm
ShowMessage('İşlem iptal edildi');
exit;
end;
if sdmusteri.Execute then
begin //export işlemi başlıyor
Burda da şöyle bir sıkıntı var.export buttonuna tıklandığında save dialog penceresi açılıyor dosya adını yazıp kaydet dediğinizde save dialog penceresi çok hızlı bi şekilde ekrandan kaybolup geri geliyor.Tekrar kaydet diyorsunuz (hatta 3 defa kaydet'e bastım)öyle kaydoluyor.Yardımlar için teşekkürler.
oyle
Üye
Mesajlar: 137
Kayıt: 17 Eki 2006 05:53

Mesaj gönderen oyle »

Kod: Tümünü seç

if sdmusteri.Execute then 
begin //export işlemi başlıyor
Bu satirda dialog kutusunu tekrardan aciyorsun.

if sdmusteri.Execute then
begin
dialogla yapmak istediklerin.....
end;
iptal basilmissa hic birsey yapmaz.
Cevapla