Source position: gtkaccelgroup.inc line 19
type TGtkAccelGroupActivate = function(
accel_group: PGtkAccelGroup;
acceleratable: PGObject;
keyval: guint;
modifier: TGdkModifierType
):gboolean;