Source position: gtkentry.inc line 131
procedure set_activates_default(
var a: TGtkEntry;
__activates_default: guint
);