Add(MainForm,10377423,175,154)
{
 Width=369
 Height=295
 Point(onMouseEnter)
}
Add(ComboBox,7723821,224,140)
{
 Left=75
 Top=30
 Width=200
 Height=21
 Strings=#5:12321|5:11113|5:11111|5:11122|5:45464|5:67867|5:87867|5:34535|5:56546|5:46464|5:46546|
 ReadOnly=0
 Point(PHandle)
 Point(onMouseLeave)
 Point(onMouseEnter)
 link(onMouseEnter,995737:doWork2,[(277,167)(277,258)(172,258)(172,230)])
}
Add(InlineCode,3059356,238,217)
{
 WorkPoints=#14:doShowDropDown|
 DataPoints=#7:PHandle|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|38:uses kol,Share,Debug,Windows,Messages;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|24:     PHandle: THI_Event;|59:     procedure doShowDropDown(var _Data:TData; Index:word);|5: end;|0:|14:implementation|0:|66:procedure THiAsmClass.doShowDropDown(var _Data:TData; Index:word);|3:var|21:  sControl: PControl;|25:  Info: TComboBoxInfo;   |5:begin|48:  sControl := PControl(ToIntegerEvent(PHandle));|38:  if not Assigned(sControl) then exit;|34:  ZeroMemory(@Info, SizeOf(Info));|30:  Info.cbSize := SizeOf(Info);|41:  GetComboBoxInfo(sControl.Handle, Info);|69:  SendMessage(sControl.Handle, CB_SHOWDROPDOWN, ToInteger(_Data), 0);|48:  ShowScrollBar(Info.hwndList, SB_VERT, false); |4:end;|0:|4:end.|
 link(PHandle,7723821:PHandle,[])
}
Add(ChanelToIndex,995737,182,217)
{
 link(onIndex,3059356:doShowDropDown,[])
}