Cum se imprimă

Cum se imprimă un fișier .jpg *

scris

Procedura TForm1.Button1Click (Expeditor: TObject);
var Jpg: TJpegImage;
începe
Jpg: = TJpegImage.Create;
încerca
Jpg.LoadFromFile ( "konvert.jpg");
Printer.BeginDoc;
Printer.Canvas.StretchDraw (Rect (0,0,200,200), Jpg);
Printer.EndDoc;
în cele din urmă
Jpg.Free;
se încheie;
se încheie;

și dă-mi o frunză gol. Cu toate fișierul de încărcare normală, după cum Conway aduce la forma și este afișată de model. În cazul în care am aventurat aici, spune-mi.

Ceea ce într-adevăr nimeni nu știe, bine, poate că îmi pare rău pentru a pune întrebări aici lamerskie. Dar aceasta nu funcționează. Tot la fel cu Bitmap ruleaza bine, dar din cauza faptului că dimensiunea Bitmap este mare, și, prin urmare, imprimanta este încărcată mai mult, am decis să merg la JpegImage. Dar există unele produse de gunoi.

Și ceea ce Jpeg nu se potrivește?

2Song
dar ce au ShellExecute (), pentru că am nevoie de butonul este apăsat
imprima fișierul .jpg *? A ShellExecute () în opinia mea face posibilă rularea unei aplicații.

2Vazist
și ce toate au.
Oameni buni, bine, de ajutor, plz.

ShellExecute poate deschide și de căutare și de imprimare, și „Explora“. HELP în mâinile tale.

Am un exemplu similar, dar, din păcate, trebuie să plec chiar acum. Dacă aveți nevoie de ea, arunca e-mail meu și am să vă trimit mâine un exemplu

Memorie: 0.72 MB
Timpul: 0,039 c