チェックボックスについて

解決

風太 2005-06-02 16:27:37 No: 15292 IP: 192.*.*.*

ページコントロールの中の二つのページにチェックボックスを設定していますが
一つのチェックボックスをいじるとほかのページのチェックボックスも同じく
変わる（双方向に変えたい）ようにしたいのですがオブジェクトインスペクタ
で設定できませんか。
よろしくお願い致します。

編集削除

通り過ぎた 2005-06-02 16:40:56 No: 15293 IP: 192.*.*.*

CheckBox1とCheckBox2があったとして、適当にCheckBox1のCheckイベントに

procedure TForm1.CheckBox1Click(Sender: TObject);
var
   B : Boolean;
begin
  B := TCheckBox(Sender).Checked;
  CheckBox1.Checked := B;
  CheckBox2.Checked := B;
end;

とか書いて、あとは、CheckBox2のCheckイベントをオブジェクトインスペクタでCheckBox1Clickにしてやればいいのでは？

編集削除

風太 2005-06-03 09:09:58 No: 15294 IP: 192.*.*.*

たすかります。どうもありがとうございました。

編集削除