| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TreeView - Help [D5]
Makuha © (2002-07-13 12:57:00)Привет всем.
Встала проблемка работы с деревом типа TreeView.
Может кто закинет примерчи как это делать?
Не могу заставить прогу добавлять, удалять узлы
и вносить в указанный узел данные.
Помогите...
valera@srg.cscd.lviv.ua
ПИТОН (2002-07-16 16:20:00) [1]http://www.delphikingdom.com/helloworld/dbtreeview.htm
Makuha (2002-07-16 16:05:00) [2]Ок. Мне понравилось.
Есть такая задача. Хранить многоуровневый словарь в базе.
Как и что хранить в базе? И как это отображать с помощью
TreeView?
TTCustomDelphiMaster (2002-07-13 14:17:00) [3]unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ComCtrls;
type
TForm1 = class(TForm)
TreeView1: TTreeView;
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
TreeView1.Items.Add(TreeView1.Selected, TimeToStr(Now()));
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
TreeView1.Items.AddChild(TreeView1.Selected, TimeToStr(Now()));
end;
end.
| |
