Source position: gtkactiongroup.inc line 27
type TGtkActionEntry = record
szName: Pgchar;
szStock_id: Pgchar;
szLabel: Pgchar;
szAccelerator: Pgchar;
szTooltip: Pgchar;
callback: TGCallback;
end;