Главная страница
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.023 c
15-1187945267
Nic (from server)
2007-08-24 12:47
2007.09.23
Ещё одна проблема с web-сервером


2-1188551855
Gloomer
2007-08-31 13:17
2007.09.23
Как узнать ошибку по значению GetLastError


11-1171730658
Dy1
2007-02-17 19:44
2007.09.23
"много вопросов, мало ответов" (с)


15-1186752698
_Mike_
2007-08-10 17:31
2007.09.23
Про компилятор


2-1187166562
DevilDevil
2007-08-15 12:29
2007.09.23
лимит стека