TGtkInfoBar

type TGtkInfoBar = object(TGtkBox)

  priv3: PGtkInfoBarPrivate;

  function new;

  procedure add_action_widget();

  function add_button();

  function get_action_area;

  function get_content_area;

  function get_message_type;

  function get_revealed;

  function get_show_close_button;

  procedure response();

  procedure set_default_response();

  procedure set_message_type();

  procedure set_response_sensitive();

  procedure set_revealed();

  procedure set_show_close_button();

  property message_type: TGtkMessageType; [rw]

  property revealed: gboolean; [rw]

  property show_close_button: gboolean; [rw]

end;

TGtkInfoBar

TGtkBox

TGtkContainer

TGtkWidget

TGInitiallyUnowned

TGObject