نمونه کد

// Creating multi-size pages in a single PDF document
HPDF.AddPage( A4, poPortrait );
Label1.Caption := 'Page 1 = ' + IntToStr( HPDF.CurrentPage.Width ) + 'x' + IntToStr( HPDF.CurrentPage.Height );

HPDF.AddPage( Letter, poLandscape );
Label2.Caption := 'Page 2 = ' + IntToStr( HPDF.CurrentPage.Width ) + 'x' + IntToStr( HPDF.CurrentPage.Height );