Printing a picture in the TfrxCrossView

cadsky

I would like print a picture in each row CrossView using OnBeforePrintCell event.

This code not working.

procedure BeforePrintCell(Memo: TfrxCustomMemoView;
    RowIndex, ColumnIndex, CellIndex: Integer;
    const RowValues, ColumnValues, Value: Variant);
begin
  if frxPictureView = nil then
    frxPictureView := TfrxPictureView.Create(Memo.Owner);
  frxPictureView.Parent := Memo.Page;
  frxPictureView.Picture.LoadFromFile('C:\rabit.bmp');
  frxPictureView.Top := Memo.Top;
  frxPictureView.Left := Memo.Left;
  frxPictureView.Height := Memo.Height;
  frxPictureView.Width := Memo.Width;

or using Memo.Draw(?)