Source position: gtkbutton.inc line 10
type TGtkButton = record
bin: TGtkBin;
event_window: PGdkWindow;
label_text: Pgchar;
activate_timeout: guint;
flag0: Word;
end;