Skriptovací jazyk - funkce MsgDlg: Porovnání verzí
m |
m |
||
Řádek 14: | Řádek 14: | ||
msgboxNoToAll = 256; | msgboxNoToAll = 256; | ||
msgboxYesToAll = 512; | msgboxYesToAll = 512; | ||
− | Function MsgDlg(AText, ACaption: String; DlgType: TMsgDlgType; Buttons: Integer; btnCaptions: String = ''' ''): TModalResult; | + | Function MsgDlg(AText, ACaption: String; DlgType: TMsgDlgType; Buttons: Integer; btnCaptions: String = ''' '''): TModalResult; |
Seznam zobrazených tlačítek se zadává jako součet konstant msgboxXXX (např. msgboxOK + msgboxCancel). | Seznam zobrazených tlačítek se zadává jako součet konstant msgboxXXX (např. msgboxOK + msgboxCancel). |
Verze z 17. 3. 2013, 17:33
Funkce MsgDlg
Tato funkce slouží pro zobrazení modálního dialogu s textem a tlačítky. Výsledkem funkce je identifikace tlačítka, které uživatel vybral. Pomocí parametrů lze nastavit text zobrazený v dialogu, nadpis, typ dialogu a zobrazená tlačítka. Pomocí parametru btnCaptions lze také ovlivnit text zobrazený v jednotlivých tlačítkách.
type TMsgDlgType = (mtWarning, mtError, mtInformation, mtConfirmation, mtCustom); const msgboxYes = 1; msgboxNo = 2; msgboxOK = 4; msgboxCancel = 8; msgboxAbort = 16; msgboxRetry = 32; msgboxIgnore = 64; msgboxAll = 128; msgboxNoToAll = 256; msgboxYesToAll = 512; Function MsgDlg(AText, ACaption: String; DlgType: TMsgDlgType; Buttons: Integer; btnCaptions: String = ): TModalResult;
Seznam zobrazených tlačítek se zadává jako součet konstant msgboxXXX (např. msgboxOK + msgboxCancel).
Pokud parametr btnCaptions zůstane prázdný, tak se použijí výchozí popisky tlačítek. Pokud je třeba popisy tlačítek změnit, tak je třeba parametr btnCaptions zadat ve formátu 'mbXXX=text_tlačítka'#13 ... #13'mbYYY=text_tlačítka'. Např.
Vysledek = MsgDlg('Chcete pokračovat?', 'Dotaz', mtConfirmation, msgboxOK + msgboxCancel, 'mbOK=Pokračovat'#13'mbCancel=Zpět');