Açılan mesaj penceresinde otomatik onay

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
akuyumcu63
Üye
Mesajlar: 386
Kayıt: 02 Tem 2007 09:43

Açılan mesaj penceresinde otomatik onay

Mesaj gönderen akuyumcu63 »

merhaba;

programda KAYDET butonuna basıldığı zaman kaydetme işleminin tamamlandığını belirtmek için aşağıdaki kod çalıştırılıyor. kod mesaj penceresi açıyor. kullanıcı mesaj penceresinde TAMAM butonuna basmadan işleme devam edemiyor.

Kod: Tümünü seç

gMESAJ:= Application.MessageBox('İşlem Kaydedildi.','Kayıt İşlemi',0);
Kullanıcının onayına gerek kalmadan mesaj penceresi 1 yada 2 saniye görünüp kaybolmasını sağlamak istiyorum. böyle bir işlemi nasıl yapabilirim.

Teşekkür ederim.
İsteyen, yapabildiğinden daha fazlasını yapar.
Kullanıcı avatarı
SimaWB
Üye
Mesajlar: 1316
Kayıt: 07 May 2009 10:42
Konum: İstanbul
İletişim:

Re: Açılan mesaj penceresinde otomatik onay

Mesaj gönderen SimaWB »

Bence en güzeli MessageBox yerine kendi mesaj formunuzu göstermeniz. İçerisinde Timer olan bir mesaj form yapın ve göründüğünde Timer'ı başlatın. Timer sonunda formu kapattırabilirsiniz.
Yine de siz MessageBox kullanacaksanız; GetActiveWindow fonksiyonu ile aktif pencerenin handle'ını alıp bu pencereye PostMessage'la WM_CLOSE mesajı gönderebilirsiniz.
Son seçenek : MessageBoxTimeOut 'u kullanmak. Bakınız...
There's no place like 127.0.0.1
Kullanıcı avatarı
sadettinpolat
Moderator
Mesajlar: 2131
Kayıt: 07 Ara 2003 02:51
Konum: Ankara
İletişim:

Re: Açılan mesaj penceresinde otomatik onay

Mesaj gönderen sadettinpolat »

MessageBoxTimeOut adli dokumente edilmemis bir api varmis.

http://edn.embarcadero.com/print/32736
"Sevmek, ne zaman vazgececegini bilmektir." dedi, bana.

---
http://sadettinpolat.blogspot.com/
akuyumcu63
Üye
Mesajlar: 386
Kayıt: 02 Tem 2007 09:43

Re: Açılan mesaj penceresinde otomatik onay

Mesaj gönderen akuyumcu63 »

kendi formumu oluşturarak yaptım. güzel oldu. çok teşekkür ederim.
İsteyen, yapabildiğinden daha fazlasını yapar.
Cevapla