Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2006.05.28;
Скачать: [xml.tar.bz2];

Вниз

TShellTreeView и свойство readonly   Найти похожие ветки 

 
Virtukon   (2006-04-21 13:13) [0]

Здравствуйте.
В D7 есть на вкладке samples компонент TShellTreeView. Достаточно удобная вещь, но вот одного я там не увидел, свойства readonly. Каким способом можно запретить пользователю, щелкая на элементах дерева, изменять их имена?


 
Chlavik ©   (2006-04-21 13:21) [1]

Напиши свою Компоненту - я точно не помню но если он наслеован от TCustomTreeView то можна открыть свойство ReadOnly - просписать го в Published. Потому пишеш функцию RegisterComponent (или Register - смотри F1) и потом install Component в Delphi


 
Virtukon   (2006-04-21 14:03) [2]

Что-то типа такого? или еще что-то надо обязательно сделать?
type
 TMyShellTreeView = class(TShellTreeView)
 published
   property Readonly: Boolean read FReadonly write FReadonly;
 end;

 procedure Register;

implementation

procedure Register;
begin
 RegisterComponents("Samples", [TMyShellTreeView]);
end;


 
Virtukon   (2006-04-21 14:57) [3]

Нашел исходники этого TShellTreeView и немного подправил, теперь всё ок! =) Спасибо!



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

Форум: "Основная";
Текущий архив: 2006.05.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.06 c
3-1144133389
Cybernik
2006-04-04 10:49
2006.05.28
Проблемы с IBQuery. Мистика какая-то..


5-1132555632
Mishenka
2005-11-21 09:47
2006.05.28
Где хранить ImageList?


1-1145630809
Sam Stone
2006-04-21 18:46
2006.05.28
Задача оптимального раскроя


2-1147187480
tigra
2006-05-09 19:11
2006.05.28
Сумма целых чисел от 1 до....


1-1145436571
apl
2006-04-19 12:49
2006.05.28
Добавление компонентов! Подскажите!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский