如何利用Fast Report打印listview控件中的内容？

Question

如题,可否给个例子或源代码看看？谢谢！

Answer 1

你的LISTVIEW的数据也是取数据集编代码添上去的呀，对数据集处理就可以了

Answer 2

问题是我的listview中的数据有时是几个数据集中的数据合成一条记录显示出来给用户看的啊！

Answer 3

TfrReport+TfrUserDataset 就可以实现procedure TShowPersonnel.frReportGetValue(const ParName: String;var ParValue: Variant);
begin
  if AnsiCompareText(ParName, 'Cell1') = 0 then
     ParValue :=ListViewBox.Items[Dataset.RecNo].Caption;
  if AnsiCompareText(ParName, 'Cell2') = 0 then
     ParValue :=ListViewBox.Items[Dataset.RecNo].SubItems.Strings[0];
  if AnsiCompareText(ParName, 'Cell3') = 0 then
     ParValue :=ListViewBox.Items[Dataset.RecNo].SubItems.Strings[1];
end;procedure TShowPersonnel.DatasetCheckEOF(Sender: TObject;
  var Eof: Boolean);
begin
  Eof := Dataset.RecNo >= ListViewBox.Items.Count;
end;注意：如果ListView中的记录是''的一定要补个空格，不然会报错