Source position: ImagingTypes.pas line 404
type TFormatCheckDimensionsProc = procedure(
Format: TImageFormat;
var Width: Integer;
var Height: Integer
);