Source position: lazgobject2.pas line 702
type TGInstanceInitFunc = procedure(
instance: PGTypeInstance;
g_class: PGTypeClass
);