Source position: gtktogglebutton.pp line 24
procedure set_active(
var a: TGtkToggleButton;
__active: guint
);procedure set_active(
var a: TGtkCheckMenuItem;
var a: TGtkMenuShell;
);