Imprimir imagen

[[newtron]]

Hola. No sé si en lazarus funcionará igual pero yo en Delphi hago algo parecido a lo siguiente:

Código Delphi [-]
Grafico := TImage.Create(Self);
Grafico.Picture.LoadFromFile(imagen);
Grafico.Stretch :=True; 
Grafico.AutoSize := True; 
Grafico.Width  := Ancho; 
Grafico.Height := Alto; 
Rectt.Left   := Izquierda; 
Rectt.Top    := Derecha; 
Rectt.Right  := Rectt.Left + Ancho; 
Rectt.Bottom := Rectt.Top + Alto; 
MiCanvas.StretchDraw(Rectt, Grafico.Picture.Graphic);