Add(MainForm,2953706,189,154)
{
}
Add(ChildPanelEx,7223413,259,154)
{
}
BEGIN_SDK
  Add(EditMultiEx,6857113,21,21)
  {
   WorkCount=#34:doCompare=Перевести юникод в текст|
   EventCount=#44:onReplace=Текст на иврите сделан для таблицы|25:onEvent1=Обновить браузер|
   VarCount=#38:FString=Текст для добавления в таблицу|
   Width=1168
   Height=1019
   link(doCompare,11800378:doCompare,[(73,27)(73,174)])
  }
  Add(Panel,14126488,287,49)
  {
   Left=770
   Top=135
   Width=743
   Height=639
  }
  Add(WebBrowser,13474582,196,56)
  {
   Width=816
   Height=782
   URL=""
   Silent=0
   Point(PHandle)
  }
  Add(VisualStrings,13619324,133,56)
  {
   Lines=#40:https://www.branah.com/unicode-converter|
   Point(doText)
   Point(onText)
   link(onText,13474582:doNavigate,[])
  }
  Add(InlineCode,8878240,266,231)
  {
   WorkPoints=#6:Parsel|
   EventPoints=#7:CurText|
   DataPoints=#2:ph|
   Code=#15:unit HiAsmUnit;|0:|9:interface|0:|40:uses kol,Share,Debug,ActiveX,KOLSHDocVw;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|17:    ph:THI_Event;|22:    CurText:THI_Event;|0:|47:    procedure Parsel(var dt:TData; index:word);|0:|5: end;|0:|14:implementation|0:|4:type|31:  TKOLWebBrowser = PWebBrowser;|31:  PKOLWebBrowser = PWebBrowser;|0:|29:procedure THiAsmClass.Parsel;|16:var pc:PControl;|15:    txt:string;|5:begin|36: pc := PControl(ToIntegerEvent(ph));|97: txt := PKOLWebBrowser(pc).OleObject.Document.getElementsByTagName('textarea').Item(0).outerHTML;|26: _hi_OnEvent(CurText,txt);|4:end;|0:|4:end.|
   link(CurText,1634674:doSearch,[])
   link(ph,14140322:Var3,[(272,166)])
  }
  Add(InlineCode,6429650,210,189)
  {
   WorkPoints=#3:Zap|
   DataPoints=#1:h|4:text|
   Code=#15:unit HiAsmUnit;|0:|9:interface|0:|61:uses kol,Share,Debug,windows,ActiveX,KOLSHDocVw,Win,ShellApi;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|16:    wb:PControl;|9:   public|16:    h:THI_Event;|19:    text:THI_Event;|4:    |46:    procedure Zap(var Data:TData; index:word);|4:    |5: end;|0:|15:implementation |0:|4:type|32:  PKOLWebBrowser = PWebBrowser; |0:|26:procedure THiAsmClass.Zap;|5:begin|35: wb := PControl(ToIntegerEvent(h));|110: PKOLWebBrowser(WB).OleObject.Document.getElementsByTagName('textarea').item(1).value := ToStringEvent (text);|74: PKOLWebBrowser(WB).OleObject.Document.getElementById('btnunicode').Click;|5: end;|0:|4:end.|
   link(h,14140322:Var2,[])
   link(text,3855309:Value,[])
  }
  Add(Timer,12612128,210,231)
  {
   Interval=100
   Enable=1
   AutoStop=1
   link(onTimer,8878240:Parsel,[])
  }
  Add(Hub,7768016,175,175)
  {
   OutCount=4
   link(onEvent1,12973492:In,[(238,181)(238,195)])
   link(onEvent2,2909122:In,[])
   link(onEvent3,6429650:Zap,[])
   link(onEvent4,12612128:doTimer,[(199,202)(199,237)])
  }
  Add(BlockFind,1634674,315,231)
  {
   IncludeBlock=1
   StartBlock=">"
   EndBlock="<"
   link(onSearch,14330467:doEvent1,[])
  }
  Add(InlineCode,1735655,392,238)
  {
   @Hint=#45:Замена любых неотображаемых знаков на пробелы|
   WorkPoints=#2:go|
   EventPoints=#7:CurText|
   DataPoints=#4:text|
   Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|18:   text:THI_Event;|21:   CurText:THI_Event;|3:   |44:   procedure go(var Data:TData; index:word);|3:   |5: end;|0:|14:implementation|0:|25:procedure THiAsmClass.go;|3:var|11:  S:String;|17:  i, Len:Integer;|5:begin|28:  S :=(ToStringEvent(text));|18:  Len :=Length(S);|27:  for i :=1 to Len do begin|35:    if S[i] < #32 then S[i] := '|';|6:  end;|23:_hi_OnEvent(CurText,S);|4:end;|4:end.|
   link(CurText,13455297:doTrim,[])
   link(text,5641920:GetData,[])
  }
  Add(Hub,14330467,364,231)
  {
   OutCount=4
   link(onEvent1,5641920:doData,[(385,237)(385,202)])
   link(onEvent2,1735655:go,[])
   link(onEvent4,8501118:doEnum,[(389,258)(389,293)])
  }
  Add(EventFromData,5641920,392,196)
  {
  }
  Add(GetDataEx,14140322,210,161)
  {
   link(Data,13474582:PHandle,[])
  }
  Add(StrList,12568012,525,217)
  {
   Point(onGetString)
   Point(doGetString)
  }
  Add(Timer,6713686,42,56)
  {
   AutoStop=3
   link(onTimer,3671370:doEvent1,[])
  }
  Add(StrMask,11800378,126,168)
  {
   Mask="*textarea*"
   link(onFalse,3671370:doEvent2,[(170,174)(170,111)(88,111)(88,69)])
   link(onTrue,7768016:doEvent1,[])
   link(Str,13474582:Page,[(132,156)(209,156)])
  }
  Add(Memory,16549056,812,294)
  {
  }
  Add(LineBreak,7918026,770,301)
  {
   link(Out,16549056:doClear,[])
   Primary=[12973492,-483,-112]
  }
  Add(Memory,3855309,217,119)
  {
  }
  Add(ArrayEnum,8501118,539,287)
  {
   link(onItem,10653166:doCompare,[(587,293)(587,244)])
   link(onEndEnum,1347724:doReplace,[])
   link(Array,12568012:Array,[])
  }
  Add(MultiElementEx,10653166,595,238)
  {
   link(onReplace,2281603:doAdd,[])
  }
  BEGIN_SDK
    Add(EditMultiEx,2119631,21,21)
    {
     WorkCount=#23:doCompare=Фильтр текста|
     EventCount=#15:onReplace=Текст|
     Width=440
     link(doCompare,12808632:doCompare,[(35,27)(35,55)])
    }
    Add(StrMask,12808632,49,49)
    {
     Mask="*http*"
     link(onFalse,7359480:doCompare,[])
    }
    Add(StrMask,7359480,98,49)
    {
     Mask="*i*"
     link(onFalse,4220204:doCompare,[])
    }
    Add(StrMask,4220204,147,49)
    {
     Mask="*a*"
     link(onFalse,7463152:doCompare,[])
    }
    Add(StrMask,7463152,196,49)
    {
     Mask="*e*"
     link(onFalse,2483990:doCompare,[])
    }
    Add(Replace,479387,294,49)
    {
     SubStr=";"
     link(onReplace,2119631:onReplace,[(394,55)(394,27)])
    }
    Add(StrMask,2483990,245,49)
    {
     Mask="*o*"
     link(onFalse,479387:doReplace,[])
    }
  END_SDK
  Add(Replace,3139886,476,238)
  {
   SubStr="|"
   DestStr="\r\n"
   link(onReplace,12568012:doText,[])
  }
  Add(Trim,13455297,434,238)
  {
   Char="|"
   link(onTrim,3139886:doReplace,[])
  }
  Add(StrList,2281603,679,238)
  {
  }
  Add(Replace,1347724,679,294)
  {
   SubStr="\r\n"
   DestStr=", "
   link(onReplace,6055412:doTrim,[])
   link(Str,2281603:Text,[])
  }
  Add(LineBreak,11706945,637,245)
  {
   link(Out,2281603:doClear,[])
   Primary=[2909122,-385,-63]
  }
  Add(Trim,6055412,728,294)
  {
   Mode=7
   link(onTrim,16549056:doValue,[])
  }
  Add(Hub,3671370,98,56)
  {
   InCount=2
   OutCount=1
   link(onEvent1,13619324:doText,[])
  }
END_SDK