Знатоки VCL, подскажите, как Borland реалиизует работу с картинками? На определенное событие я меняю у моего TImage свойство Picture. Builder хитрит с членами данных, незаметно подсовывая вместо них функции типа Set и Get. И по этому, если выполнить код:

Код

TPicture *MyNewPicture = new TPicture; MyNewPicture->LoadFromFile("some_file"); MyForm->MySuperImage->Picture = MyNewPicture;

... не выполняется условие, что MyForm->MySuperImage->Picture == MyNewPicture.

Вопрос то собственно в чем - как не вводя в программу дополнительных флагов, узнать, что картинка в TImage равна экземпляру TPicture? Пробовал сравнивать ...->Picture->Bitmap-ы, и ...->Picture->Canvas-ы. Также не работает сравнение указателей на такие члены TPicture, как Graphics, Metafile. Может все-же есть способ?

Погоди. А type-cast не пробовал?? Посмотри, какая там иерархия..
Я уже не помню, в Builder-e или Delphi давно не сидел.. Но вот, что можно посоветовать (из общих соображений).

Вот по поводу того, что он хитрит - определи для начала, создает ли он новый объект с указателя MyForm->MySuperImage->Picture и копирует туда твой, или он действительно всего лишь указатель на тот же объект, куда указывает MyNewPicture.

Для этого после присваивания загрузи в MyNewPicture какой-нибудь другой файл и посмотри, изменилось ли че на форме.

Если первое - то надо искать или делать функцию сравнения двух изображений (искать где-нить в классах Image, Picture, Canvas, где-нить там). А если второе - хрен знает, что, кроме type-casta посоветовать....

Попробуй. Если других более конкретных советов не будет .