Delphi Mesaj Pencereleri : MessageDlg
Kullanıcıya seçme şansı veren pencereler açmak için kullanılan bir methoddur. Pencere açıldığı zaman üzerinde birden fazla button yerleştirilebileceği için, basılan düğmenin numarasının aktarılacağı tamsayı tipli bir değişkene ihtiyaç duyar. Aşağıdaki yapıyı dikkatlice inceleyiniz.
var
num : Integer; //Tam sayı tipli değişkene aktarılmalı
begin
num := MessageDlg(‘Mesaj’,icon,Düğme, 0);
Şimdi de bu işlemi örneklendirelim.
Yazmış olduğumuz
“num := MessageDlg(‘Delphiyi Sevdiniz mi!’,mtCustom,[mbYes,mbNo], 0);” satırını inceleyecek olursak: Kullanılan ilk parametrede (Delphiyi Sevdiniz mi) pencerede çıkacak olan mesaj belirlenmektedir. Burada uyarınızı ‘’ içerisinde belirtebileceğiniz gibi AnsiString tipte bir değişken değeri de kullanabilirsiniz
(Eğer tamsayı veya başka tipteki matematiksel bir değişkeni yazdıracaksanız, tip dönüşümü uygulamalısınız).
var
num : Integer;
mesaj:AnsiString;
begin
mesaj:=Edit1.Text;
num := MessageDlg(mesaj,mtCustom,[mbYes,mbNo], 0);
Şayet string bir içerikle matematiksel bir değişkenin değerini yanyana pencerede yazdırmak zorunda kalırsanız, aşağıdaki şekilde bir yöntem izlemelisiniz.
Programı çalıştırdıktan sonra buttona tıklarsanız aşağıdaki pencereyle karşılaşırsınız.
Sayısal ifadenin pencerede yazdırılabilmesi için “IntToStr” , “FloatToStr” ,
“CurrToStr” veya “DateTimeToStr” vs. tip dönüştürme fonksiyonlarından faydalanmalısınız. Ayrıca iki string değişkeni yanyana yazdırmak için “+” operatöründen faydalanmaktayız.
Gelelim ikinci parametreye (mtCustom), buraya aktaracağınız değerle pencerenizde çıkmasını istediğiniz iconu belirleyebilirsiniz. Parametre olarak kullanabileceğiniz standart icon sayısı “4” taneden oluşmaktadır. Aynı anda iki icon değeri kullanamayacağınızı belirterek, aşağıdaki tabloda tüm seçenekler ve anlamları sizlere sunulmuştur (Pencerelerinizde kullanacağınız iconları programınızın akışına uygun olacak şekilde belirlemelisiniz. Asla rastgele icon değeri kullanmayınız).
Kullanabileceğiniz parametre değerleri ve anlamları aşağıda verilmiştir.
Icon Seçenekleri Oluşacak olan icon
mtWarning Arama Iconu
mtError Hata Iconu
mtInformation Danışma Iconu
mtConfirmation Bilgilendirme Iconu
mtCustom Genel
Biz bunlardan “mtWarning” seçeneğini kullanarak penceremizde arama iconunun çıkmasını sağlayalım.
Programı çalıştırdıktan sonra buttona tıklarsanız aşağıdaki ekran görüntüsüyle karşılaşırsınız.
Bu methodda pencerenizin başlığını belirleme şansınız yok. Dikkat ettiyseniz Delphi pencere başlığı olarak icon ismini varsayılan ve değiştirilemeyen değer olarak belirlemiştir.
Şimdi ikinci parametreyle ilgili güzel bir örnek yapalım. Aşağıdaki form tasarımını oluşturup gerekli kod satırlarını da ekleyiniz.
Programınızı çalıştırdıktan sonra icon seçeneklerinden birisini seçin ve button kontrolüne basın. Mesaj penceresinde seçmiş olduğunuz icona ait resim gözükecektir.
Şimdi de pencerede çıkmasını istediğiniz buttonları belirleyebileceğiniz üçüncü parametremize geçelim ([mbYes,mbNo]). Aşağıdaki tabloda yaratabileceğiniz tüm düğmeler ve bu düğmelere ait değerler verilmiştir. İçlerinden hangilerini isterseniz ekleyebilirsiniz.
Düğme Seçenekleri Oluşacak Olan Düğme
mbYes ‘Yes’ button
mbNo ‘No’ button
mbOK ‘OK’ button
mbCancel ‘Cancel’ button
mbAbort ‘Abort’ button
mbRetry ‘Retry’ button
mbIgnore ‘Ignore‘ button
mbAll ‘All’ button
mbNoToAll ‘No to all’ button
mbYesToAll ‘Yes to all‘ button
mbHelp ‘Help’ button
Aşağıda “Yes” “No” ve “Cancel” buttonlarını oluşturabileceğiniz kodlamayı
veriyorum.
Programı çalıştırdıktan sonraki ekran görüntüsü aşağıda verilmiştir. Dilerseniz daha fazla button oluşturabilirsiniz. Mesaj penceresinde oluşturabileceğiniz düğmelere ait güzel bir örnek yapmak istiyorum.
Şimdi aşağıdaki kodları formunuzun gerekli olan event larına ekleyip projenizi çalıştırın.
Buradaki kodların yazıldığı form tasarımı aşağıda verilmiştir. Programı çalıştırdıktan sonra “Düğme Seçenekleri” nden bir tanesini işaretleyerek, Button kontrolüne tıklayınız. Şayet herhangi bir hata yapmadıysanız, seçmiş olduğunuz düğmelerin mesaj pencerenizin üzerinde oluşmuş olmaları gerekmektedir.
Gelelim dördüncü parametreye (Bizim şablonda değeri 0), bu parametre help dosyası hazırlanmış olan projeler için önem arz etmektedir (Help dosyası hazırlamayla ilgili konular daha sonra izah edilecektir). Buraya girilecek değer help dosyasında aynı numarayla linkli olarak çalışacak, yardım alınmak istenirse bu değer kullanılarak direkt açıklamaya ulaşmanız mümkün olacaktır (Bu değere “0” verilmesi help dosyasının olmadığı anlamını taşımaktadır).
Bu yazı 7 Şubat 2010 tarihinde Aytaç Cici tarafından Delphi kategorisi altına yazılmış ve 69 views defa okunmuş.





