Source position: lazgio2.pas line 1698
type PGFileMeasureProgressCallback = ^TGFileMeasureProgressCallback;