|
Dette eksemplet viser hvordan du kopierer side nummer 5 fra kildedokumentet til side nummer 0 i det gjeldende dokumentet var DestDoc, SourceDoc: THotPDF; begin SourceDoc := THotPDF.Create( nil ); try SourceDoc.LoadFromFile( 'SourceDoc.pdf' ); DestDoc := THotPDF.Create(nil); try DestDoc.FileName := ( 'DestDoc.pdf' ); DestDoc.BeginDoc; DestDoc.CopyPageFromDocument( SourceDoc, 5, 0 ); // Copies page number 5 from source document to current document page number 0 DestDoc.EndDoc; finally DestDoc.Free; end; finally SourceDoc.Free; end; end; |