Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Вниз

Printer 


Ron   (2002-01-24 00:10) [0]

При выводе изображения на принтер печатается
через раз, пробовал на разных но в итоге одно и тоже!
Народ, подскажите что я делаю не так?
BMP:=TBitMap.Create;
JPG:=TJpegImage.Create;
JPG.Grayscale:=true;
JPG.CompressionQuality:=100;
... //Формирую некое изображение в BMP (А4 с 300dpi).
JPG.Assign(BMP);
BMP.Free;
Printer.BeginDoc;
Printer.Canvas.Draw(0,0,JPG);
JPG.Free;
Printer.EndDoc;

P.S. Также пробовал и без JPG, но непомогает!



Scorpio   (2002-01-24 09:41) [1]

Методы Free вызывать после Printer.EndDoc



Ron   (2002-01-31 22:54) [2]

Сенкс, попробую!




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.019 c
1-42779           Зинец Виктор          2002-01-30 16:32  2002.02.14  
Моя прога мешает перезагрузке/перелогину Виндовс :-(


14-42846          Digitman              2001-12-25 16:00  2002.02.14  
С Новым Годом, уважаемые господа !


1-42791           alexts                2002-01-29 19:34  2002.02.14  
Atlon


3-42679           Jony                  2002-01-22 09:36  2002.02.14  
Числа с запятой в Insert и Update


1-42807           Potemkin              2002-01-31 14:42  2002.02.14  
FastReport