Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.11;
Скачать: CL | DM;

Вниз

Про 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;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.041 c
3-1117687243
john_mag
2005-06-02 08:40
2005.07.11
обработчик MouseToCall


8-1110140982
имя
2005-03-06 23:29
2005.07.11
сохранить из Image1 в DLL


14-1118750090
ANB
2005-06-14 15:54
2005.07.11
Что ленивее всего делать при работе в делфе ?


11-1101977494
mdw
2004-12-02 11:51
2005.07.11
Обновление TKOLmdvXLGrid и TKOLmdvDBF


3-1117609080
Ярослав
2005-06-01 10:58
2005.07.11
ошибка Refresh ADODataSet





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