Add(MainForm,6168681,238,112)
{
 Width=620
 Height=429
 Caption="Прозрачная форма, не реагирующая на мышь"
 DragForm=0
 Point(Handle)
 Point(PHandle)
 link(onCreate,6616881:doEvent1,[])
}
Add(WinTools,4866552,399,105)
{
 Point(doAlphaBlendValue)
 Point(doEnable)
 link(Handle,11362747:Var1,[(405,96)(328,96)])
}
Add(DoData,6131835,343,133)
{
 Data=Integer(150)
 link(onEventData,4866552:doAlphaBlendValue,[])
}
Add(Hub,6616881,287,126)
{
 link(onEvent1,4866552:doPopup,[(312,132)(312,118)])
 link(onEvent2,6131835:doData,[])
}
Add(GetDataEx,11362747,322,151)
{
 Angle=3
 link(Data,6168681:Handle,[(244,156)])
}
Add(InlineCode,4502086,322,196)
{
 WorkPoints=#11:doEX_Transp|12:doEX_Transp1|
 DataPoints=#6:Handle|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses kol,Share,Debug,Windows;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|22:   Handle : THI_Event;|55:   Procedure doEX_Transp (var _Data:TData; Index:word);|56:   Procedure doEX_Transp1 (var _Data:TData; Index:word);|5: end;|0:|14:implementation|0:|65:Procedure  THiAsmClass.doEX_Transp (var _Data:TData; Index:word);|5:Begin|136:  SetWindowLong(ReadInteger(_Data,Handle,0), GWL_EXSTYLE, GetWindowLong(ReadInteger(_Data,Handle,0), GWL_EXSTYLE) or WS_EX_TRANSPARENT);|4:end;|0:|69:   Procedure  THiAsmClass.doEX_Transp1 (var _Data:TData; Index:word);|5:Begin|141:  SetWindowLong(ReadInteger(_Data,Handle,0), GWL_EXSTYLE, GetWindowLong(ReadInteger(_Data,Handle,0), GWL_EXSTYLE) and not WS_EX_TRANSPARENT);|4:end;|0:|0:|4:end.|
 link(Handle,11362747:Var2,[])
}
Add(Switch,4079365,280,189)
{
 DataOn=String(1)
 DataOff=String(0)
 Point(onOn)
 Point(onOff)
 link(onOn,4502086:doEX_Transp,[])
 link(onOff,4502086:doEX_Transp1,[])
}
Add(ChildForm,6796585,217,189)
{
 link(onEvent1,4079365:doSwitch,[])
}
BEGIN_SDK
  Add(EditMulti,15061766,21,21)
  {
   EventCount=1
  }
  Add(MainForm,16614817,35,105)
  {
   Left=35
   Top=105
   Width=190
   Height=92
  }
  Add(Button,6893416,119,77)
  {
   Width=174
   Align=2
   link(onClick,15061766:onEvent1,[(236,83)(236,27)])
  }
END_SDK