Форум: "Начинающим";
Текущий архив: 2009.04.12;
Скачать: [xml.tar.bz2];
ВнизPageSetup Найти похожие ветки
← →
nstur (2009-02-24 13:36) [0]Как получить доступ к PageSetup через TExcelApplication
← →
Anatoly Podgoretsky © (2009-02-24 14:05) [1]Создай макрос и смотри.
← →
nstur (2009-02-24 14:19) [2]Не все так просто.
ActiveSheet: IDispatch и поэтому пришлось
использовать OleVariant(ActiveSheet).PageSetup.
а явно к _Worksheet добраться не могу
← →
tytus (2009-02-24 15:31) [3]я пишу так:
FExcel: TExcelApplication;
var
Sheet:Variant;
begin
FExcel.SheetsInNewWorkbook[0]:=1;
FExcel.Workbooks.Add(EmptyParam,0);
Sheet:=FExcel.WorkBooks[1].Sheets[1];
Sheet.PageSetUp.Orientation:=xlPortrait;//xlLandScape;
Sheet.PageSetUp.LeftMargin:=9;
Sheet.PageSetUp.RightMargin:=9;
Sheet.PageSetUp.Zoom:=84;
← →
Сергей М. © (2009-02-24 19:24) [4]
> явно к _Worksheet добраться не могу
Что значит "не могу" ?var
MySheet: _Worksheet;
..
MySheet := MyExcelApp.ActiveSheet as _Worksheet;
Такие буковки набрать не можешь или что ?
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.04.12;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.023 c