delphi 关于 `addobject` 字符串的使用

最新推荐文章于 2021-08-27 16:36:33 发布

wnjnfn

最新推荐文章于 2021-08-27 16:36:33 发布

阅读量526

点赞数

分类专栏： Delphi 文章标签： delphi

本文链接：https://blog.youkuaiyun.com/wnjnfn/article/details/107537279

版权

Delphi 专栏收录该内容

9 篇文章

订阅专栏

本文详细介绍了在Delphi中如何使用ComboBox控件的AddObject方法来添加带有对象的数据项。通过实例展示了如何在点击按钮时，向ComboBox添加特定字符串，并在另一个按钮点击时，从选定项中获取存储的对象数据。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

delphi 关于 `addobject` 字符串的使用

procedure TForm1.Button1Click(Sender: TObject);
begin
	cbb1.Items.Clear;
	cbb1.Items.AddObject('Iteam2',TObject(NewStr('a1')));
	cbb1.Items.AddObject('Iteam2',TObject(NewStr('a2'))); 
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
	Edit1.Text := pstring(cbb1.Items.Objects[cbb1.ItemIndex])^;
end;