Форум: "Основная";
Поиск по всему сайту: 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.024 c
1-80612           valley                2002-03-11 13:34  2002.03.25  
Печать StringGrid a


3-80388           Sewix                 2002-02-23 09:46  2002.03.25  
в чем лучше писать БД


1-80604           fag2000@ok.ru         2002-03-11 13:10  2002.03.25  
Как сделать так чтобы окно появлялось над чужим окном


3-80389           Jony                  2002-02-25 11:09  2002.03.25  
Куда деваются ошибки?


3-80407           fidget                2002-02-26 12:14  2002.03.25  
Объединение 2х баз.