![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как распечатать *.jpg файл
Weare © (2002-10-24 14:34:00)Пишу
procedure TForm1.Button1Click(Sender: TObject);
var Jpg: TJpegImage;
begin
Jpg:= TJpegImage.Create;
try
Jpg.LoadFromFile("konvert.jpg");
Printer.BeginDoc;
Printer.Canvas.StretchDraw(Rect(0,0,200,200),Jpg);
Printer.EndDoc;
finally
Jpg.Free;
end;
end;
а мне выдает пустой листик. С загрузкой файла все нормаль, т.к. выводил на конву формы и рисунок отображался. Где я здесь оплошал, подскажите.
BOA_KAA (2002-10-24 17:37:00) [1]У меня есть подобный пример, но, к сожаленью мне нужно сейчас уходить. Если Вам это нужно, скиньте мне на mail и я пришлю Вам завтра пример
Weare (2002-10-24 16:57:00) [2]
> Song ©
Спасибо за подсказку. Слушай,можешь поподробнее - как мне распечатать с помощью ShellExecute файл формата jpeg, но уместить его в определленых рамках (Rect). Что-то по этому поводу я в хэлпе ничего не могу найти.
Song (2002-10-24 16:50:00) [3]ShellExecute может и открывать и искать и печать и "эксплорить"... Хэлп Вам в руки.
Weare (2002-10-24 16:39:00) [4]2Vazist
а при чем тут ты вообще...
Люди добрые, ну помогите, плз.
VazIst (2002-10-24 16:36:00) [5]2Song
а при чем тут ShellExecute(), мне ведь нужно при нажатии кнопки
вывести на печать *.jpg файл? А ShellExecute() по-моему позволяет запустить какое-либо приложение.
Song (2002-10-24 15:32:00) [6]ShellExecute()
VazIst (2002-10-24 15:01:00) [7]А чем тебе Jpeg не подходит?
Weare (2002-10-24 14:59:00) [8]Что неужели никто не знает, ну может извините, что вопросы тут ламерские задаю. Но ведь не работает. Все тоже самое с Bitmap проходит отлично, но из-за того,что Bitmap имеет большой размер, а значит и в принтер дольше грузится я решил перейти на JpegImage. Но тут какая-то фигня получается.