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

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

 
[BAD]Angel ©   (2003-07-16 22:18) [0]

Люди, подскажите, как напечатать часть с формы. А именно: есть нескоько Imageов, наложенных друг на друга. Надо отправиь в печать эту солянку из изображений. Как бы это сделать?


 
[BAD]Angel ©   (2003-07-17 18:25) [1]

P.S. именно такого, размера, как они представленны...


 
Gigabyte ©   (2003-07-18 10:37) [2]

см. TPrinter....
Например так: Printer.Canvas.Draw(...)


 
[BAD]Angel ©   (2003-07-18 13:03) [3]

Вроде разобрался, а как сделать печать 1:1, а то получается какая-то фигня... у меня картинка 242х149 на экране, а на принтер выводится чуть ли не 5 раз меньше :(


 
BOA_KAA ©   (2003-07-18 13:21) [4]

Разрешение у принтера выше, чем у экрана.
Если нормальный принтер и рисунок небольшой, то хватит StrechDraw.
В противном случае придется выкручиваться


 
chs2r ©   (2003-07-18 13:22) [5]

узнаем разрешение принтера
pxx:=GetDeviceCaps(Printer.Handle,LogPixelsX);
pxy:=GetDeviceCaps(Printer.Handle,LogPixelsY);
печать
Printer.BeginDoc;
with Image1.Picture.Bitmap do
Printer.Canvas.CopyRect(Rect(0,0,Height,Width),Canvas,Rect(0,0,Height,Width));
Printer.EndDoc;

только перед печатью картинку нужно перевести в масштаб, который вычисляется из разрешения принтера
как масштабировать-не знаю, см мой вопрос рядом, мож ответят :)





 
[BAD]Angel ©   (2003-07-18 13:27) [6]

BOA_KAA >> я делаю прогу для облегчения создания СМАРТ-КАРТ.
Т.е, фотографируем человека на цифровой фотик, пишим фотку в папку, далее добавляем надписи и все... жмем печать и она должна печататься на спец карточке размером 8х4

chs2r >> Спасибо, попробуй...


 
LongIsland ©   (2003-07-18 13:30) [7]

см. ветку chs2r
http://delphimaster.net/view/1-1058517755/


 
KSergey ©   (2003-07-18 14:01) [8]

Могу предложит готовую аналогичную программу, но не бесплатно, увы. Хотя и за недорого: если именно как описано - отдам за 1000 руб, только заточу именно под ваши задачи - и все.


 
[BAD]Angel ©   (2003-07-18 17:33) [9]

Нет, спасибо! я не покупаю готовый продукты. Я лучше сам помучаюсь. Ладно бы если мне за эту прогу денег дали, но я ее делаю бесплатно!!! Вот.



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

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



Память: 0.47 MB
Время: 0.012 c
14-100955
stone
2003-07-15 15:13
2003.07.31
Как это может быть правдой?


7-101010
L_Dmitrty
2003-05-20 11:09
2003.07.31
Записи


7-101003
AlexandrRya
2003-05-19 22:35
2003.07.31
Beep


1-100676
Pat
2003-07-17 22:09
2003.07.31
Телефон - нофелеТ


3-100629
paxer
2003-07-10 11:21
2003.07.31
Нужнай дока по Interbase (желат.на русском)




   Наверх