delphi - 获取 Delphi 中的 Rave Reports 列表

Question

我有一个包含少量报告（4 到 6）的 Rave 报告项目，我想将它们添加到组合框中，以便用户可以选择他想要使用的报告。如何获取我进入 Rave Report Project 的报告列表并将其传递给组合框。

procedure TForm1.Button4Click(Sender: TObject);
var
 i: Integer ;
 list : TStrings;
begin
   RvProject1.GetReportList(list,True)   ;
        for i := 0 to list.Count - 1 do

    ComboBox1.AddItem(list[i],nil);
end;

我试过这个，但它不起作用，我得到一个Access Violation at adress...错误。任何人都可以帮助我解决问题吗？

Answer 1

我找到了我的解决方案。我必须创建一个list传递给该GetReportList方法的字符串列表的实例：

procedure TForm1.Button4Click(Sender: TObject);
var
  list: TStringList;
begin
  list := TStringList.Create;
  try
    RvProject1.GetReportList(list, True);
    ComboBox1.Items.Assign(list);
  finally
    list.Free;
  end;
end;