Add(MainForm,12764865,238,140)
{
 Width=484
 Height=356
 link(onCreate,528607:doString,[])
}
Add(VBJScript,5105322,294,203)
{
 VarPoints=#4:var1|4:var2|
 DataPoints=#7:PathLnk|
 Script=#43:' Процедуры получения данных с нижних точек|29:Function GetVar (Data, Index)|48:    Set WshShell = CreateObject("WScript.Shell")|57:    Set oShellLink = WshShell.CreateShortcut(sys.PathLnk)|21:    Select Case Index|19:        Case "var1"|41:         GetVar = (oShellLink.TargetPath)|19:        Case "var2"|47:         GetVar = (oShellLink.WorkingDirectory)|19:    End Select     |13:End Function |
 UseName=0
 link(PathLnk,528607:FString,[])
}
Add(Dir,3388591,287,105)
{
}
Add(FormatStr,528607,294,154)
{
 DataCount=1
 Mask="%1HiAsm.exe.lnk"
 Point(FString)
 link(Str1,3388591:DesktopDir,[])
}
Add(Memo,15470677,392,259)
{
 Width=472
 Height=266
 ScrollBars=2
}
Add(Hub,8952775,252,259)
{
 link(onEvent1,6059704:doData,[])
 link(onEvent2,9884995:doData,[(284,272)(284,307)])
}
Add(DoData,6059704,294,259)
{
 link(onEventData,1537308:doWork2,[])
 link(Data,5105322:var1,[])
}
Add(DoData,9884995,301,301)
{
 link(onEventData,1537308:doWork3,[(361,307)])
 link(Data,5105322:var2,[])
}
Add(HubEx,1537308,357,252)
{
 link(onEvent,15470677:doAdd,[])
}
Add(Button,7206,196,259)
{
 Left=5
 Top=280
 link(onClick,8952775:doEvent1,[])
}

C:\HiAsm_b175\Elements\delphi\code.\hiFTCG_Tools_8E2315C.pas(102) Error: Expression expected but ';' found

  begin
    _hi_onEvent(THIFTCG_Tools(FParent).Events[0], val11);
    val11 := ;
  end;