我想做一个查询,对一个数据库的‘部门’和‘工种’两个字段进行查询,用dbedit控件,dbedit.datasource和dbedit.datafield是要根据用户的选择来确定,该如何编程。用户的选择采用groupradio控件确定。

解决方案 »

  1.   

    我想做一个查询,用户可以选择按照‘部门’或者‘工种’两个字段分别查询,准备用一个dbedit控件,根据用户的选择来确定dbedit.datasource和dbedit.datafield的内容,该如何编程。下面的程序中的'bumenname''gongzhongname'是字段名,但系统编译无法通过提示‘bumenname''gongzhongname'为部可是别的字符。
    procedure TForm7.RadioGroup1Click(Sender: TObject);
    begin
      with datamodule2.bumentable do
      begin
      if radiogroup1.ItemIndex=0 then
         dbedit1.DataField:=bumenname
      else
         dbedit1.DataField:=gongzhongname;
      end;
    end;