delphi中combox怎么用

Posted 2023-04-13

我要写一个很小的定时器，让combox控件的数字显示在标签上，只能是用items的判断吗？还有别的办法？
只能是这样：if combox1=1 then
label1.caption:='1'
.......
if combox1=59 then
label1.caption:='59'
这样不是很烦吗？
难道如果很多还是只能判断啊，有没有别的办法？
望大侠教我一下，谢谢 在线等

如果你的标签显示的内容，跟combox里的内容一致，那就如上面两位所说的就行了 label1.caption:=combox1.Text
如果显示的不一致，比如说，当combox为1时，标签显示“您好”，当combox为2时，标签显示“早上好”，这种情况就只能够一个一个写了。不过可以用 case of 代替 if 比较直观易读一点。 参考技术A ComboBox1的OnChange事件里设置ComboBox2的内容
ComboBox2的OnChange事件里设置Edit1的内容
1 .valueField:"valuefield"//value值字段
2.displayField："field" //显示文本字段
3.editable：false//false则不可编辑，默认为true
4.triggerAction:"all"//请设置为"all",否则默认为"query"的情况下，选择某个值后，再此下拉时，只出现匹配选项，如果设为"all"的话，每次下拉均显示全部选项. 参考技术B 两种方式
方式一：
定义 astrLabel: array[1..59] of string = (
'1',
'2',
...
'59'
);

label1.caption := astrLabel[combox1.itemindex];

方式二：
利用
combobox1.Items.AddObject(Item:string; Object: TObject);
将你要的数据封装到Object中

label1.caption := (combobox1.items.objects[combobox1.itemindex] as TMyClass).strValue; 参考技术C combox控件的数字是什么意思？

直接 label1.caption:=combox1.Text 不行么?本回答被提问者采纳 参考技术D 如果你是要显示combox的item编号，那可以这样写
label1.caption:=inttostr(conbox1.itemindex);
如果是显示内容： label1.caption:=combox1.Text

WINFORM选择combox的当前行

COMBOX的ITEMS里打了很多行的内容，用COMBOX.TEXT和数据库行做比较感觉是COMBOX里的所有内容都比较了。。。我只要COMBOX选中的那一行的字符串来做比较，应该怎么做？

combbox的选中值，就是 combbox.Text

你还是把你的代码贴出来吧 参考技术A this.combox.selectedItem.toString();

this.combox.selectValue.toString();

试试看