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

Вниз

Print   Найти похожие ветки 

 
Farel ©   (2007-07-13 20:45) [0]

Здравствуйте! Я отправляю картинку на печать с помощью Word"a. Но меня не устраивает:
*поля страницы выставленные по умолчанию при подключении к Ворду
*ориентацию необходимо изменить на альбомную
*и нужно картинку растянуть на весь лист
Подскажите плиз:) как изменить поля, ориентацию страницы и растянуть картинку.


 
Shamansky_ne   (2007-07-13 22:28) [1]

Что тебе мешает сделать вот так:

uses Printers;
Procedure printImage;
var
bitmap1:TBitmap;
begin
if openpicturedialog1.Execute then
 begin
   bitmap1:=Tbitmap.Create;
   bitmap1.LoadFromFile(openpicturedialog1.FileName);
   Printer.Orientation := poLandscape;
   Printer.BeginDoc;
   Printer.Canvas.Draw(10,10,bitmap1);
   Printer.EndDoc;
 end;

?
здесь только и остается что сформировать картинку в битмап и все, прямая печать на принтер без всякого ворда, правда здесь в примере будет идти печать на принтер по умолчанию



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

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

Наверх




Память: 0.46 MB
Время: 0.018 c
2-1188308817
harisma
2007-08-28 17:46
2007.09.23
Как отдебагать dll?


8-1165654267
iNevil
2006-12-09 11:51
2007.09.23
TColor -> RGB


4-1174663451
Углук
2007-03-23 18:24
2007.09.23
Как не давать запуститься некоторой программе?


2-1188393427
gentos
2007-08-29 17:17
2007.09.23
ActiveCell.FormulaR1C1 = "=SUM(R[-CInt(num)]C:R[-1]C)"


2-1188390706
Cobalt
2007-08-29 16:31
2007.09.23
var-Параметры_процедур - указатели. То ли лыжи не едут, ....