Source position: fppapers.pas line 196
function GetPaperSize(
AWidth: Single;
AHeight: Single;
PaperSizes: array of TPaperSizes
):TPaperSize;