TGraphicsColor" to "TObject в x84-64

[Xenar]

Доброго дня.

Столкнутся с тем что в 64 разрядной версии lazarus выражение типа:

Код: Выделить всё

RxDBColorBox1.Items.AddObject('Красный',TObject(StringToColor('clRed'))); 

дает ошибку

Error: Illegal type conversion: "TGraphicsColor" to "TObject"

но при этом в 32 разрядной работает без проблем.

Что это?

[zub]

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

[alexs]

Должна помочь функция IntPtr и обратная - PtrInt

[Xenar]

Должна помочь функция IntPtr и обратная - PtrInt

Огромное спасибо.
Помогло

ps
alexs, может имеет смысл в данный компонент (RxDBColorBox) внести поправку с учетом данной ситуации ?

[alexs]

А зачем?