FastReport 中,如何为动态创建的 TfrMemoView 设置 WordWrap 属性?(100分)

  • 主题发起人 主题发起人 Babylon5
  • 开始时间 开始时间
B

Babylon5

Unregistered / Unconfirmed
GUEST, unregistred user!
例如下面的代码片断:
var
mvDataHead : array of TfrMemoView;
begin

// blah blah blah blah,有关设置
// ----------------------------------------
// 下面设置有关的属性
mvDataHead[ i ] := TfrMemoView.Create;
mvDataHead[ i ].Name := 'mvHeader' + IntToStr( i );
mvDataHead[ i ].SetBounds( FLeftMargin + CurrentCol, BandHeadTop,
FColWidths[ i ], 26 );
mvDataHead[ i ].Font.Name := '宋体';
mvDataHead[ i ].Font.Size := 12;
mvDataHead[ i ].Font.Style := [ fsBold ];
mvDataHead[ i ].FrameTyp := 15;
mvDataHead[ i ].Alignment := frtaCenter + frtaMiddle;
mvDataHead[ i ].Memo.Text := FDataSet.Fields[ i ].FieldName;
// 下面这条是无法通过的,代码自动完成中根本就没有 WordWarp 这个属性,编译自然也通不过
mvDataHead[ i ].WordWarp := True;
// 但是,我把这个动态生成的报表另存到一个 .frf 文件中,
// 然后再用 FR 打开,在 FR 的属性检测器里面可以设置其 wordwrap 属性
 
http://delphibbs.com/delphibbs/dispq.asp?lid=1565943
 
谢谢提示,经查看 FastReport 的源代码,
发现是经过 TfrMemoView 的 Prop 属性来设置的
使用下面的代码就可以了:
mvDataHead[ i ].Prop[ 'WordWarp' ] := True;
 
后退
顶部