delphi 下拉框的style属性改为csdropdownlist时.text属性失效,下面代码如何改可以实现
delphi 下拉框的style属性改为csdropdownlist时.text属性失效,下面代码怎么改可以实现
cbb3.Items.Text := qryDX.fieldByName('F_COMPANY').AsString;
------解决方案--------------------
cbb3.ItemIndex := cbb3.Items.IndexOf(qryDX.fieldByName('F_COMPANY').AsString);
------解决方案--------------------
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;