Текущий архив: 2002.11.04;
Скачать: CL | DM;
Вниз
Как распечатать *.jpg файл Найти похожие ветки
← →
Weare © (2002-10-24 14:34) [0]Пишу
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;
а мне выдает пустой листик. С загрузкой файла все нормаль, т.к. выводил на конву формы и рисунок отображался. Где я здесь оплошал, подскажите.
← →
Weare © (2002-10-24 14:59) [1]Что неужели никто не знает, ну может извините, что вопросы тут ламерские задаю. Но ведь не работает. Все тоже самое с Bitmap проходит отлично, но из-за того,что Bitmap имеет большой размер, а значит и в принтер дольше грузится я решил перейти на JpegImage. Но тут какая-то фигня получается.
← →
VazIst (2002-10-24 15:01) [2]А чем тебе Jpeg не подходит?
← →
Song © (2002-10-24 15:32) [3]ShellExecute()
← →
VazIst (2002-10-24 16:36) [4]2Song
а при чем тут ShellExecute(), мне ведь нужно при нажатии кнопки
вывести на печать *.jpg файл? А ShellExecute() по-моему позволяет запустить какое-либо приложение.
← →
Weare © (2002-10-24 16:39) [5]2Vazist
а при чем тут ты вообще...
Люди добрые, ну помогите, плз.
← →
Song © (2002-10-24 16:50) [6]ShellExecute может и открывать и искать и печать и "эксплорить"... Хэлп Вам в руки.
← →
Weare © (2002-10-24 16:57) [7]
> Song ©
Спасибо за подсказку. Слушай,можешь поподробнее - как мне распечатать с помощью ShellExecute файл формата jpeg, но уместить его в определленых рамках (Rect). Что-то по этому поводу я в хэлпе ничего не могу найти.
← →
BOA_KAA © (2002-10-24 17:37) [8]У меня есть подобный пример, но, к сожаленью мне нужно сейчас уходить. Если Вам это нужно, скиньте мне на mail и я пришлю Вам завтра пример
Страницы: 1 вся ветка
Текущий архив: 2002.11.04;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.02 c
