Source position: lazglib2.pas line 1970
type TGDataForeachFunc = procedure(
key_id: TGQuark;
data: gpointer;
user_data: gpointer
);