[BakalavR]

Здравствуйте!
Подскажите пожалуйста как вставить картинку так, чтоб при наведении на неё, она заменялась другой, а при нажатии третьей?

[ApxaHGe1]

onMouseMove, onClick

[BakalavR]

Сообщение от ApxaHGe1

onMouseMove, onClick

А можно пожалуйста по подробнее. Что именно туда вписывать? Заранее спасибо!

[ApxaHGe1]

procedure TForm1.Image1Click(Sender: TObject);

Код:

begin
image1.picture.loadfromfile ('click.jpg');
end;