4D Japan Knowledge Base

グループ中のチェックボックスをすべて自動的に選択するか外す方法

同時にグループ中のチェックボックスをすべてチェックするか外すチェックボックス上のクリック中にコントロールかコマンドキーのためにわなに掛けることは可能です。これは4Dの中のオブジェクトプロパティダイアログでのイベントリストへの同様の振る舞いです。この例において、「CheckBox1」はチェックボックスおよび「ChecksOn」の変数名です。また、「ChecksOff」はグループの中で関連するチェックボックスの値を単にセットする2つのプロジェクトメソッドです。

注:Macintoshについては、次のものに第1のラインを変更してください:

If (Macintosh command down)


Object Method for CheckBox1:

If (Windows Ctrl down)
ﾊ Case of
ﾊ ﾊ: (CheckBox1=0)
ﾊ ﾊ ﾊCheckBox1:=1 `check the box if the box is unchecked
ﾊ ﾊ ﾊchecksoff `unchecks all boxes
ﾊ ﾊ: (CheckBox1=1)
ﾊ ﾊ ﾊCheckBox1:=0 `uncheck the box if the box is checked
ﾊ ﾊcheckson `checks all boxes
End case
End if

For every checkbox simply copy and paste this code and change the variable name, for example -

Object Method for CheckBox2:

If (Windows Ctrl down)
ﾊCase of
ﾊ ﾊ: (CheckBox2=0)
ﾊ ﾊ ﾊCheckBox2:=1 `check the box if the box is unchecked
ﾊ ﾊ ﾊchecksoff `uncecks all boxes
ﾊ ﾊ: (CheckBox2=1)
ﾊ ﾊ ﾊCheckBox2:=0 `uncheck the box if the box is checked
ﾊ ﾊcheckson `checks all boxes
End case
End if

Also, make sure that in the properties for each check box, the "on click" event is checked.


Create two project methods, ChecksOff and ChecksOn:

ChecksOff method

CheckBox1:=0
CheckBox2:=0
CheckBox3:=0
CheckBox4:=0
CheckBox5:=0

ChecksOn method

CheckBox1:=1
CheckBox2:=1
CheckBox3:=1
CheckBox4:=1
CheckBox5:=1