Приведение типов

← →
webpauk © (2010-01-19 14:37) [0]

Могую ли я в конструкцию TStringList.AddObject("Text", fObj) как-то запихнуть fObj=Pointer(Point(x, y))?

← →
Игорь Шевченко © (2010-01-19 14:45) [1]

не можешь

← →
webpauk © (2010-01-19 14:46) [2]

спсб

← →
Юрий Зотов © (2010-01-19 14:55) [3]

Но если использовать PointToSmallPoint, то может и получиться.

← →
oxffff © (2010-01-19 14:59) [4]

> webpauk © (19.01.10 14:37)
> Могую ли я в конструкцию TStringList.AddObject("Text", fObj)
> как-то запихнуть fObj=Pointer(Point(x, y))?

Не понятно, что ты хочешь запихнуть указатель или значение.
В любом случае можно. Используй аналог boxing из .NET с детерминированным освобождением.

> AddObject("Text", fObj)

Сюда можно "запихнуть" любое 32-х разрядное число.
Чем оно будет являться - решать тебе.
Это может быть указатель, это может быть композитная структура, например 16-ти разрядные координаты, это может быть число в плавающем формате и т.п.

> webpauk © (19.01.10 14:37)
> Могую ли я в конструкцию TStringList.AddObject("Text", fObj)
> как-то запихнуть fObj=Pointer(Point(x, y))?

TPoint - обычная структура, поэтому после небольших изменений в описании и методах работы с ним можно. Почему нет?

PPoint=^TPoint var pp: PPoint; begin New(pp); StringList.AddObject("Text", pp); //Работаем //Здесь освобождаем память: Dispose(PPoint(StringList.Data[i]));

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