delphi中combobox鍵值對??

2010-09-13 10:46:51|??分類： 默認分類 |??標簽： |字號大中小?訂閱

1.添加鍵值對：

??? cbb1.Items.AddObject(‘顯示的文字‘, TObject(NewStr(’作為值存在的字符串‘)));

2.讀取選中鍵的值

?? ShowMessage(PString(cbb1.Items.Objects[cbb1.ItemIndex])^);

?

實例：從文件中讀取cbbEffect的鍵值對

IniPath := ExtractFilePath(Application.ExeName)+'./effect.ini'; //當前工程路徑下的effect.ini文件
?? str1 := TStringList.Create();
?? str1.LoadFromFile(IniPath);
?? for i:=0 to str1.Count-1 do
?? begin
?????? cbbEffect.Items.AddObject(str1.ValueFromIndex[i],TObject(NewStr(str1.Names[i])));
?? end;

其中，effect.ini的內容如下

0=圖片

1=文字

2=動畫

轉載于:https://www.cnblogs.com/ywangzi/archive/2012/07/18/2596996.html

總結

以上是生活随笔為你收集整理的delphi中combobox键值对的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。