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

Вниз

Как распечатать TImage???   Найти похожие ветки 

 
Alexy ©   (2002-06-10 12:22) [0]

Как его послать на принтер, на лист А4???


 
Kudatsky   (2002-06-10 12:45) [1]

Я это делаю через Word: загружаю картину, устанавливаю размеры на экране, а затем печатаю:

Image1.Picture.SaveToFile("Sender.bmp");
V:=CreateOleObject("Word.Basic");
V.FileNew("Normal");
V.TogglePortrait;
V.InsertPicture("Sender.bmp",0);
V.AppMaximize;
V.AppShow;



 
Alexy ©   (2002-06-10 12:52) [2]

Thanx!!!
А если не через Word?


 
Song ©   (2002-06-10 13:32) [3]

TPrinter.Canvas.Draw()


 
Alexy ©   (2002-06-10 13:57) [4]

Можно подробнее?? Draw - это картинку туда запихнуть???


 
Song ©   (2002-06-10 14:04) [5]


BitMap:=TBitMap.Create;
BitMap.LoadFromFile("1.bmp");
With Printer Do
Begin
BeginDoc;
try
Canvas.Draw(10,10,BitMap);
finally
EndDoc;
end;
End;
BitMap.Free;



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
14-65233
Agent Smith
2002-05-16 16:32
2002.06.20
StarWars 2


1-65158
Kr_Alex
2002-06-06 21:53
2002.06.20
Координаты иконок


7-65262
daos
2002-03-22 10:15
2002.06.20
Идея! К вопросу о крысе (как ее обнаружить).


1-65045
Explorer
2002-06-06 08:29
2002.06.20
FastReport VCL и CLX


14-65225
Digitman
2002-05-17 17:29
2002.06.20
WinGate v4.5x +Win2000 server