【结贴】combobox的onChange事件不可用**

zhdkelly

combobox的onChange事件没有触发！！！还有什么地方需要设置吗？

zfang

怎么没有触发呢？

zfang

控件（拷贝到一个功能窗体上）
object ComboBox1: TComboBox
  Left = 160
  Top = 144
  Width = 145
  Height = 20
  ItemHeight = 12
  TabOrder = 0
  Text = 'ComboBox1'
  OnChange = ComboBox1Change
  Items.Strings = (
    '1'
    '2'
    '3'
    '4'
    '5')
end


代码
procedure TMainForm.ComboBox1Change(Sender: TObject);
begin
  Dialogs.ShowMessage(ComboBox1.Text);
end;

然后你运行，看看是不是都触发了？

zhdkelly

object ComboBox2: TComboBox
  Left = 600
  Top = 5
  Width = 112
  Height = 20
  Style = csDropDownList
  ItemHeight = 12
  TabOrder = 5
  OnChange = ComboBox2Change
  OnSelect = ComboBox2Select
  Items.Strings = (
    'yh'
    'gd')
end
=================================================
真的是触发不了，调试根本就不进去

zfang

那还真奇怪了，我把你的这个控件拷贝到我的功能中可以呀
你看我的完整功能（studio--业务资源管理器中--拷贝到你的空间中）

zhdkelly

另外换了个combobox就好了，谢谢