Как распечатать 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;

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

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

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

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

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

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