ComboBoxの使用方法
次に選択または入力されている値を取得します。 [値を表示]のOnClickイベントで次のように記述します。
procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(ComboBox1.Text); end;