獲取delphi中的Rave報告列表

Question

我有一個Rave Report Project，其中包含少量報告（4到6），我想將它們添加到組合框中，以便用戶可以選擇他要使用的報告。 我如何獲取進入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...遇到了Access Violation at adress...錯誤。 有人可以幫助我解決問題嗎？

Answer 1

我找到了解決方案。 我必須制作一個傳遞給GetReportList方法的list字符串列表的實例：

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;