Combobx值得添加和获取

来源:互联网 发布:免费外汇行情软件 编辑:程序博客网 时间:2024/05/16 09:43
ComboBox1.AddItem(FieldByName('College_Name').AsString,TObject(NewStr(FieldByName('College_ID').AsString)));
ShowMessage(Pstring(ComboBox1.Items.Objects[ComboBox1.ItemIndex])^);
ShowMessage(ComboBox1.Items.Strings[ComboBox1.ItemIndex]);