Про мышку, когда она над кем-то находится

← →
Демон (2002-06-04 19:01) [0]

Здрасти!
Подскажите мне, пж-ста. Как сделать так, чтобы когда мышка находится, допустим, над Лабелом, то он менял цвет, когда уходит с него цвет обратно восст-ся бы!
Спасибо

← →
Song (2002-06-04 19:12) [1]

procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Label1.Font.Color:=ClRed;
end;

procedure TForm1.Label1MouseLeave(Sender: TObject);
begin
Label1.Font.Color:=ClWindowText;
end;

← →
Демон (2002-06-04 19:45) [2]

шпасиба!

Про мышку, когда она над кем-то находится Найти похожие ветки