Delphi 标头控件(THeaderControl)中的显示复选框


本文整理自网络,侵删。

 
在Windows Vista或更高版本中,可以在标题控件中显示一个复选框。

将CheckBoxes属性设置为True,以显示标题控件中的复选框。

HeaderControl1.CheckBoxes := True;
将显示复选框的部分的CheckBoxes属性设置为True。
即使THeaderSection的CheckBoxes属性设置为True,如果THeaderControl的CheckBoxes属性为False,也不会显示该复选框。

HeaderSection.CheckBox := True;
可以使用THEaderSection的Checked属性获取并设置复选框的状态。

HeaderSection.Checked := True;
在以下示例程序中,在运行时将一个部分添加到标题中以设置复选框状态。


procedure TForm1.FormCreate(Sender: TObject);
var
  HeaderSection: THeaderSection;
begin
  HeaderControl1.CheckBoxes := True;

  HeaderSection := HeaderControl1.Sections.Add;
  HeaderSection.Text := '软件名称';
  HeaderSection.Width := 120;
  HeaderSection.CheckBox := True;
  HeaderSection.Checked := True;

  HeaderSection := HeaderControl1.Sections.Add;
  HeaderSection.Text := '语言';
  HeaderSection.Width := 120;
  HeaderSection.CheckBox := True;
end;

相关阅读 >>

Delphi trimleft 删除字符串左边的空格

Delphi 判断目录是否可写

Delphi base24编码解码

Delphi xe5 android手机端转换ansi字符串

Delphi textfile utf8编码读写

Delphi 中文字符串函数问题rightstr

Delphi 改变进程优先级

Delphi idsmtp发送邮件

怀念一下这些经常不记得的Delphi代码

Delphi 判断目录是否存在,不存在则创建目录并打开,存在则直接打开

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...