| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как распечатать bmp файл
49 Cent © (2006-05-03 17:06:00)Есть стандартный (определенного размера) bmp файл, который необходимо распечатать. Какой наиболее эффективный способ? Куда копать?
Джо (2006-05-03 17:53:00) [1]> [3] 49 Cent (03.05.06 17:45)
> Оказывается, что в 7 Делфи надо указывать в uses Printers,
> а в других версиях Printer.
Во всех Printer s, в [1] опечатка (и не одна).
> Как вылечить?
Указывать соответветствующий (больший) Rect.
49 Cent (2006-05-03 17:45:00) [2]Оказывается, что в 7 Делфи надо указывать в uses Printer s, а в других версиях 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;
В результате печати получается очень-очень маленькая картинка? Как вылечить?
Заранее благодарен.
AlexanderMS (2006-05-03 17:09:00) [3]Самый простой:
Printer.BeginDoc;
Printer.Canvas.Draw(10,10,Image1.Picture.Bitmap);
Printer.EndDoc;
> Куда копать?
Можно в справку по Delphi.
Джо (2006-05-03 17:08:00) [4]> Куда копать?
uses Printer;
Printer.BeginDoc;
try
Printer.Canvas.Draw
или
Printer.Canvas.StretchDraw
finally
Printar.EndDoc;
| |
