请问如何动态设置DBEdit的DataSource属性呢?

Question

Combobox1中存储了当前窗口上所有TDataSource的名字
当Combobox1.onchange的时候,如何将选中的当前combobox1.text对应的TDataSource属性赋值给     DBEdit控件呢?
谢谢各位!

Answer 1

  DBEdit1.DataSource := TDataSource(FindComponent(Combobox1.Text));

Answer 2

dbedit1.datasource:=combobox1.text;
你的combobox1的样式是csdropdown的话，这样就可以如style为csdropdownlist的话
dbedit1.datasource:＝combobox1.Items[combobox1.itemIndex]

Answer 3

DBEdit1.DataSource := TDataSource(FindComponent(Combobox1.Text)); 

Answer 4

  for i:=0 to ComponentCount-1 do
  begin
    if Components[i] is TDataSource then
    if Components[i].Name=ComboBox1.text then
    begin
      DBEdit1.DataSource:=nil;
      DBEdit1.DataSource:=TDataSource(Components[i]);
    end;
  end;
自己弄好了,感谢各位的关注!