TfrPictureView question
lazarus / 39-Graphics

----------------------------------------------------------------------
xinyiman · 2012-07-26 08:37

In LazReport I want to center an image inside the component
TfrPictureView. Who can tell me how? Plus I want to assign them:
AllFrames line

----------------------------------------------------------------------
xinyiman · 2012-07-26 08:46

My Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  Foto : TfrPictureView;
begin
  frReport1.Pages.Clear;
  frReport1.Pages.Add();
  Foto := TfrPictureView.Create;

  Foto.width  := 100;
  Foto.Height := 100;
  Foto.Left   := 10;
  Foto.Top    := 40;
  Foto.Stretched:=true;
  Foto.Picture.LoadFromFile(Application.Location + 'app.bmp');
  frReport1.Pages[0].Objects.Add(Foto);

  frReport1.ShowReport;
end;