Форум: "Основная";
Текущий архив: 2003.09.04;
Скачать: [xml.tar.bz2];
ВнизПечать картинок Найти похожие ветки
← →
Miralex (2003-08-20 13:57) [0]У меня есть Image1 : TImage
Strech = true;
в него загружаеться картинка и автоматом выравниваеться по размеру (height = 153 width = 337)
Хочу потом распечатать ету картинку. Пишу:
logo:=Image1.Picture.Bitmap;
Printer.BeginDoc;
Printer.Canvas.Draw(100,100,logo);
Printer.EndDoc;
В результате я получаю на бумаге Ужасно маленькую картинку!
Как мне получить нормальную картинку при етом чтоб ее размер был фиксированым? (как в Image1 Strech = true)
← →
Семен Сорокин (2003-08-20 14:03) [1]попробуй
Printer.Canvas.CopyRect
← →
KSergey (2003-08-20 15:39) [2]Ну надо указать, какого она должна быть размера - вот и все ;)
См. http://doc.trecom.tomsk.su/Delphi/UnofficialDevelopersFAQ/pages/printe r.htm
Там есть готовая функция
Не забудь разобраться с системами координат - как устанавливать нужных попугаев (SetMapMode и т.п.)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.09.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.009 c