Question

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

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;

获取delphi中的Rave Reports列表

1 个答案: