Вот пример "как можно кликать сквозь форму", действует в пределах окошек сборки
Добавлено немного позже:
А если нужен подобный эффект и для всех оконцев в системе, то в этой экземпле достаточно добавить к 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;
здесь всё понятно без объяснений, как очевидный факт