![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#2
|
|||
|
|||
|
Примерно так (взято из примеров к книге "Программир.док-тов и прилож MS OFFICE в Delphi"):
Код:
Var
Excel, PageSetup : variant;
...
Excel:=CreateOleObject('Excel.Application');
Excel.Visible:=true;
Excel.WorkBooks.Open(OpenDialog1.FileName);
PageSetup:=Excel.ActiveSheet.PageSetup;
PageSetup.PrintArea:='A1:B10';
Последний раз редактировалось roamer, 15.07.2010 в 17:45. |