TGtkDialog

type TGtkDialog = object(TGtkWindow)

  priv4: PGtkDialogPrivate;

  function new;

  procedure add_action_widget();

  function add_button();

  function get_action_area;

  function get_content_area;

  function get_header_bar;

  function get_response_for_widget();

  function get_widget_for_response();

  procedure response();

  function run;

  procedure set_default_response();

  procedure set_response_sensitive();

end;

TGtkDialog

TGtkWindow

TGtkBin

TGtkContainer

TGtkWidget

TGInitiallyUnowned

TGObject