关于动态创建FastReport报表的问题?

[xinhe007]

TfrView *view;
TfrBandView *band;
TfrPage *page;
frReport1->Pages->Clear();
frReport1->Pages->Add();
page=frReport1->Pages->Pages[0];
band=(TfrBandView *)(frCreateObject(gtBand,""));
band->SetBounds(0,20,0,20);
band->BandType=btMasterData;
band->DataSet="frDBDataSet1";
page->Objects->Add(band);
view=(TfrView *)(frCreateObject(gtMemo,""));
view->SetBounds(20,20,200,20);
view->FrameTyp=15;
view->dx=80;
page->ColCount=2;
page->pgOr=poLandscape;
ShowMessage(page->pgOr);
view->Memo->Add(ADOQuery1->FieldValues["姓名"]);
page->Objects->Add(view);
frReport1->ShowReport();
代码运行没有问,但预览时都所有的Text里都是显示第一条记录.可能是
view->Memo->Add(ADOQuery1->FieldValues["姓名"]);
这一句的问题,请问哪位高手知怎么解决?????

[xinhe007]

FastReport的例子中找了这句v.Memo.Add('[Table1."Company"]');
但这是D语的,怎么翻译成BCB

[xinhe007]

唉.怎么没一个回答,不过小弟自己搞定了.

[chady]

怎样搞定的？

可以研究一下吗？

[houzy123]

我帮你搞定
view->Memo->Add(ADOQuery1->FieldValues["姓名"]);
是将ADOQuery1->FieldValues["姓名"]的姓名:'张三'->送入view的Memo对象中

代码运行没有问,但预览时都所有的Text里都是显示第一条记录.
我的处理如下:
AnsiString c_text;
c_text="["+ADOQuery1->Owner->Name+"."; //frReport1与ADOQuery1在同一frm上时可以不要后面这句{ADOQuery1->Owner->Name+"."}

c_text+=ADOQuery1->Name+".";
c_text+='"';
c_text+="姓名";
c_text+='"';
c_text+="]";

view->Memo->Add(c_text);

[liuliuisme]

我现在也碰到这个问题，请问你是怎么搞定的？