TGtkStatusbar

type TGtkStatusbar = record

  parent_widget: TGtkHBox;

  frame: PGtkWidget;

  _label: PGtkWidget;

  messages: PGSList;

  keys: PGSList;

  seq_context_id: guint;

  seq_message_id: guint;

  grip_window: PGdkWindow;

  flag0: Word;

end;