![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Всем привет.
я многому научился на вашем сайта, ![]() Мне нужна помощь у меня есть картинка мне нужно чтобы при наведении на неё курсором она поднималась а при отведении от неё курсора она опускалась я к событию изображаения OnMouseMove прописал Код:
procedure TForm1.Image15MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin image15.Top:=image15.Top+5 end; end. то есть она при наведении двигаетсья вверх а ка сделать чтоб после убирания мыши с картинки она двигалась вниз ? работаю в Delphi 7 Последний раз редактировалось feJIex, 18.09.2011 в 04:14. |