| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Указатели и структуры ? [D6, Win2k]
BelovV © (2002-12-29 17:37:00)Такой вот вопрос
есть две структуры
CMyList = record
Names: String;
ID: Integer;
end;
CMyProj = record
Types: String;
ProjID: Integer;
...
end;
var
MyList: ^CMyList;
MyProj: ^CMyProj;
Динамически стороится дерево
У каждого элемента есть св-во Data (Pointer)
В зависимости от определенных условий я "присваиваю" св-ву Data тот или иной тип рекорда.
А как в дальнейшем мне определить на какую структуру у меня ссылается указатель Node.Items.Data ?
BelovV (2002-12-29 18:27:00) [1]Спасибо.
Скорее всего я и последую совету vuk-a.
Только правда придется переписать половину программы. :-((
MBo (2002-12-29 18:11:00) [2]>BelovV
CMyList(TreeView1.Selected.Data )^.Names.....
Однако это нехорошо. Обрати внимание на последнее предложение vuk-а - это предоставит неплохой контроль над типами переменных, раз ты сам об этом не позаботился
BelovV (2002-12-29 17:57:00) [3]Ок.
А если я присваиваю значение
TreeView1.Items.Items[i].Data:=@MyList;
т.е. в Data я храню адрес моей переннной
в дальнейшем я проверяю
if TreeView1.Selected.Data = @MyList then
begin
???? А как теперь мне обратиться к полям моей структуры
end;
MBo (2002-12-29 17:40:00) [4]проще всего (в даннном случае) сделать в записи поле, характериэующее тип записи
vuk (2002-12-29 17:40:00) [5]Можно информационное поле завести и в зависимости от его значения интерпретировать указатель должным образом. А можно сделать классы вместо записей и использовать оператор is.
| |
