delphi如何向combobox的items里添加内容？

从问题描述来看，推测可能是 ComboBox 的动态设置问题。

示例代码如下：

procedure TForm1.Button1Click(Sender: TObject)

begin

  ComboBox1.Clear

  ComboBox1.Items.Add('标题1')

  ComboBox1.Items.Add('标题2')

end

运行截图：

做个例子，希望有所帮助。根据要求，首先在Form_Load设置combox的内容，然后点击按钮后添加一项进去。实际上是做了数据的更新。 代码内容private void button1_Click(object sender, EventArgs e)

{

//添加一项，修改内容

List<string>temp1 = (List<string>)this.comboBox1.DataSource

List<string>temp2 = new List<string>()

temp2.Add("请选择")

foreach (string str in temp1)

{

temp2.Add(str)

}

this.comboBox1.DataSource = temp2

} private void Form1_Load(object sender, EventArgs e)

{

//初始化combox选择项，设置选择内容

List<string>comString = new List<string>()

for (int i = 0i <5i++)

{

comString.Add(string.Format("选项{0}", i))

}

this.comboBox1.DataSource = comString

} 结果图示

Combo1.AddItem "要添加的内容"

就可以添加，如果要插入的话，后面可以跟索引值

例如：

Private Sub Command1_Click()

Combo1.AddItem "要添加的内容"

End Sub

点击按钮后，组合框里就多了一个

---