Add(MainForm,8917109,21,105)
{
 Left=20
 Top=105
 link(onCreate,16082714:doFor,[])
}
Add(InlineCode,10728653,322,182)
{
 WorkPoints=#2:wc|
 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|17:    hn:THI_Event;|0:|43:    procedure wc(var dt:TData; index:word);|0:|5: end;|0:|14:implementation|0:|25:procedure THiAsmClass.wc;|14:var i:integer;|13:    s:string;|5:begin|19: s := ToString(dt);|85: for i:=1 to length(s) do SendMessage(GetActiveWindow,wm_Char,WParam(PChar(s[i])),1);|17: //_hi_OnEvent();|4:end;|0:|4:end.|
}
Add(Button,13333612,133,182)
{
 Left=255
 Top=145
 link(onClick,8641828:doPopupHere,[(177,188)(177,195)])
}
Add(StringTable,16310460,322,98)
{
 Left=20
 Top=15
 Width=325
 Height=115
 Columns=#1:1|1:2|1:3|
 Icons=[]
 Grid=0
 Redaction=1
}
Add(For,16082714,84,105)
{
 End=4
 link(onEvent,16310460:doAdd,[(219,111)(219,104)])
}
Add(PopupMenu,8641828,189,182)
{
 Menu=#3:123|3:456|3:789|
 link(onClick,8268376:doRead,[])
}
Add(ArrayRW,8268376,245,182)
{
 link(onRead,10728653:wc,[(299,188)(299,188)])
 link(Array,16365424:Array,[])
}
Add(StrList,16365424,231,42)
{
 Strings=#3:123|3:456|3:798|
}