ComboBoxの高さを変えるには (ID:36923)

名前

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

本文 念のためもうひとつ。 全項目の高さも統一して変更すれば、意図したとおりに動くのでは？と考え、 次のコードも試してみましたが、やはりうまくいきませんでした。 procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin // コンボボックスの全項目の高さを高くする。 for i := - 1 to ComboBox1.Items.Count - 1 do SendMessage(ComboBox1.Handle, CB_SETITEMHEIGHT, i, 16) end;