![]()  | 
	
 
  | 
		
			
  | 	
	
	
		
		|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
| 
		 | 
	Опции темы | Поиск в этой теме | Опции просмотра | 
| 
		 
			 
			#1  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Привет.. 
		
	
		
		
		
		
		
	
		
		
	
	
	Вопрос в следующем: Есть форма, которая прячется путем Код: 
	form1.hide; На форме таймер, в таймере код: Код: 
	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;Вся соль в том, что когда беру любой ярлык, неважно откуда, подвожу его в угол, форма появляется и сразу исчезает. Если убрать код проверки клика вне формы - всё получается как надо... Как можно вылечить данный недуг? Спасибо заранее.  |