[T232006]

Люди добрые, помогите, уже весь день убил на решение простой задачи!
Есть компонент на основе TImage. Я хочу, чтобы на этапе разработки в инспекторе по нажатию на пункт Picture выбранная картинка отобразилась не на весь компонент, а только в некоторой его части. Ну или сохранить ее в свойстве, скажем FPicture (что эквивалентно). Как отловить событие загрузки файла?
Я смотрел, как это реализовано в родителе - TImage. Там все просто:

Код:

...
private
 FPicture: TPicture;
 procedure SetPicture (value: TPicture);
...
published
property Picture: TPicture read FPicture write SetPicture;
...
procedure SetPicture (value: TPicture);
begin
 FPicture.Assign(Value);
end;
 

Если воспроизвести тот же механизм у себя, то компилятор ругается и перестает воспринимать свойство Picture. Должен быть другой способ. Но какой?

[lmikle]

Во первых, приведенный тобой код - это не загрузка, а просто назначение св-ва.
Во вторых, тут тебе скорее надо смотреть на отрисовку компоненты в DesignTime и перекрывать именно ее.

[T232006]

Второй день уже смотрю и всё никак понять не могу, на каком этапе TImage загружает рисунок. На данный момент понял, что на этапе OnCreate рисунка еще нет. Но каким магическим образом он там появляется - так и не допер пока.

[T232006]

После долгих мучений нашел путь: отловить событие Picture.OnChange. Картинка будет на третьем вызове (первые два, скорее всего, на установку размеров)

[lmikle]

Вообще, я бы смотрел обработчик сообщения WM_PAINT.
Ну или просто перекрывать TImage.Paint. Т.е. просто перекрыть саму отрисовку вместо того, что бы отлавливать что-то там.

[T232006]

Пошел другим путем: выбрал в качестве родителя TGraphicControl. Тогда и отлавливать ничего не надо. Оказалось, это из-за особенностей TImage нельзя перехватить картинку, т.к. она рисуется на канвасе (вылетает ошибка чтения какого-то там файла). В TGraphicControl этого нет