Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.27;
Скачать: CL | DM;

Вниз

Неправильно печатается файл :(((   Найти похожие ветки 

 
Mishenka   (2003-11-15 22:48) [0]

Прога печатает картинку содержащуюся в Image:

with Printer do
begin
BeginDoc;
K:=Image1.Picture.Width/Image1.Picture.Height;
K1:=PageWidth/Image1.Picture.Width;
K2:=PageHeight/Image1.Picture.Height;
if K1>K2 then RR:=Rect(0,0,Round(PageHeight*K),PageHeight)
else RR:=Rect(0,0,PageWidth,Round(PageWidth/K));
Canvas.StretchDraw(RR,Image1.Picture.Graphic);
EndDoc;
end;

На моём принтере всё нормально. А на другом печатается какая-то фигня в текстовом режиме, причём если печатать ту же картинку из ворда, то там тоже всё нормально. В чём может быть проблема???


 
Mishenka   (2003-11-16 15:45) [1]

VМожет сё-таки кто-нибудь знает?



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

Текущий архив: 2003.11.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.024 c
1-89961
TUser
2003-11-17 17:33
2003.11.27
Canvas


3-89696
чайник
2003-11-06 10:22
2003.11.27
ошибка при активации TQuery


3-89786
Митяй
2003-11-06 16:42
2003.11.27
DB Трей


7-90136
ИЛЕЙ
2003-09-17 13:40
2003.11.27
Реагирование на завершение работы


4-90173
frost63
2003-10-02 07:21
2003.11.27
Планировшик заданий Windows.