Скачать: CL | DM;

TreeView   Найти похожие ветки 

← →
I/O ©   (2002-03-10 00:45) [0]

F1 Мне! Столкнулся впервые с TreeView. Как при выборе какой-то ветки
в Memo записать коментарий к ней. Таких веток около 80 шт.

---

← →
lipskiy ©   (2002-03-10 01:08) [1]

Недавно в конфе это было, поищи.
Не найдешь - пиши.

---

← →
I/O ©   (2002-03-10 01:37) [2]

> lipskiy

Там чего-то не то. Мне говорили что надо использовать
Item.Data. Но как? Как туда загнать всю инфу и что бы exe`шник небыл с "гигобайт:)"

---

← →
lipskiy ©   (2002-03-10 02:01) [3]

Ну да, есть и такой способ, более уобный.
Попробую выдрать только необходимое из своего кода:

type
PntRec = ^TRec;
TRec = record
// список параметров, которые надо хранить в данной ноде, например:
Str:String;
end;
var
RecPtr: PntRec;

Дальше пишется своя процедура добавления новой ноды, в ней:

New(RecPtr);
RecPtr^.Str:= "...";
TreeView1.Items.AddObject(nil{или нода}, Caption, RecPtr); // или
TreeView1.Items.AddChildObject(Node, Caption, RecPtr);

Обратиться к параметру при выборе ноды можно так:
PntRec(Node.Data)^.Str:= "...";

В Destroy не забудь удалить все указатели через Dispose.

---

← →
I/O ©   (2002-03-10 10:24) [4]

Чего-то я совсем не понимаю :(
Можно подробнее? А такой вопрос:
Имеется запись:
type
<имя типа> = record
<А> : <integer>;
...
<В> : <тип>;
end;

Можно ли в "B" записывать многострочный текст(возможно,что более 255 символов)?

---

← →
I/O ©   (2002-03-10 11:12) [5]

А как должна выглядеть НОДА?
Тут процедуры хотят что бы я их ввёл, а как я не знаю

---

← →
Song ©   (2002-03-10 12:00) [6]

Ты бы сформулировал вопрос попонятненй, тебе бы уже не один десяток человек ответили бы...
Ты хочешь так: нажимаешь на ветку в дереве, появляеся TMemo, где ты вводишь комментарий, а потом комментарий помещается в туже ветку?
Тип String может вмещать более 255 символов.

---

← →
I/O ©   (2002-03-10 12:46) [7]

> Song

Нет. Я хочу так:
На форме есть TreeView и Memo.
Я нажимаю на ветку и в Memo отображается комментарий.
Что-то вроде хинта, только коментарий большой и в Memo.
Т.е. коментарии уже где-то хранятся.

---

← →
Song ©   (2002-03-10 12:54) [8]

обрабатывай onMouseDown
TreeView1.Selected - ветка выделенная в момент нажатия
а вот где комментарии хранить... Интересный вопрос, можно было бы по номеру ветки, но если вставишь ветку, то всё сдвинется. Можно по какому индивид. номеру, если таковой есть в названии ветки.
Можно ещё так: у каждой ветки, есть подветвь, которая будет содержать этот комментарий.
Вообщем, выбирай.

---

← →
Набережных С.   (2002-03-10 14:01) [9]

Это?

TreeView.Items[1].Data:=StrAlloc(Length("Мои комментарии")+1);
StrPCopy(TreeView.Items[1].Data,"Мои комментарии");

procedure ...TreeViewChange(...
begin
if TTreeView(sender).Selected <> nil then
Memo.Lines.Text:=PChar(TTreeView(sender).Selected.Data)
else
Memo.Lines.Text:="";
end;

Только не забудь:

StrDispose(TreeView1.Items[1].Data);


---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.006 c