Форум: "Основная";
Поиск по всему сайту: 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.71 MB
Время: 0.033 c
3-80389           Jony                  2002-02-25 11:09  2002.03.25  
Куда деваются ошибки?


1-80615           Reticent              2002-03-11 18:07  2002.03.25  
Проблема с отображением русских букв


1-80618           hooky-mars            2002-03-08 19:36  2002.03.25  
DBNavigator


1-80482           SergM                 2002-03-12 13:08  2002.03.25  
Align 2-х контролов на форме


1-80577           A.H.                  2002-03-10 00:20  2002.03.25  
Градусы