![]()  | 
	
 
  | 
| 
		 
			 
			#1  
			
			
			
			
		 
		
		
	 | 
|||
		
		
  | 
|||
| 
	
	
		
			
			 Здравствуйте. 
		
	
		
		
		
		
		
	
		
		
	
	
	Подскажите пожалуйста. Хочу сделать форму, что бы можно было кликать и проводить всяческие манипуляции с мышкой сквозь форму. Сама форма будет немного прозрачной, в fsstayontop. При наведении на форму, форма будет становится еще более прозрачной. Не могу нигде найти, как можно кликать сквозь форму? ![]() Надо чтобы программа всегда была на видном месте, но и чтобы не мешала.  | 
| 
		 
			 
			#2  
			
			
			
			
		 
		
		
	 | 
||||
		
		
  | 
||||
| 
	
	
		
			
			 Вот пример "как можно кликать сквозь форму", действует в пределах окошек сборки 
		
	
		
		
			Добавлено немного позже: А если нужен подобный эффект и для всех оконцев в системе, то в этой экземпле достаточно добавить к unit2 следующее Код: 
	...
protected
procedure CreateParams(var Params: TCreateParams); override;
...
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  if Assigned(Application.MainForm) then
   begin
    Params.WndParent:= GetDesktopWindow;
    Params.Style:= WS_CHILD;
   end;
end;Последний раз редактировалось Alegun, 20.08.2015 в 19:00.  | 
| Этот пользователь сказал Спасибо Alegun за это полезное сообщение: | ||
 
Gareth (20.08.2015)
  | ||