d7MsgBox_NOGUIDefault
d7MsgBox_NOGUIDefault
d7MsgBox_NOGUIDefault Fonksiyonu
Tanım
Ön yüzü olan (kullanıcının görebildiği) programlarda; ekranda bir mesaj vermeye yarayan, kullanıcının bir tuşa basmasını bekleyen ve basılan tuşa göre bir tam sayı döndüren fonksiyondur. Ön yüzü olmayan programlarda da ise kullanıcı ilgili mesaj kutusunu göremediğinden varsayılan cevap değeri geri döner.
Ön yüzü olmayan programlar; ana uygulamanın arka planında çalışan ve kullanıcı ile herhangi bir ekran görseli teması olmayan programlardır. Örneğin cari hesap kartı için yazılmış bir makro içinde, senet giriş uygulamasının çağrılması verilebilir. Burada Senet Giriş uygulaması tamamen arka planda çalışacağından kullanıcıya ekranda bir şey görünmez. Eğer ki, Senet Giriş uygulamasında event makro ile bir şey kontrol ediyorsak ve kontrol içinde ekrana herhangi bir sebepten mesaj kutusu getirip kullanıcının tuşa basması isteniyorsa; kullanıcı ilgili mesaj kutusunu göremediğinden bir cevap seçemeyecekti. Yazılan makrolarda benzer durumların olma ihtimaline karşılık, bu fonksiyonun kullanılması daha iyi sonuçlar üretir.
Kullanım Şekli
Değişken = Document.d7MsgBox_NOGUIDefault(Mesaj, Başlık, Stil, VarsayılanCevap)
Ana Nesne
Document (Doc) nesnesinin elemanıdır. Bir doküman nesnesi ile kullanılmak zorundadır.
Parametreler
Stil parametresinin tuş seçenekleri aşağıdadır.
Dinamo ERP Sabit Ad |
vbscript Sabit Ad |
Değer |
Açıklama |
MB_OK |
vbOKOnly |
0 |
OK (Tamam) tuşu gösterilir |
MB_OKCANCEL |
vbOKCancel |
1 |
OK (Tamam) ve Cancel (İptal) tuşları gösterilir |
MB_ABORTRETRYIGNORE |
vbAbortRetryIgnore |
2 |
Abort (Durdur), Retry(Yeniden Dene) ve Ingore (Göz Ardı Et) tuşları gösterilir |
MB_YESNOCANCEL |
vbYesNoCancel |
3 |
Yes (Evet), No (Hayır) ve Cancel (İptal) tuşları gösterilir |
MB_YESNO |
vbYesNo |
4 |
Yes (Evet) ve No (Hayır) tuşları gösterilir |
MB_RETRYCANCEL |
vbRetryCancel |
5 |
Retry(Yeniden Dene) ve Cancel (İptal) tuşları gösterilir |
Stil parametresinin simge seçenekleri aşağıdadır. Simgeler mesaj kutusunun solunda çıkar.
Dinamo ERP Sabit Ad |
vbscript Sabit Ad |
Değer |
Açıklama |
MB_ICONERROR, MB_ICONHAND, MB_ICONSTOP |
vbCritical |
16 |
simgesi gösterilir. |
MB_ICONQUESTION |
vbQuestion |
32 |
simgesi gösterilir. |
MB_ICONEXCLAMATION, MB_ICONWARNING |
vbExclamation |
48 |
simgesi gösterilir. |
MB_ICONINFORMATION, MB_ICONASTERISK |
vbInformation |
64 |
simgesi gösterilir. |
Stil parametresinin varsayılan tuş seçenekleri aşağıdadır. Varsayılan tuş kullanıldığında kullanıcı, fare kullanmadan, klavyesinde Enter veya Carriage Return tuşuna bastığında, varsayılan seçeneği seçmiş olur.
Dinamo ERP Sabit Ad |
vbscript Sabit Ad |
Değer |
Açıklama |
MB_DEFBUTTON1 |
vbDefaultButton1 |
0 |
Birinci tuş varsayılandır. |
MB_DEFBUTTON2 |
vbDefaultButton2 |
256 |
İkinci tuş varsayılandır. |
MB_DEFBUTTON3 |
vbDefaultButton3 |
512 |
Üçüncü tuş varsayılandır. |
MB_DEFBUTTON4 |
vbDefaultButton4 |
768 |
Dördüncü tuş varsayılandır. |
Geri Dönen Değerler
Kullanıcı, mesaj kutusundaki tuşlardan birini seçmek zorundadır. Seçilen tuş geri dönen değeri bir tamsayıdır. Aşağıdaki tabloda hangi tuşa hangi tamsayı değeri dönüldüğü gösterilmiştir. Geri dönülen tamsayı değeri yerine sabit adlarda kullanılabilir.
Ön yüzü olmayan programlarda da varsayılan cevap olarak yine bu değerler kullanılır.
Dinamo ERP Sabit Ad |
vbscript Sabit Ad |
Değer |
Açıklama |
IDOK |
vbOK |
1 |
OK (Tamam) tuşunun seçildiğini belirten değer. |
IDCANCEL |
vbCancel |
2 |
Cancel (İptal) tuşunun seçildiğini belirten değer. |
IDABORT |
vbAbort |
3 |
Abort (Durdur) tuşunun seçildiğini belirten değer. |
IDRETRY |
vbRetry |
4 |
Retry(Yeniden Dene) tuşunun seçildiğini belirten değer. |
IDIGNORE |
vbIgnore |
5 |
Ingore (Göz Ardı Et) tuşunun seçildiğini belirten değer. |
IDYES |
vbYes |
6 |
Yes (Evet) tuşunun seçildiğini belirten değer. |
IDNO |
vbNo |
7 |
No (Hayır) tuşunun seçildiğini belirten değer. |
Hatırlatmalar
•Tuş açıklamaları (İngilizce, Türkçe vb. ), işletim sisteminin kurulum diline göre değişebilir.
•İçinde Cancel (İptal) tuşu olan mesaj kutularında klavyedeki ESC (Escape) tuşuna basıldığında da sistem Cancel tuşu seçilmiş gibi davranır ve 2 (IDCANCEL, vbCancel) değeri geri dönülür. Ayrıca sadece OK (Tamam) tuşunun olduğu mesaj kutularında da ESC (Escape) tuşuna basıldığında 1 (IDOK, vbOK) değeri geri dönülür.
Örnek
Yukarıdaki örnek, aralarında bir satır boşluk verilen bir mesajı, uyarı simgesi ile Yes ve No tuşlarını kullanarak mesaj kutusunu oluşturmuştur. Ayrıca ikinci tuş olan No (Hayır) tuşu varsayılan olarak seçili yapılmıştır. Ön yüzü olan programlarda; aşağıdaki resimdeki gibi bir mesaj kutusu görülecekti.
Eğer ki ön yüzü olamayan bir uygulamada, bu makro çalışacak olsaydı, fonksiyon kullanıcıya birşey göstermeden Varsayılan Cevap olan IDNO (vbNo, 7) cevabı geri dönecekti.
Satırlar arası boşluk için chr(13) & chr(13) karakterleri kullanılmıştır. Ayrıca Stil değişkenini aşağıdaki şekillerde de kullanılabilirdik. Bu durumlarda da sonuç
tamamen aynı olacaktı.
Stil = vbYesNo + vbExclamation + vbDefaultButton2 Stil = 4 + 48 + 256 |
“if geridonusdegeri = IDYES then” program cümlesindeki IDYES yerine vbYes veya 6 değerleri de kullanılabilinirdi.
Paylaşım Makrosu
s
Copyright © <2017> by <Birleşik Yazılım>. All Rights Reserved.