treeview - Компоненты Delphi

cheef · 13.04.2009, 09:00

Мне нужно с помощь кнопок в treeview добавлять дочерние узлы,
аналог new subitem
Я научился добалять вот так TreeView.Items.AddChild(TreeView1.I tems.Item[0], edit1.text);
но мне нужно не к определённому узлу а выбранному свойство select помоему.

Пепел Феникса · 13.04.2009, 09:08

TreeView1.Items.AddChild(TreeView1. Selected,'Дочерний узел');

cheef · 15.04.2009, 07:25

Спасибо.
А можно вопрос не по теме.
Как мне увеличить размер формы по координатам из Edit.
Вот мой исходник.
var s,c:integer;
begin
edit1.Text:=inttostr(s);
form1.Width:=s;
sedit2.Text:=inttostr(c);
form1.Height:=c;
С таким кодом форма разворачивается на весь экран.

cheef · 15.04.2009, 15:18

ещё вопрос по treeview хочу изменть шрифт, цвет, цвет шрифта и тд.
Для шрифта
TreeView1.Items.BeginUpdate;
fontdialog1.Execute then
fontdialog1.Font:=treeview1.font;
TreeView1.Items.EndUpdate;
Для цвета
TreeView1.Items.BeginUpdate;
if colordialog1.execute then
colordialog1.color:=treeview1.color ;
TreeView1.Items.EndUpdate;
ничего не происходит.

13.04.2009, 09:00	#1
cheef Форумчанин Регистрация: 16.03.2009 Сообщений: 205	treeview Мне нужно с помощь кнопок в treeview добавлять дочерние узлы, аналог new subitem Я научился добалять вот так TreeView.Items.AddChild(TreeView1.I tems.Item[0], edit1.text); но мне нужно не к определённому узлу а выбранному свойство select помоему.

13.04.2009, 09:08	#2
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	TreeView1.Items.AddChild(TreeView1. Selected,'Дочерний узел'); Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

15.04.2009, 07:25	#3
cheef Форумчанин Регистрация: 16.03.2009 Сообщений: 205	Спасибо. А можно вопрос не по теме. Как мне увеличить размер формы по координатам из Edit. Вот мой исходник. var s,c:integer; begin edit1.Text:=inttostr(s); form1.Width:=s; sedit2.Text:=inttostr(c); form1.Height:=c; С таким кодом форма разворачивается на весь экран. Последний раз редактировалось cheef; 15.04.2009 в 15:19.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
TreeView	IICuX123	Общие вопросы .NET	9	19.11.2011 01:47
TreeView Help	KWN, lnc	Общие вопросы Delphi	12	03.03.2009 10:34
TreeView	_SERGEYX_	Общие вопросы Delphi	1	01.09.2008 17:29
Treeview	forzi	Помощь студентам	4	04.05.2008 23:50

15.04.2009, 15:18	#4
cheef Форумчанин Регистрация: 16.03.2009 Сообщений: 205	ещё вопрос по treeview хочу изменть шрифт, цвет, цвет шрифта и тд. Для шрифта TreeView1.Items.BeginUpdate; fontdialog1.Execute then fontdialog1.Font:=treeview1.font; TreeView1.Items.EndUpdate; Для цвета TreeView1.Items.BeginUpdate; if colordialog1.execute then colordialog1.color:=treeview1.color ; TreeView1.Items.EndUpdate; ничего не происходит.