delphi 下拉框的style属性改为csdropdownlist时.text属性失效，下面代码如何改可以实现

2012-06-09

delphi 下拉框的style属性改为csdropdownlist时.text属性失效，下面代码怎么改可以实现cbb3.Items.Text :

delphi 下拉框的style属性改为csdropdownlist时.text属性失效，下面代码怎么改可以实现
cbb3.Items.Text := qryDX.fieldByName('F_COMPANY').AsString;

[解决办法]
cbb3.ItemIndex := cbb3.Items.IndexOf(qryDX.fieldByName('F_COMPANY').AsString);
[解决办法]

Delphi(Pascal) code

var i:integer;    s:string;begin   s:=qryDX.fieldByName('F_COMPANY').AsString;   i:=cbb3.Items.IndexOf(s);   if i>-1 then cbb3.ItemIndex:=i   else showmessage('你的下拉框没下啦内容哦！');end;