Форум: "Основная";
Поиск по всему сайту: 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.045 c
1-80490           BlankAlex             2002-03-12 10:43  2002.03.25  
Обработка OnUpdateError


1-80492           LLL                   2002-03-08 21:04  2002.03.25  
Как показать тревожное окно поверх окон других приложений.


7-80705           rrrrr                 2001-12-25 12:40  2002.03.25  
Запуск программ


3-80414           Максимка              2002-02-13 18:41  2002.03.25  
Access violation в DLL


14-80659          --Reporter--          2002-02-09 21:35  2002.03.25  
Не подскажете, можно ли как нибудь бесплатно позвонить на обычный московский телефон через интернет?