掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
RadioGroupで特定の項目を選択できない状態にするには？ (ID:23404)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんなのとか？ procedure RadioGroupButtonEnableChange( RadioGroup: TRadioGroup; Index: Integer; Enabled: Boolean); var i: Integer; caption: String; begin caption := RadioGroup.Items[Index]; for i := 0 to RadioGroup.ControlCount -1 do begin if RadioGroup.Controls[i] is TRadioButton then begin if TRadioButton(RadioGroup.Controls[i]).Caption = caption then begin TRadioButton(RadioGroup.Controls[i]).Enabled := Enabled; end; end end; end; 例） procedure TForm1.SpeedButton1Click(Sender: TObject); begin RadioGroupButtonEnableChange(RadioGroup1, 0, not SpeedButton1.Down); end; Delphian World にそういうコンポーネントあった気もする。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.