Delphi Trick 007 – CheckBox in TreeView

AR : كيفية دمج خانة الاختيار في طريقة عرض الشجرة
FR : Comment intégrer checkbox dans Treeview
AN : How to integrate checkbox into Treeview
ES : Cómo integrar checkbox en Treeview
RS : Как интегрировать флажок в Treeview
AL : Wie man Checkbox in Treeview integriert

Rad Studio Delphi TreeView Items Selected CommCtrl TTVItem Mask TVIF_STATE hItem Node ItemId
SetWindowLong(TreeView1.Handle, GWL_STYLE, GetWindowLong(TreeView1.Handle, GWL_STYLE) or TVS_CHECKBOXES)

Download project : https://drive.google.com/open?id=1Hb6OpSv-qRCEFk69B3ZbyfFhSrzpDQ8h