取得下列框(ComboBox)的 索引值,内容(文本),全部内容值,的方法

一、取用户选取的索引值

              MessageDlg(IntToStr(ComboBox1.ItemIndex),mtError,[mbok],1); 

                  ComboBox1.ItemIndex     -1，为未选取；

                                                                 0，为第一项；

                                                                 1，为第二项；.

                                                                     ....................

二、取用户选取项内容（文本）

              MessageDlg(ComboBox1.text,mtError,[mbok],1); 

 三、取全部项的值，无论用户选技哪项

             MessageDlg(ComboBox1.Items.Text,mtError,[mbok],1);

             MessageDlg(ComboBox1.Items.GetText,mtError,[mbok],1);

四、取子项的个数（count）

             MessageDlg(IntToStr(ComboBox1.Items.Count),mtError,[mbok],1);

五、禁止修ComboBox的内容，只允许用户选择提供的item选项，不允许自己修改text属性

             可以有两种方式  
                   1、Combobox1.Style:=csDropDownList;  
                   2、属性Style还是基本的csDropDown，但需要在OnClick事件中对输入键值进行转化，如下：Key:=#0;

六、程序控制选取哪一项

              1、ComboBox1.ItemIndex:=StrToInt('2');
   

               2、ComboBox1.ItemIndex:=StrToInt(FieldbyName('Tel_class').AsString)

七、程序中添加项，并选取的方法
                       combobox1.Items.Insert(0,'请选择...');  
                                combobox1.ItemIndex:=   0;