Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Вниз

TreeView 


zam   (2002-03-10 15:04) [0]

Народ, подскажите как в TreeView добавить checkbox"ы , причем чтоб можно было выбрать в какой ветке есть checkbox, а в какой нет. Или если кто знает, дайте ссылочку на open source компонентик с похожими функциями.



MBo   (2002-03-10 16:00) [1]

на torry.ru поищи
procedure TForm1.tv1Change(Sender: TObject; Node: TTreeNode);
var
R: TRect;
begin
if pos("2",node.Text)>0 then begin
r:=node.DisplayRect(true);
cb1.left := R.Left+ tv1.Left+8+tv1.canvas.TextWidth(node.text);
cb1.top := R.Top + tv1.top;
cb1.Tag:=node.absoluteIndex;
cb1.Visible := True;
cb1.SetFocus;
end;
end;

procedure TForm1.cb1Change(Sender: TObject);
begin
tv1.Items[cb1.tag].Text:=cb1.Text;
cb1.visible:=false;
end;



zam   (2002-03-11 01:46) [2]

Спасибо большое, все получилось




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.018 c
1-80456           Gayrus                2002-03-08 04:25  2002.03.25  
Кодировка


3-80417           Malder                2002-02-25 22:13  2002.03.25  
Раздача привелегий юзерам


3-80429           new                   2002-02-26 10:35  2002.03.25  
Kak konetktirovat s MSSQL Server chtobi rabotal bistree?


1-80500           DimaIv                2002-03-12 08:54  2002.03.25  
В папке на ряду с другими файлами проекта находится файл


1-80489           BJValentine           2002-03-05 19:05  2002.03.25  
COM - объект