combobox アイテム追加 (ID:37245)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ボタンを押した場合ですね。 procedure TForm1.Button1Click(Sender: TObject); begin if Edit1.Text <> '' then ComboBox1.Items.Add(Edit1.Text); end;