Клас TXLSPaginationModel
TXLSPaginationModel изгражда независима от изхода последователност от логически страници за класически XLS и модерни XLSX диапазони, работни листове или работни книги
Всяка страница носи геометрия на хартията, полета, мащаб, ленти на редове и колони, повторени заглавия за печат, горни и долни колонтитули, политика за мрежови линии, ред на страниците и позиции на рисунките
Методи за изграждане
function Build(Range: IXLSRange): Boolean; overload; function Build(Worksheet: TXLSWorksheet): Boolean; overload; function Build(Workbook: TXLSWorkbook): Boolean; overload; function Build(Range: TXLSXRange): Boolean; overload; function Build(Worksheet: TXLSXWorksheet): Boolean; overload; function Build(Workbook: TXLSXWorkbook): Boolean; overload;
Всяко извикване на Build изчиства предишния резултат, изключва скритите листове на работната книга и прилага областта за печат на работния лист, когато UseWorksheetPageSetup е включено
Членове на логическата страница
| DocumentPageNumber | Номер на страницата, базиран на единица, в цялата работна книга |
| SheetPageNumber | Номер на страницата, базиран на единица, в рамките на притежаващия работен лист |
| PageWidth / PageHeight | Размери на хартията в точки след прилагане на ориентацията |
| Margins | Ляво, дясно, горно, долно, заглавно и долноколонтитулно полета в точки |
| Scale | Разрешен мащаб на мащабиране на работния лист или прилягане към страница от 0,1 до 4 |
| Rows / RowEdges | Действителни редове на работния лист и техните координати на страницата отгоре надолу |
| Columns / ColumnEdges | Действителни колони на работния лист и техните координати на страницата отляво надясно |
| Drawings | Позиции на изрязаните по страница изображения, диаграми, текстови полета, форми и контроли |
Рендиране и метафайлове
RenderPage рисува една страница в произволен VCL TCanvas и мащабира страницата пропорционално в границите, предоставени от извикващия код
CreatePageMetafile връща притежаван TMetafile, докато SavePageAsMetafile записва една страница директно в EMF файл
TXLSPDFExport.CreatePaginationModel връща същия модел, конфигуриран с ориентацията, полетата и подразбиращите се височини на редовете на експортера, а извикващият код притежава върнатия модел
Пример
Pages := TXLSPaginationModel.Create;
try
if Pages.Build(Workbook) then
Pages.SavePageAsMetafile(0, 'FirstPage.emf');
finally
Pages.Free;
end;