mudar propriedades de um Bitmap component do Rave via codigo
Boa Tarde,
Gostaria de saber como mudo alguma propriedade do Bitmap component que esta no projeto do .RAV de dentro do Delphi via linha de código. Ex.: mudar a propriedade ´image´
Gostaria de saber como mudo alguma propriedade do Bitmap component que esta no projeto do .RAV de dentro do Delphi via linha de código. Ex.: mudar a propriedade ´image´
Carlos_tedex
Curtidas 0
Respostas
Carlos_tedex
20/01/2006
declarar na uses: RVCsStd, RvProj, Rvclass
Ex.:
procedure TFrmRelLaboratorio.FormCreate(Sender: TObject);
Var
Pagina :TRavePage;
Logo :TRaveBitmap;
begin
RvProject1.SetProjectFile(ExtractFilePath(Application.ExeName) + ´Rel_Laboratorio´);
RvProject1.Open;
Pagina := RvProject1.ProjMan.FindRaveComponent(´REPORT1.PAGE1´,nil) as TRavePage;
Logo := RvProject1.ProjMan.FindRaveComponent(´Bitmap1´,Pagina) as TRaveBitmap;
Logo.Image.LoadFromFile(ExtractFilePath(Application.ExeName) + ´..\Imagens\LogoCli.BMP´);
RvProject1.Execute;
RvProject1.Close;
Ex.:
procedure TFrmRelLaboratorio.FormCreate(Sender: TObject);
Var
Pagina :TRavePage;
Logo :TRaveBitmap;
begin
RvProject1.SetProjectFile(ExtractFilePath(Application.ExeName) + ´Rel_Laboratorio´);
RvProject1.Open;
Pagina := RvProject1.ProjMan.FindRaveComponent(´REPORT1.PAGE1´,nil) as TRavePage;
Logo := RvProject1.ProjMan.FindRaveComponent(´Bitmap1´,Pagina) as TRaveBitmap;
Logo.Image.LoadFromFile(ExtractFilePath(Application.ExeName) + ´..\Imagens\LogoCli.BMP´);
RvProject1.Execute;
RvProject1.Close;
GOSTEI 0