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

Вниз

Как распечатать bmp файл   Найти похожие ветки 

 
49 Cent   (2006-05-03 17:06) [0]

Есть стандартный (определенного размера) bmp файл, который необходимо распечатать. Какой наиболее эффективный способ? Куда копать?


 
Джо ©   (2006-05-03 17:08) [1]

> Куда копать?

uses Printer;

Printer.BeginDoc;
try
 Printer.Canvas.Draw
 или
 Printer.Canvas.StretchDraw
finally
Printar.EndDoc;


 
AlexanderMS ©   (2006-05-03 17:09) [2]

Самый простой:
Printer.BeginDoc;
Printer.Canvas.Draw(10,10,Image1.Picture.Bitmap);
Printer.EndDoc;



> Куда копать?

Можно в справку по Delphi.


 
49 Cent   (2006-05-03 17:45) [3]

Оказывается, что в 7 Делфи надо указывать в uses Printers, а в других версиях Printer. У меня последний вопрос:


bmp:=TBitmap.Create;
bmp.Height:=shape1.Height;
bmp.Width:=shape1.Width;
DC:=GetDC(0);
bitblt(bmp.Canvas.Handle, 0, 0, bmp.Height,bmp.Width,DC, 0,85, SRCCOPY);

Printer.BeginDoc;
try
Printer.Canvas.StretchDraw(bmp.Canvas.ClipRect,bmp);
finally
Printer.EndDoc;


В результате печати получается очень-очень маленькая картинка? Как вылечить?
Заранее благодарен.


 
Джо ©   (2006-05-03 17:53) [4]

> [3] 49 Cent   (03.05.06 17:45)
> Оказывается, что в 7 Делфи надо указывать в uses Printers,
> а в других версиях Printer.

Во всех Printers, в [1] опечатка (и не одна).


> Как вылечить?

Указывать соответветствующий (больший) Rect.



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

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

Наверх




Память: 0.47 MB
Время: 0.027 c
15-1145648705
dyd
2006-04-21 23:45
2006.05.21
опять PHP :)


15-1145868036
Looser
2006-04-24 12:40
2006.05.21
вопрос не по дельфи


3-1143344801
DevilDevil
2006-03-26 07:46
2006.05.21
Вопрос элементарный: как использовать псевдоним


2-1146643356
Alex_C
2006-05-03 12:02
2006.05.21
Как получить CharSet шрифта


1-1144911936
Alexandr
2006-04-13 11:05
2006.05.21
перезапуск программы