Witam
Chcę zrobić ze jeśli pojade myszką całkiem na prawą stronę i najade na wystający cieniutki kawałek panelu on wysunie się ("animacyjnie")i schowa się jeśli wyjade myszką poza panel...
wysuwanie się zrobilem
w funkcji panelu mause move
procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if panel1.Left >= 1090 then
begin
sleep(50);
panel1.Left:= panel1.Left -5;
end;
end;
..ale jak zrobić żeby się chował...(można by było zrobić timer i cały czas sprawdzał myszy..ale czy jest sposób taki jak zrobiłem wysuwanie)... czy jest tez jakaś taka funkcja jak mause move tylko odwrotna (jeśli myszka jest poza panelem)