Привет..
Вопрос в следующем:
Есть форма, которая прячется путем
.
На форме таймер, в таймере код:
Код:
var P:TPoint;
...
{Показывает форму, если курсор находится сверху слева}
if (Mouse.CursorPos.X<1) and (Mouse.CursorPos.Y<1) then
begin
Form1.Show;
end;
{скрывает форму если кликнули НЕ в форму}
if GetAsyncKeyState(VK_LBUTTON)<> 0 then
begin
GetCursorPos(P);
if (P.X > Form1.Left+form1.Width) or (P.y > form1.Top+ Form1.Height) or (P.Y < Form1.Top) then
begin
Form1.Hide;
end;
end;
Программа умеет принимать на себя ярлыки (Drag&Drop).
Вся соль в том, что когда беру любой ярлык, неважно откуда, подвожу его в угол, форма появляется и сразу исчезает. Если убрать код проверки клика вне формы - всё получается как надо...
Как можно вылечить данный недуг? Спасибо заранее.