pues despues de tanto dolor de cabeza y de leer muchas paginas por internet y visitar sitios, ejemplos, etc.
ahi en el foro encontre un
hilo donde decian como manipular un objeto del Rave desde delphi, el cual lo adapte y lo hice funcional segun mis necesidades.
mi procedimiento quedo de la siguiente forma
Código Delphi
[-]
procedure TBUSQUEDAGENERAL.Button1Click(Sender: TObject);
var
NUM_EMPLEADO:STRING;
RUTAFOTO:STRING;
FOTO:TJPEGIMAGE;
reporte: TRavePage;
fotorave: Travejpegimage;
begin
RvProject1.ProjectFile:= ( (ExtractFilePath( Application.ExeName ) + 'Individual.rav'));
RvProject1.Open;
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;
With RvProject1.ProjMan do begin
reporte := FindRaveComponent('Report1.Page1',nil) as TRavePage;
fotorave := FindRaveComponent('JPEGImage1',reporte) as TRavejpegimage;
fotorave.Image.LoadFromFile(RUTAFOTO);
end;
END
ELSE
BEGIN
RUTAFOTO:=( (ExtractFilePath( Application.ExeName ) + 'Fotos\LOGO.jpg'));
FOTO:=TJPEGImage.Create;
FOTO.LoadFromFile(RUTAFOTO);
IMAGE1.Picture.Assign(FOTO);
FOTO.Free;
With RvProject1.ProjMan do begin
reporte := FindRaveComponent('Report1.Page1',nil) as TRavePage;
fotorave := FindRaveComponent('JPEGImage1',reporte) as TRavejpegimage;
fotorave.Image.LoadFromFile(RUTAFOTO);
end;
END;
RvProject1.Execute;
RvProject1.Close;
end;
bueno, deje mi código xq tal vez alguien mas este interesado en hacer lo mismo y no tenga la menor idea de como hacerlo.
Saludos y gracias a los q por lo menos leyeron con la intencion de aportar algo, pero que supongo no saben manejar el Rave al igual que yo.
saludos