Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.06.17;
Скачать: CL | DM;

Вниз

Печать Excel   Найти похожие ветки 

 
Simon ©   (2005-11-22 07:57) [0]

Я для просмотра загружаю Excel документ в OleContainer
OleContainer.CreateObjectFromFile("z:\форма.xlt", False);
подскажите как выбрать принтер и распечатать?


 
TStas ©   (2005-12-02 02:26) [1]

Может, я не понял вопрос, но нельзя СНАЧАЛА выбрать принтер, а потом, после загрузки в контейнер для печати документа программно установить в экселе выбранный принтер


 
LORN   (2005-12-05 17:09) [2]

Печать дока
var
ExcelApp:Variant;
..........................................................
strokadat:=ListBox1.Items[ListBox1.ItemIndex];
  // Create an Excel instance
 // Excel Instanz erzeugen
 ExcelApp := CreateOleObject("Excel.Application");
 try
   ExcelApp.Workbooks.Open(Label1.Caption+strokadat);// задаешьпуть к файлу
   // you can also modify some settings from PageSetup
   // Man kann auch noch einige Einstellungen von "Seite Einrichten" anpassen
//   ExcelApp.ActiveSheet.PageSetup.Orientation := xlLandscape;  //альбомная страница
   ExcelApp.Worksheets.PrintOut;//непосредственно печать
 finally
   // Close Excel
   // Excel wieder schliessen
   if not VarIsEmpty(ExcelApp) then
   begin
     ExcelApp.Quit;
     ExcelApp := Unassigned;
   end;
 end;



Страницы: 1 вся ветка

Текущий архив: 2007.06.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
2-1180096066
ambhtr
2007-05-25 16:27
2007.06.17
Как привести строки разной кодировки к одной


2-1180348039
Чип
2007-05-28 14:27
2007.06.17
Фильтрация через компонент table (по 1 значению)


1-1177001980
Angakok
2007-04-19 20:59
2007.06.17
Непонятная особенность в работе кода


3-1174975498
O.O
2007-03-27 10:04
2007.06.17
Выражение в Insert


2-1180394288
vasIZmax
2007-05-29 03:18
2007.06.17
Как нарисовать пружину?))