チェックボックスを表示で使いたい


ポッター  2005-03-11 22:26:59  No: 13703  IP: [192.*.*.*]

チェックボックスを表示として使いたいのですけど
できますでしょうか?

やり方
未チェックのチェックリストボックスに
項目をいくつか書いておきます.

クリックするとその項目の処理を行い。
処理が終わるとチェックを入れて終了します。

ここまでは間単に?
できました.

このチェックボックスのチェックはプログラムが終了するまで
そのままの状態にしておくため、
ユーザーがチェックボックスをクリックして
変更できないようにしたいのですが
可能でしょうか?

編集    削除
にしの  2005-03-11 23:21:11  No: 13704  IP: [192.*.*.*]

パネルの中にチェックボックスを入れて、パネルのEnabledプロパティをFalseにすればできますよ。

編集    削除
無効ではマズイ?  2005-03-11 23:23:35  No: 13705  IP: [192.*.*.*]

チェックされた項目を無効にするだけでいいのなら、

procedure TForm1.CheckListBox1ClickCheck(Sender: TObject);
begin
  with CheckListBox1 do begin
    if Checked[ItemIndex] then ItemEnabled[ItemIndex] := False;
  end;
end;

編集    削除