Hi,
sorry think I may have found a bug. I'm calling PdfViewer.AddPage( IEBitMap, TIOPDFPaperSize.iepA4, TIEPageLayout.ielLandscape...... and the page stayed as portrait.
Had a look at IEPaperSizeToPoints in iepdf.pas and the function exits before reaching the layout check, I think it should be a break call not an exit call.
Result := Point( 0, 0 );
for I := Low(IOPDFPaperSizes) to High(IOPDFPaperSizes) do
if IOPDFPaperSizes[I].Size = Size then
begin
Result.X := IOPDFPaperSizes[I].Width;
Result.Y := IOPDFPaperSizes[I].Height;
exit;
end;
if Layout = ielLandscape then
IESwap( Result.X, Result.Y );
regards
Paul
Search
IEPaperSizeToPoints Landscape Issue
Posted - Sep 06 2024 : 03:11:38
