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

Вниз

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

 
<Lelik>   (2005-06-21 18:08) [0]

Здраствуйте, программеры!
Вот такой наверно простой вопрос.
Есть список TStrings SList1 с объектами.
Затем создается TreeView TView1, содержащий значение некоторого поля списка SList1 и ссылку на сам объект SList1
Спискок SList1 формируется как
type
PObj = ^Obj
Tobj = class
id : integer;
...
des: string
end;
obj1 : TObj
SList1.AddObject("", obj1)

Формирование TView1:
child := Items.AddChildObject(nil, TObj(Slist.Objects[i]).Des, SList.Objects[i]);
child : TTreeNode;

затем пытаюсь получить доступ
k : integer;
k := PObj(child.Data)^.id
Ошибка!
Подскажите пожалуйста, что не так.


 
-=XP=- ©   (2005-06-21 18:18) [1]

Что это такое: PObj = ^Obj
В Delphi все объектные переменные - суть ссылки.
k := TObj(child.Data).id;

P.S. Давайте переменным, методам и пр. вразумительные имена.


 
<Lelik>   (2005-06-21 18:21) [2]

Спасибо!



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

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

Наверх




Память: 0.44 MB
Время: 0.387 c
4-1116013371
Kolan
2005-05-13 23:42
2005.07.11
Как получить Handle активного edit а (не моего).


3-1117430946
pavel_guzhanov
2005-05-30 09:29
2005.07.11
Сжатие картинки jpeg при помещении ее в базу


1-1118691709
Tigraman
2005-06-13 23:41
2005.07.11
Непрямоугольные края формы


1-1118440251
KOLIG
2005-06-11 01:50
2005.07.11
Упаковка файлов


1-1119452828
Суслик
2005-06-22 19:07
2005.07.11
Фокус при выводе диалоговых окон в MDI приложениях





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский