TGtkToolButtonClass

type TGtkToolButtonClass = record

  parent_class: TGtkToolItemClass;

  button_type: GType;

  clicked: procedure(

  tool_item: PGtkToolButton

);

  _gtk_reserved1: procedure;

  _gtk_reserved2: procedure;

  _gtk_reserved3: procedure;

  _gtk_reserved4: procedure;

end;