请问一下Rave控件TRvCustomConnection怎么用啊?
我在我的Form里放了一个TRvCustomConnection 控件和一个TValueListEditor控件,我想要把TValueListEditor里面的值打印到报表里面去,代码如下:
procedure TForm1.RvCustomConnectionTestOpen(Connection: TRvCustomConnection);
begin
Connection.DataRows:=ValueListEditor1.Strings.Count;
end;
procedure TForm1.RvCustomConnectionTestGetCols(
Connection: TRvCustomConnection);
begin
Connection.DoGetCols;
Connection.WriteField('keyex',dtstring,50,'key','1');
Connection.WriteField('valueex',dtstring,50,'value','2');
Connection.WriteField('valueex1',dtstring,50,'value','3');
end;
procedure TForm1.RvCustomConnectionTestGetRow(
Connection: TRvCustomConnection);
begin
Connection.DoGetRow;
Connection.WriteStrData('',ValueListEditor1.Keys[Connection.DataIndex+1]);
Connection.WriteStrData('',ValueListEditor1.Values[ValueListEditor1.Keys[Connection.DataIndex+1]]);
Connection.WriteStrData('','sssss');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
RvProject1.Open;
RvProject1.Execute;
RvProject1.Close;
end;
然后我打开Rave Designer,执行"New Data Object",选择"Direct Data View",最后选择我的Form里的RvCustomConnectionTest对象,这时候Rave Designer自动为我生成的DataView里我只能看到一个字段对象,这个字段对象的名字叫做"FieldName",而且我还没有办法再手工添加新的字段对象!
我尝试着修改我的RvCustomConnection对象的FieldAliasList属性,无论我是把它的值写成:
keyex
valueex
还是写成:
keyex=keyex
valueex=valueex
在我新建"Data View"对象的时候,都是只有一个名为"FiledName"的字段对象!
小弟我实在是搞不懂了,请大家多多帮忙