トグルボタンはありますか？

解決

takk 2003-07-30 19:27:22 No: 4270

はじめまして。
最近Delphiを始めたDelphi初心者です。

早速なんですが、Delphiにはトグルボタンのコントロールはありますでしょうか？
VBのようにチェックボックスのStyleを変えるのかな、と思ったんですが
そのようなプロパティも見当たらないので……。

もしご存知の方がいましたらよろしくお願いいたします。

環境：Windows 2000 SP3、Delphi 6 Personal

にしの 2003-07-30 20:18:59 No: 4271

チェックボックスの名前が、CheckBox1であれば、

SetWindowLong(CheckBox1.Handle, GWL_STYLE, GetWindowLong(CheckBox1.Handle, GWL_STYLE) or BS_PUSHLIKE);

でできます。

takk 2003-07-30 20:57:50 No: 4272

にしのさん、ありがとうございます。
おかげで上手くいきました！

Delphiに関してはまだ初心者なのでまた質問させて頂くと思いますが
これからもよろしくお願いしますm(_ _)m