Gönderen Konu: Uyarı Penceresi  (Okunma sayısı 2250 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Mikdad

  • Kıdemli Üye
  • *****
  • Rep: +2/-2
  • Çevrimdışı Çevrimdışı
  • Cinsiyet: Bay
  • İleti: 150
    • http://www.mikdad.net
Uyarı Penceresi
« : 10 Kasım 2005 10:02:21 »

// buton click veya herhangi bir olay

Kod: (delphi) [Seç]
A:=application.messagebox('Haberi silmek istediğinizden eminmisiniz?','DİKKAT',mb_YesNo+mb_DefButton1+mb_iconexclamation);
        if A=6 then table1.Delete;
        if A=7 then showmessage('Haberi silmediniz');
Sil Butonuna basildiginda "Haberi silmek istediÄŸinizden eminmisiniz?" sorusu cikar Evet siler hayir iptal eder.
« Son Düzenleme: 19 Haziran 2009 02:06:25 Gönderen: Kocaturk »
Kayıtlı
Hiç KiMSe VaZGeÇiLMeZ DeĞiLDiR
WwW.Minikhost.Net    Host Dünyasında Yeni Bir Soluk
WwW.Mikdad.Net        İslami İçerikli Portalınız
WwW.Pckahvesi.com   Netteki Yeni Adresiniz

sessizgece

  • Yeni Üye
  • *
  • Rep: +0/-0
  • Çevrimdışı Çevrimdışı
  • İleti: 5
Ynt: Uyarı Penceresi
« Yanıtla #1 : 12 Nisan 2006 08:41:03 »

verdiğin kod için teşekür ederim bide şunu anlatsaydınj ben butona giridm hata verdi  msn den yardımcı olurmusun   gokhankoc90@hotmail.com
Kayıtlı

barutali

  • Global Moderatör
  • *****
  • Rep: +34/-0
  • Çevrimdışı Çevrimdışı
  • Cinsiyet: Bay
  • İleti: 1.152
  • Arkandan Bir Sigara Daha Yaktım ...
    • HerÅŸeyi bilen ÅŸey
Ynt: Uyarı Penceresi
« Yanıtla #2 : 03 Temmuz 2009 04:28:59 »

hata verdi çünkü A değişkenini tanımlamadınız.. kodları aşağıdaki gibi düzenlerseniz sorun ortadan kalkacaktır..

Kod: (delphi) [Seç]
var
 a : word;
begin
A:=application.messagebox('Haberi silmek istediğinizden eminmisiniz?','DİKKAT',mb_YesNo+mb_DefButton1+mb_iconexclamation);
     case a of
     IDYES : table1.Delete;
     IDNO  : showmessage('Haberi silmediniz');
     end;
end;

Kayıtlı
En İyi Öğrenme Metodu Yaparak Ve Yaşayaraktır. M.K.Atatürk.