delphi怎么写选择combobox的items的选项来触发各个选项对应的事件,这该怎么写啊。

delphi怎么写选择combobox的items的选项来触发各个选项对应的事件,这该怎么写啊。,第1张

选择combobox的items的选项来触发各个选项对应的事件,可以尝试以下示例代码:

procedure TForm2.Button1Click(Sender: TObject)

begin

  ComboBox1.ItemIndex := 3//选择combobox的第4个选项

  ComboBox1Change(Self) //触发事件

end

procedure TForm2.ComboBox1Change(Sender: TObject)

begin

  ShowMessage(ComboBox1.Items[ComboBox1.ItemIndex])

end

把Autocomplete设置为False

然后在OnKeypress事件中,自己实现自动补充功能

=======================================================

问题补充:明显还是不行,我已经试过了。只是没有说而已。。

我晕,二楼的,还是不行啊。你说的ONKEYPRESS里面实现自动补充功能,我用的语句是这样:combobox1.autocomplete:=true

还是会出现一样的效果。

我的意思并不是再去设置AutoComplete,而根据当前的Text,去查找所有的Item,如果查找到就补全。也就是自己用代码实现被全。


欢迎分享,转载请注明来源:夏雨云

原文地址:https://www.xiayuyun.com/zonghe/64908.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-02-28
下一篇2023-02-28

发表评论

登录后才能评论

评论列表(0条)

    保存