怎么让TreeView前面显示CheckBox

又做了这个梦

又做了这个梦

2016-02-19 21:30

给自己一点时间接受自己,爱自己,趁着下午茶的时间来学习图老师推荐的怎么让TreeView前面显示CheckBox,过去的都会过去,迎接崭新的开始,释放更美好的自己。

  我的主页: http://www.tommstudio.com/

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)

  下面的代码可以让Treeview前面显示CheckBox.


  const
  TVS_CHECKBOXES = $00000100;
  
  procedure SetComCtrlStyle(WinCtrl: TWinControl; Value: Integer; UseStyle: Boolean);
  var
  Style: Integer;
  begin
    if WinCtrl.HandleAllocated then
    begin
      Style := GetWindowLong(WinCtrl.Handle, GWL_STYLE);
      if not UseStyle then
      Style := Style and not Value
      else Style := Style or Value;
      SetWindowLong(WinCtrl.Handle, GWL_STYLE, Style);
    end;
  end;
  

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)

  然后 在 OnCreate 调用:
  


  SetComCtrlStyle(TreeView1, TVS_CHECKBOXES, True);


  
  或者干脆简单点,一句话完事:
  


  SetWindowLong(TreeView1.Handle, GWL_STYLE, GetWindowLong(TreeView1.Handle, GWL_STYLE) or $00000100);


  
展开更多 50%)
分享

猜你喜欢

怎么让TreeView前面显示CheckBox

编程语言 网络编程
怎么让TreeView前面显示CheckBox

创建一个带有CheckBox的TreeView

编程语言 网络编程
创建一个带有CheckBox的TreeView

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

怎么让网页全屏显示?

Web开发
怎么让网页全屏显示?

TreeView的操作

电脑网络
TreeView的操作

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

javaScript实现checkbox多项选择

Web开发
javaScript实现checkbox多项选择

CheckBox 如何实现全选?

Web开发
CheckBox 如何实现全选?

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

Dreamweaver中如何使用Library

Dreamweaver中如何使用Library

WINDOWS编程技巧之DELPHI篇

WINDOWS编程技巧之DELPHI篇
下拉加载更多内容 ↓