Source position: fpglib.pp line 29
type TLukForEachProcedure = procedure(
item: pointer;
data: pointer
) of object;