VPF::TTreeView ограничение на размер текста в узле

Delphist

Дата 20.11.2006, 15:47 (ссылка)

(нет голосов)

Загрузка ...

Delphist Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: 2
Всего: 3

Как в компоненте TTreeView задать ограничение на длину имени узла.

--------------------

ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...

_hunter

Дата 20.11.2006, 16:34 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98

в нем -- никак. это нужно делать в месте получения текста.

P.S.
странный вопрос...

--------------------

Tempora mutantur, et nos mutamur in illis...

Sunvas

Дата 20.11.2006, 19:01 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89

Написать наследника с таким свойством.

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

Лучезарный

Дата 29.11.2006, 13:58 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 29.11.2006

Репутация: нет
Всего: нет

если правильно понял, то вот так... smile

Код


procedure TForm1.tvKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
const
  MAXLEN = 10;  
begin
  if (Sender.ClassName = 'TTreeView') then
    if (TTreeView(Sender).Name = 'tv') and (TTreeView(Sender).IsEditing) then
      SendMessage(tv.Perform(TVM_GETEDITCONTROL, 0, 0), EM_SETLIMITTEXT, MAXLEN, 0);
end;

Это сообщение отредактировал(а) Лучезарный - 29.11.2006, 14:03

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »