Вниз
Скачать: CL | DM;

Печать изображений   Найти похожие ветки 

 
X-Disa   (2004-09-28 11:18) [0]

Мастера, подскажите такую вещь. У меня есть битмап, нужно распечатать его на принтере. Рисование на Printer.Canvas не проходит, так как нужны опции печати (dpi, положение на странице, расягивание и пр.) как например в ACDSee. Как именно можно печатать с такими опциями?


 
wicked ©   (2004-09-28 12:47) [1]

через Printer.Canvas...
dpi задается еще перед печатью в диалоге настройки печати...
положение на странице и растягивание - во время печати рисуем в координаты, соответствующие центру листка etc....
маленький совет (из msdn) - печатать не через StretchBlt, а через StretchDIBits (как именно - отдельный вопрос)....
еще один совет - все принтера имеют некие границы слева-сверху, дальше которых они печатать не могут... определяются эти границы через
GetDeviceCaps(Printer.Canvas.Handle, PHYSICALOFFSETX) (слева) и
GetDeviceCaps(Printer.Canvas.Handle, PHYSICALOFFSETY) (сверху)...


 
X-Disa   (2004-09-29 11:10) [2]

Спасибо, а вот еще вопрос. Как напечатать изображение так, чтобы его размер на бумаге был таким же как и на экране? Не обязательно точно, но чтоб похоже...


 
wicked ©   (2004-09-29 11:30) [3]

через dpi экрана и принтера....
"размер на принтере" = "размер на экране" / "dpi экрана" * "dpi принтера".... обычно в таких случаях удобно пользоваться функцией MulDiv:
"размер на принтере" = MulDiv("размер на экране", "dpi принтера", "dpi экрана")

ЗЫ вычисления даны в общем виде.... реально нужно проделать эти действия с шириной и высотой изображения.... :)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c
1-1102693122
_Дельфин_
2004-12-10 18:38
2004.12.26
Как сделать прозрачным фон TAnimate?


14-1102157639
VID
2004-12-04 13:53
2004.12.26
Где в Москве можно найти прачечную с самообслуживанием


4-1100172577
frEEstyler
2004-11-11 14:29
2004.12.26
передать путь к файлу и его имя запущенной копии программы


1-1102691235
Ольга
2004-12-10 18:07
2004.12.26
Почему плодятся процессы EXCEL.EXE (D6, Excel 2000)


1-1102683452
Bobby Digital
2004-12-10 15:57
2004.12.26
Line




   Наверх