Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Image

Автор: namra 17.2.2008, 13:38

На форме есть два компонента Image1 и Image2, они оба одинаковых размеров Image2 находиться поверх Image1. Как сделать чтобы при наведении мыши на Image2 она менялась на Image1, а при от ведении опять становилась Image2.

M
Alexeis

Модератор: Название темы должно отражать ее суть!

Автор: m0ro 17.2.2008, 14:21

положи на форму один Image, а при наведении мышки меняй в нем картинку (image1.Picture или Image1.Bitmap)

Автор: Sanchezzz 17.2.2008, 19:43

во еще вариант предлагаю. кидаем на форму нужное количество Image и один Imagelist для картинок в компонент imagelist добавляем 2 картинки или более.

далее код

Код


//это когда мышь входит в область компонента
 procedure TForm1.Image1MouseEnter(Sender: TObject);
begin
imagelist1.GetIcon(1, Image1.Picture.Icon);
end;
//это когда покидает
procedure TForm1.Image1MouseLeave(Sender: TObject);
begin
imagelist1.GetIcon(0, Image1.Picture.Icon);
end;

Автор: bagos 18.2.2008, 02:07

объясни задачу,может все куда намного проще делается чем менять один имаг на другой smile

Автор: D7_beginner 18.2.2008, 09:25

Цитата(namra @ 17.2.2008, 13:38

)

В процедуру MouseMove имага пишете Image1.BringToFront; (чтобы перенести имаг на передний план), Image1.SendToBack; - на задний план.

Автор: namra 22.2.2008, 20:09

ок