Hola Aida,
Te envio un ejemplo real de uso de Treport con fotos.
REPORT oReport ;
FONT oFont2;
HEADER " "+cEmpresa+SPACE(18)+"FECHA : "+dtoc(date()) ,;
" "," ", ;
SPACE(10)+"RELACION DE SERVICIOS DE VOLUNTARIO (Del "+DTOC(feci)+" Al "+DTOC(fecf)+")", ;
" ",;
SPACE(10)+wdescri+SPACE(20)+"Numero de Voluntario: "+STRZERO(VOLUNTAR->CVOLUN),;
" "," ",;
" Nombre y Apellidos: " + RTRIM(VOLUNTAR->NOMBRE)+" "+RTRIM(VOLUNTAR->APELLIDOS)+;
space(40-Len(Rtrim(voluntar->nombre))-len(Rtrim(voluntar->apellidos)))+"Fecha Ingreso: "+DTOC(voluntar->FECHAING),;
" D.N.I.: "+VOLUNTAR->DNI+SPACE(40)+"Fecha Nacimiento: "+DTOC(VOLUNTAR->FECHANACI),;
" Direccion: "+VOLUNTAR->DOMICILIO,;
" Localidad: "+VOLUNTAR->LOCALIDAD+" Provincia: "+substr(VOLUNTAR->PROVINCIA,1,15)+" C.P.: "+VOLUNTAR->CPOSTAL,;
" Medios de Contacto: " ,;
" Telefono: "+substr(voluntar->TELEFONO,1,15)+SPACE(3)+"Movil: "+substr(voluntar->MOVIL,1,15)+space(3)+"Otro Telefono: "+voluntar->TELEFADIC ,;
" e_mail: "+voluntar->email,;
" "+Replicate("_",80),;
" " LEFT ;
FOOTER OemToAnsi(cEmpresa) ;
CENTER ;
CAPTION "Ficha de Servicios de Voluntario" ;
PREVIEW
COLUMN DATA ""
IF cRad = 1
COLUMN TITLE "NºServ." DATA "" SIZE 7
COLUMN TITLE "Fecha" DATA "" SIZE 7
COLUMN TITLE "Servicio" DATA "" SIZE 35
COLUMN TITLE "Tiempo" DATA "" SIZE 6
ENDIF
IF cRad = 2
COLUMN TITLE "Cod.Activ" DATA "" SIZE 7
COLUMN TITLE "Actividad" DATA "" SIZE 35
COLUMN TITLE "Nº Serv." DATA "" SIZE 6
COLUMN TITLE "Tiempo" DATA "" SIZE 6
ENDIF
GROUP ON SERVOLUN->CVOLUN ;
HEADER "" ;
FOOTER SPACE(90)+"Tiempo Total________ "+str(thora,6)+":"+strzero(tminu,2) ;
EJECT
oReport:nTitleUpLine := RPT_NOLINE
// oReport:nTitleDnLine := RPT_NOLINE
oReport:nGroupLine := RPT_NOLINE // no imprime linea separadora
// oReport:oHeader:aFont[3] := { || 2 }
END REPORT
IF cRad = 1
ACTIVATE REPORT oReport ;
WHILE !(SERVOLUN->(EOF()));
ON CHANGE (escriser(@oReport,SERVOLUN->CVOLUN,@thora,@tminu)) ;
ON STARTGROUP (Bitmaps(oReport,.5,7.2,.7,.9,(cDirfoto+VOLUNTAR->FOTO))) ;
ON STARTPAGE (Bitmaps(oReport,.5,7.2,.7,.9,(cDirfoto+VOLUNTAR->FOTO)), ;
LinBox(oReport,1.5,.5,.6,.5), ;
Bitmaps(oReport,.1,.1,.7,.9,cDirprog+"logopc.BMP"))
ELSE
ACTIVATE REPORT oReport ;
WHILE !(SERVOLUN->(EOF()));
ON CHANGE (escritot(@oReport,walias,xalias,@thora,@tminu,servolun->cvolun)) ;
ON STARTGROUP (Bitmaps(oReport,.5,7.2,.7,.9,(cDirfoto+VOLUNTAR->FOTO))) ;
ON STARTPAGE (Bitmaps(oReport,.5,7.2,.7,.9,(cDirfoto+VOLUNTAR->FOTO)), ;
LinBox(oReport,1.5,.5,.6,.5), ;
Bitmaps(oReport,.1,.1,.7,.9,cDirprog+"logopc.BMP"))
ENDIF
Yo no he tenido problemas en ninguna impresora (por ahora), no me descuadra nada. Puede que tengas problemas con los Fonts y causen algun desajuste.
Por otro lado en determinadas circunstancias, he usado las classes Timprime y Tutilprn de Rafa Carmon (The Full), que por supuesto son muy buenas y facilmente adaptables a tus necesidades.
Si deseas que te envie alguna imagen resultado, seria mejor que te lo envie a tu e_mail.
Suerte y adelante,
Alfonso
[/img]
pero en algunos registros sale la foto sobre los datos 
que se suponen deben quedar arriba y la foto abajo de ellos
