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