SpeedButtonのDownでOnＯｆｆをするには？ (ID:26174)

名前

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

本文 igyさん、ありがとうございます。 AllowAllUpをTRUEにして、GroupIndexを１にして、下記のようにしていますが 凹み状態にもなりません。 procedure TForm1.SpeedButton1Click(Sender: TObject); begin if SpeedButton1.Down= false then SpeedButton1.Down:=true else SpeedButton1.Down:=false; end; 何か初歩的な設定を忘れているのでしょうか？ よろしくお願いします。