hola a todos, he desarrollado un sistema para credenciales e informes de personal, el cual esta completo hasta cierto punto 8pues me faltan algunas funciones mas), el problema que tengo es que nunca en mi vida he trabajado con Rave Reports

y por lo tanto no se como enviar los datos de una consulta hacia la realizacion de un informe; según he leido se utilizan 3 componentes q son RvSystem,RvProject y RvDataSetConnection.
pero no se como enviar la informacion hacia el informe, ni como hecharlo a andar.
el procedimiento de mi consulta es el siguiente, esta en un dbgrid, que al ir pulsando hacia abajo, me hace una consulta sobre el registro en el que ando y me envia los valores a unas labels; tambien tengo un procedimiento llamado foto, donde se busca la foto del empleado, la cual esta almacenada en una carpeta en el disco duro y no la puse almacenada en la bd xq me alentaria la bd al momento de mis consultas, ya que manejo mas de 1500 registros y seria muy pesada la consulta. Mi base de datos esta en Access.
primero pongo el procedimiento de la busqueda de la foto y posteriormente el de mi adoquery.
Código Delphi
[-]
PROCEDURE TBUSQUEDAGENERAL.FOTO;
VAR NUM_EMPLEADO:STRING;
RUTAFOTO:STRING;
FOTO:TJPEGIMAGE;
BEGIN NUM_EMPLEADO:=LABEL11.Caption; RUTAFOTO:=''; RUTAFOTO:=( (ExtractFilePath( Application.ExeName ) + 'Fotos\'+NUM_EMPLEADO+'.jpg'));
IF FILEEXISTS (RUTAFOTO) THEN BEGIN FOTO:=TJPEGImage.Create; FOTO.LoadFromFile(RUTAFOTO); IMAGE1.Picture.Assign(FOTO); FOTO.Free;
END ELSE BEGIN RUTAFOTO:=( (ExtractFilePath( Application.ExeName ) + 'Fotos\LOGO.jpg'));
FOTO:=TJPEGImage.Create;
FOTO.LoadFromFile(RUTAFOTO);
IMAGE1.Picture.Assign(FOTO);
END;
END;
Código Delphi
[-]
procedure TBUSQUEDAGENERAL.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var NUM_EMPLEADO:STRING;
begin IF DBGRID1.Enabled=FALSE THEN BEGIN EXIT; END;
NUM_EMPLEADO:=DBGRID1.SelectedField.ASSTRING;
IF (NUM_EMPLEADO='') THEN
BEGIN
EXIT;
END
ELSE
BEGIN
WITH ADOQUERY2 DO
BEGIN
CLOSE;
SQL.Clear;
SQL.Add('SELECT * FROM Tbl_Personal WHERE NUM_EMPLEADO LIKE "%'+NUM_EMPLEADO+'%"');
OPEN;
END;
LABEL11.Caption:= ADOQUERY2.FieldByName('NUM_EMPLEADO').ASstring;
LABEL12.Caption:= ADOQUERY2.FieldByName('NOMBRE').ASstring;
LABEL13.Caption:= ADOQUERY2.FieldByName('APELLIDO_P').Asstring;
LABEL14.Caption:= ADOQUERY2.FieldByName('APELLIDO_M').AsSTRING;
LABEL15.Caption:= ADOQUERY2.FieldByName('CARGO').AsSTRING;
LABEL16.Caption:= ADOQUERY2.FieldByName('AREA').AsSTRING;
LABEL17.Caption:= ADOQUERY2.FieldByName('STATUS').ASSTRING;
FOTO;
IF LABEL11.Caption='' THEN
BEGIN
BITBTN1.Enabled:=FALSE;
END
ELSE
BEGIN
BITBTN1.Enabled:=TRUE;
END;
EXIT;
END;
END;
la foto esta guardada en *.jpg y se muestra en un contro Timage.
lo que en realidad
quiero hacer es que los datos que estan en las labels (los que envie directo al reporte) asi como tambien la foto que muestro en el Timage.
espero me puedan ayudar u orientar.
ya he leido varios post y manuales pero la vdd no tengo claro los procedimientos.
espero su ayuda, saludos.