Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TreeView . Text в момент редактирования Ноды. [D6, Win95/98]

Fly` © (2002-06-07 13:49:00)
Уважаемые. Помогите плиз мне изменить редактируемый текст Ноды в момент когда TreeView переходит в состояние редактирования.
То есть у меня есть Node.Text="ффф_12345", и когда пользователь щелкает на Ноду с целью редакции мне надо , чтоб он редактировал поле с текстом "12345".

Fly` (2002-06-07 15:30:00) [1]
Отлично !!! Убедительно благодарю ! :-)

Shaman_Naydak (2002-06-07 15:22:00) [2]
Да, прикольный был вопрос.. Лови гитару
в uses добавишь CommCtrl

procedure TForm1.TreeView1Editing(Sender: TObject; Node: TTreeNode;
var AllowEdit: Boolean);
var S: string;
begin
S:="ПРОБА!";
SendMessage(TreeView_GetEditControl(Node.Handle),WM_SETTEXT, 0, LongInt(S));
end;

Fly` (2002-06-07 14:23:00) [3]
Нароод, плииз ! Очень надо ! Может я где свойство какое упустил ?
Просто по умолчанию втыкнул компонент на форму ничего не меняя и onEditing прописал - а не работат.. :-(

Fly` (2002-06-07 14:06:00) [4]
Вобщем нифига - при создании ноды в DisignMode я ставлю ей текст произвольный. И далее такой код не работает как надо.

procedure TForm1.TreeView1Editing(Sender: TObject; Node: TTreeNode; var AllowEdit: Boolean); begin Node.Text:="EditText"; end;

Да , он меняет Node.Text, это видно по тому , что когда в процессе редактирования я жму ESC , то происходит откат изменений и Text как раз становится "EditText".
И тем не менее редактируемая строка остаётся той, что я вводил в DesignMode... :-(

Song (2002-06-07 13:55:00) [5]
TTreeView.onEditing

Digitman (2002-06-07 13:54:00) [6]
в событиях OnEditing(), OnEdited() читай и устанавливай (если это требуется) св-во Node.Text редактируемого узла нужным тебе образом

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »