Как се печата

Как да отпечатате * .jpg файл

писане

процедура TForm1.Button1Click (Sender: TObject);
Var Jpg: TJpegImage;
започвам
Jpg: = TJpegImage.Create;
опитвам
Jpg.LoadFromFile ( "konvert.jpg");
Printer.BeginDoc;
Printer.Canvas.StretchDraw (Rect (0,0,200,200), JPG);
Printer.EndDoc;
накрая
Jpg.Free;
приключи;
приключи;

и това ми дава празен лист. С всички нормални файл за зареждане, както е Конуей носи на формата и се показва модел. Къде съм попаднал тук, кажи ми.

Това, което наистина никой не знае, е, може би аз съжалявам да задават въпроси тук lamerskie. Но това не работи. Всички едно и също с Bitmap работи добре, но поради факта, че размерът на Bitmap е голям, а оттам и на принтера е зареден вече реших да отида да JpegImage. Но има някои боклук произвежда.

И това, което Jpeg не се вписва?

2Song
но това, което имат ShellExecute (), защото имам нужда от натискане на бутона
отпечатате * .jpg файл? А ShellExecute () по мое мнение прави възможно да стартирате приложението.

2Vazist
и това, което всичко, което трябва.
Добри хора, добре, ще ви помогне, PLZ.

ShellExecute може да се отвори и да търсите и печат, и "Explora". HELP във вашите ръце.

Аз имам подобен пример, но за съжаление трябва да напусна точно сега. Ако имате нужда от него, хвърлят пощата ми и аз ще Ви изпратим утре пример

Памет: 0.72 MB
Време: 0.039 гр