delphi 下拉框问题

Posted 2023-03-21

数据库数据绑定给下拉框！但我想通过下拉框里的text 内容设置itemindex(默认选项),我用ombobox.itemidex := combobox.Items.indexof(combobox.text)。就是不行，打印combobox.Items.indexof(combobox.text)总是-1，请大家帮帮忙！

那一定是你combobox.text没有包含在下拉列表数据那里，你是否有用combobox.items.add('你的数据')？
我做了个DEMO是完全可以的，仅供参考：
procedure TForm1.Button1Click(Sender: TObject);
begin
ComboBox1.Items.Add('A');
ComboBox1.Items.Add('B');
ComboBox1.Items.Add('C');
ComboBox1.Items.Add('D');
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ComboBox1.Text := 'C';
ComboBox1.ItemIndex := ComboBox1.Items.IndexOf(ComboBox1.Text);
ShowMessage(IntToStr(ComboBox1.ItemIndex));
end; 参考技术A 写个函数，对combobox.Items做个循环，text 内容与某项的内容相同，则返回其index值，然后再：

combobox.itemidex :=该 index值就行了。不用给你写代码吧。 参考技术B combobox.text默认值你设置了吗？