TGtkNativeDialog

type TGtkNativeDialog = object(TGObject)

  procedure destroy_;

  function get_modal;

  function get_title;

  function get_transient_for;

  function get_visible;

  procedure hide;

  function run;

  procedure set_modal();

  procedure set_title();

  procedure set_transient_for();

  procedure show;

  property modal: gboolean; [rw]

  property title: Pgchar; [rw]

  property transient_for: PGtkWindow; [rw]

  property visible: gboolean; [r]

end;

TGtkNativeDialog

TGObject