YesNo_box

Internφ programovacφ jazykC/C++Pascal

function Yesno_box(var caption, text : string) : Boolean;
BOOL Yesno_box(const char *caption, const char * text);
function Yesno_box(caption, text : PChar) : Boolean;

Parametry

caption nadpis dotazovacφho okna
text text v dotazovacφm okn∞

Popis

Funkce otev°e na obrazovce modßlnφ okno obsahujφcφ nadpis caption, text text, ikonu s otaznφkem a tlaΦφtka Ano a Ne. Funkce skonΦφ potΘ, co u₧ivatel stiskne n∞kterΘ z t∞chto tlaΦφtek.

Stiskne-li u₧ivatel mφsto toho kombinaci klßves Ctrl+Break, p°eruÜφ tφm b∞h programu ve vnit°nφm jazyce. Takto lze ukonΦit v∞Φn² cyklus, v n∞m₧ se neustßle otevφrß dotazovΘ okno.

Hodnota funkce

Funkce vrßtφ TRUE, pokud u₧ivatel stiskl tlaΦφtko Ano, jinak vrßtφ FALSE.

P°φklad

while not konec and Get_message(MSG) do
begin
  ...
  konec := Yesno_box("Upozorn∞nφ","UkonΦit prßci?") 
end;