tengo el siguiente codigo
Código Delphi
[-]
procedure TFrmDibujo.Button1Click(Sender: TObject);
var
jp: TJPEGImage; begin
jp := TJPEGImage.Create;
jp.LoadFromFile(frmdibujo.caption);
try
printer.BeginDoc;
printer.canvas.Draw(0,0,jp);
printer.EndDoc;
finally
jp.free;
end;
end;
me suelta un error de compilacion en el printer canvas donde dice que:
[Error] Unit2.pas(37): Incompatible types: 'TGraphic' and 'TJPEGImage'
alguien puede decirme porque es esto
gracias por adelantado