我实现了动态绑定控件
procedure Tfrm_record_view.wwRecordViewPanel1AfterCreateControl(
Sender: TObject;
curField: TField;
Control: TControl);
var sFieldName:TStringList;
i,count:integer;
begin
try
sFieldName := TStringList.Create;
count:=ExtractStrings([','],[],pchar(info_com.gSysInfo.sFieldNames),sFieldName);
for i:=1 to countdo
begin
CombBonds(sFieldName[0],sFieldName);
end;
sFieldName.Free;
except
sFieldName.Free;
end;
end;
procedure Tfrm_record_view.CombBonds(tablename,sField:string);
var wwDBComb:TwwDBComboBox;
begin
wwDBComb:=TwwDBComboBox.Create(wwRecordViewPanel1);
with wwDBCombdo
begin
Parent:=wwRecordViewPanel1;
DataSource:=wwRecordViewPanel1.DataSource;
DataField:=sField;
Top:=-999;
info_com.FillwwDBComboBox(wwDBComb,tablename,sField);
end;
end;
但是存在一个问题，就是绑定后生成后的wwDBComb仍然显示在页面上，所以我加了Top:=-999,隐藏，这个当然是折中方案，我觉得肯定是我哪里设置有问题，研究了很长时间仍然没有解决。
如果大侠们又别的解决方案，可以贴出来共享一下。
