{
CheckBox chk = new CheckBox()
chk.Text = "testall" // 这里可以换成数据库的内容
chk.CheckedChanged += new EventHandler(chk_CheckedChanged)
chk.AutoPostBack = true
Page.Form.Controls.Add(chk)
for (int i = 0i <10i++)
{
CheckBox chk2 = new CheckBox()
chk2.Text = "test" + i.ToString() // 这里可以换成数据库的内容
chk2.Checked = (i % 3 == 0)// 这里可以换成数据库的内容
Page.Form.Controls.Add(chk2)
}
}
void chk_CheckedChanged(object sender, EventArgs e)
{
CheckBox all = sender as CheckBox
foreach(Control ctl in Page.Form.Controls)
{
if (ctl is CheckBox)
{
CheckBox chk = ctl as CheckBox
chk.Checked = all.Checked
}
}
}
方法1:直接设定PROMPT列和数据列ITEM的VISIBLE属性为No方法2:在WHEN-NEW-FORM-INSTANCE触发器里:
l_old_itm := :system.cursor_item
-- 转到你要删除的ITEM上
go_item('BLOCK.ITEM')
-- 调用标准api隐藏当前列
APPL_FOLDER_DEL_FLD
go_item(l_old_itm)
Troubleshooting
下列情况下不能被隐藏
1. 当FOLDER ITEM属性REQUIRED设为TRUE的时候不能被隐藏。
2. 当FOLDER ITEM被放置在FIXED画布上(非堆叠画布)时,该项不能被隐藏。