Ver Mensaje Individual
  #1  
Antiguo 02-02-2006
Avatar de ElDioni
[ElDioni] ElDioni is offline
Miembro Premium
 
Registrado: jul 2005
Ubicación: Murcia (España)
Posts: 935
Reputación: 19
ElDioni Va por buen camino
Imprimir jpg's

tengo el siguiente codigo

Código Delphi [-]
procedure TFrmDibujo.Button1Click(Sender: TObject);
var
  jp: TJPEGImage;  //Requires the "jpeg" unit added to "uses" clause.
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
Responder Con Cita