<html><head> <link rel="stylesheet" href="style.css" type="text/css"> <link rel="Start" href="index.html"> <title>LablGTK : GtkWindow.Dialog</title> </head> <body> <code class="code"><span class="keyword">sig</span><br> <span class="keyword">val</span> cast : <span class="keywordsign">'</span>a <span class="constructor">Gobject</span>.obj <span class="keywordsign">-></span> <span class="constructor">Gtk</span>.dialog <span class="constructor">Gtk</span>.obj<br> <span class="keyword">module</span> <span class="constructor">P</span> :<br> <span class="keyword">sig</span> <span class="keyword">val</span> has_separator : ([> <span class="keywordsign">`</span>dialog ], bool) <span class="constructor">Gobject</span>.property <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="constructor">S</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">val</span> close : ([> <span class="keywordsign">`</span>dialog ], unit <span class="keywordsign">-></span> unit) <span class="constructor">GtkSignal</span>.t<br> <span class="keyword">val</span> response : ([> <span class="keywordsign">`</span>dialog ], int <span class="keywordsign">-></span> unit) <span class="constructor">GtkSignal</span>.t<br> <span class="keyword">end</span><br> <span class="keyword">val</span> create : <span class="constructor">Gtk</span>.dialog <span class="constructor">Gobject</span>.param list <span class="keywordsign">-></span> <span class="constructor">Gtk</span>.dialog <span class="constructor">Gtk</span>.obj<br> <span class="keyword">external</span> action_area : [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> <span class="constructor">Gtk</span>.button_box <span class="constructor">Gtk</span>.obj<br> = <span class="string">"ml_GtkDialog_action_area"</span><br> <span class="keyword">external</span> vbox : [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> <span class="constructor">Gtk</span>.box <span class="constructor">Gtk</span>.obj<br> = <span class="string">"ml_GtkDialog_vbox"</span><br> <span class="keyword">external</span> add_button : [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit<br> = <span class="string">"ml_gtk_dialog_add_button"</span><br> <span class="keyword">external</span> response : [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit<br> = <span class="string">"ml_gtk_dialog_response"</span><br> <span class="keyword">external</span> set_response_sensitive :<br> [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> int <span class="keywordsign">-></span> bool <span class="keywordsign">-></span> unit<br> = <span class="string">"ml_gtk_dialog_set_response_sensitive"</span><br> <span class="keyword">external</span> set_default_response : [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit<br> = <span class="string">"ml_gtk_dialog_set_default_response"</span><br> <span class="keyword">external</span> run : [> <span class="keywordsign">`</span>dialog ] <span class="constructor">Gtk</span>.obj <span class="keywordsign">-></span> int = <span class="string">"ml_gtk_dialog_run"</span><br> <span class="keyword">val</span> std_response : <span class="constructor">GtkEnums</span>.response <span class="keywordsign">-></span> int<br> <span class="keyword">val</span> decode_response : int <span class="keywordsign">-></span> <span class="constructor">GtkEnums</span>.response<br> <span class="keyword">end</span></code></body></html>