Tengo una serie de informes en ravereport 5.0 y delphi7 y etoy intentando cambiar la imagen del componente bitmap del ravereport en tiempo de ejecuccion.
POr ahora lo que he conseguido por lo menos es que no me falle pero la mala noticia es que no me visualiza nada osea el bitmap vacio.
Lo que hago es lo siguiente:
Código PHP:
With w_Informe.Rv_Clasifica.Projman Do
Begin
w_Informe.Rv_Clasifica.Open;
MiPagina:=FindRaveComponent('Entrenamiento_1.Page1',nil) as TRavePage;
MiBitmap1:=FindRaveComponent('BitMap1',MiPagina) as TRaveBitmap;
ls_Imagen:='';
If OpenDialog1.Execute Then
ls_Imagen:=OpenDialog1.FileName;
If ls_Imagen <> '' Then
MiBitMap1.Image.LoadFromFile(ls_Imagen);
End;
Muchas Gracias por Vuestra Colaboración...