Всплывающая подсказка на TImage

[NaumOff]

При наведении курсора на TImage надо выводить информацию о текущем пикселе картинки. TImage занимает всю форму. Проблема в том, что данные на картинке динамические, обновляются раз в секунду. Подсказка затирается при каждом обновлении картинки, поэтому рисование на его канве не подходит. Надо создавать область над канвой изображения и рисовать в ней. Как такое можно реализовать?
Что то подобное можно увидеть на графиках в Procces Explorer`e от Руссиновича.

[hon]

При наводе мыши на картинку (OnMouse чегото-там) запрещать перерисовку, при уходе курсора разрешать перерисовку. Погугли "delphi Как поймать уход мыши с компонента".

[Stilet]

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

P.S. А что это за мультипликация такая? Что ее нужно так вот каждую секунду обновлять? Это график?

[NaumOff]

Stilet, да, это динамический график. Идея интересная, сейчас что-нибудь набросаю.
hon, надо чтобы изображение продолжало изменяться. Уход мыши с компонента отлавливается. С этого и начинал: в OnMouseMove получал координаты мыши, по ним рассчитывал значения, рисовал на канве хинт, и если мышь все еще на канве обновлял хинт после построения графика. Да вот только график движется, значения меняются...
Хм, осенило. Координаты надо брать не из OnMouseMove, а расчитывать по GetCursorPos, а лучше по ScreenToClient(Mouse.CursorPos).

[Stilet]

Хм, осенило.

Осени себя еще раз - открой для себя TChart

[chertovich]

А в чем проблема при каждой перерисовке изображения "наверх" рисовать "выплывающую" подсказку? То есть поместить код рисования подсказки в обработчик OnPaint последней и при флаге "всплывающая" подсказка рисовать.

[NaumOff]

chertovich, именно так и сделал. Проблема была в том, что рассуждал чуток иначе, залип на OnMouseMove. Получилось не хуже чем у мэтра Руссиновича).
Stilet, упаси Боже заново открывать для себя TChart. Нет, он хорош, но уж слишком тяжел и велик чтобы лупить моих воробьев. Я лучше ручками все нарисую, быстрее и красивее получается.

[Stilet]

но уж слишком тяжел и велик чтобы лупить моих воробьев.

Хм... А если не секрет что за требования к программе, раз ты чарт считаешь тяжелым?
Кстати, TImage не менее легка. Отрисовывай тогда уж прямо на канве формы в событии OnPaint

[raxp]

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

откройте для себя GraphicsM.

А если не секрет что за требования к программе, раз ты чарт считаешь тяжелым?

наверняка лупит все точки (пара сотень тысяч, миллион, ...) в chart и использует его как хранилище.

[Stilet]

и использует его как хранилище.

А вот это зря...
Впрочем отрисовка на канве все равно потребует хранилища. Точно так же будет заполняться и раздуваться какой либо массив...