Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Print [D7, WinXP]


Farel ©   (2007-07-13 20:45:00) 

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


Shamansky_ne   (2007-07-13 22:28:00) [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;

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо