alguem sabe como faço para imprimir arquivos jpg ou wmf ?

Delphi

30/11/2004

Ola pessoal,

tenho um formulario em tem um componente Image1

utilizo o seguinte codigo abaixo para imprimir essa imagem, porem ele so funciona para arquivos bmp. Para jpg ou wmf (tambem pode ser) ele nao funciona.

alguem sabe como faço para imprimir arquivos jpg ou wmf ?

Ja troquei o Tbitmap pelo TPicture ou TJPGXXXX(alguma coisa nao me lembro) e nao da certo pq

na linha Canvas.Draw(100,100, bitmap1); no lugar do bitmap1 tem que ser do tipo TGraphic


procedure BtnImprimirOnclick;
var
bitmap1 : Tbitmap;
begin
bitmap1.Create;
bitmap1.LoadFromFile(´C:\Meus documentos\imagem.bmp´)
with Printer do begin
beginDoc;
Canvas.Draw(100,100, bitmap1);
EndDoc;
end;
end;


Brunohenrique

Brunohenrique

Curtidas 0
POSTAR