Смена картинки при наведении на неё курсора мыши.

← →
UDS (2003-03-05 19:53) [0]

Не могу у TImage айти событие типа OnMouseOver. Помогите!

← →
Романов Р.В. © (2003-03-05 19:57) [1]

Создешь потомка, который обрабатывает сообщения CM_MOUSELEAVE CM_MOUSEENTER. Подробнсти на www.google.com

← →
UDS (2003-03-05 20:21) [2]

Там все про HTML теги... А мне нужен такой эффект в моей проге.

← →
Mihey (2003-03-05 20:31) [3]

Правильно сказано про создание потомка. Делаешь свой класс на основе изображения. В разделе public пишешь:

procedure CMMouseEnter(var Message: TMessage); message CM_MOUSEENTER;
procedure CMMouseLeave(var Message: TMessage); message CM_MOUSELEAVE;

И потом уже в implementation:

procedure TMyImage.CMMouseEnter(var Message: TMessage);
begin
код
end;

procedure TMyImage.CMMouseLeave(var Message: TMessage);
begin
код
end;

http://www.google.com.ru/search?q=CM_MOUSELEAVE+CM_MOUSEENTER+Delphi+%D0%94%D0%B5%D0%BB%D1%8C%D1%84%D0%B8&ie=UTF-8&oe=UTF-8&hl=ru&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA+%D0%B2+Google&lr=

Смена картинки при наведении на неё курсора мыши. Найти похожие ветки