Что в этом коде может быть не так ... почему отказываеться работать...

class TMyObject
{
public:
int obj_id;
//TObjectType obj_type;
};

class TNamedObject: public TMyObject
{
public:
AnsiString obj_name;
};

struct TNodeData {
TMyObject Data;
} *PNodeData;

// Begin
for (int ii=0;ii<3;ii++)
{
tmpNode = Tree->AddChild(NULL);
TNamedObject *root_obj = new TNamedObject;
root_obj->obj_id = -1;
root_obj->obj_name = "ЧЧЧЧЧЧЧ";
// Приведение типов
dynamic_cast <PNodeData>(Tree->GetNodeData(tmpNode));
// или
((PNodeData*)Tree->GetNodeData(tmpNode))
}
//end.

Выдают ошибку о том что нифига не могут найти такой класс...

Спотыкаеться на одной из строчек выделенных черным...

Походу я что то не то со структурой намутил!.

Почему

struct TNodeData {
TMyObject Data;
} *PNodeData;

не дает возможности определить переменную как PNodeData *tmpNodeData?

никогда не использовал структуры, всегда обходился классами, но тут вот вышла такая ситуация ... Отвратительно.

roman10

Изначально зачада звучит так ... Перевести текст написанный на Дельфях в текст написанный на Си++

TMyObject = class(TObject)
public obj_id : Integer;
obj_type : TObjectType;
end;

TNamedObject = class(TMyObject)
public
obj_name : String;
end;

PNodeData = ^TNodeData;
TNodeData = record
Data : TMyObject;
end;

var RootNode, Node : PVirtualNode;
root_obj, obj : TNamedObject;

begin
tvTree.BeginUpdate;
tvTree.NodeDataSize := SizeOf(TNodeData);
... RootNode := tvTree.AddChild( nil );
root_obj := TNamedObject.Create;
root_obj.obj_id := -1;
root_obj.obj_type := objRoot;
root_obj.obj_name := 'Какой-то текст';
PNodeData(tvTree.GetNodeData( RootNode )).Data := root_obj;
... tvTree.EndUpdate;end;

Сегодня я убил день но так и не добился нужного результата. Мне уже перед самим собой стыдно. Самое страшное что я не понимаю в чем дело. Паронойя уже начинаеться . Главная загвоздка с выделенным текстом.
Все остальное просто не может не работать! ))

roman10

Изначально зачада звучит так ... Перевести текст написанный на Дельфях в текст написанный на Си++

TMyObject = class(TObject)
public obj_id : Integer;
obj_type : TObjectType;
end;

TNamedObject = class(TMyObject)
public
obj_name : String;
end;

PNodeData = ^TNodeData;
TNodeData = record
Data : TMyObject;
end;

var RootNode, Node : PVirtualNode;
root_obj, obj : TNamedObject;

begin
tvTree.BeginUpdate;
tvTree.NodeDataSize := SizeOf(TNodeData);
... RootNode := tvTree.AddChild( nil );
root_obj := TNamedObject.Create;
root_obj.obj_id := -1;
root_obj.obj_type := objRoot;
root_obj.obj_name := 'Какой-то текст';
PNodeData(tvTree.GetNodeData( RootNode )).Data := root_obj;
... tvTree.EndUpdate;end;

Сегодня я убил день но так и не добился нужного результата. Мне уже перед самим собой стыдно. Самое страшное что я не понимаю в чем дело. Паронойя уже начинаеться . Главная загвоздка с выделенным текстом.
Все остальное просто не может не работать! ))

Получаем ошибку ...

Все подсказали как сделать ... Только не понимаю ... мне кажеться я так пробовал с самого начала ...
странно как то...

tmpNodeData = (TNodeData *)Tree->GetNodeData(tmpNode);

однако если ты попробуешь в этой строчке обратиться дальше по указателю к какому нить свойству он тебе покажет фигу ... вот такая вот замарочка...

Может в этом и есть прелесть void * ...

Да странно! Убил день ... а на что ... сейчас все работает . Спасибо за конференцию!

Все были правы кто говорил ... Читай справку )))