Add(MainForm,16348082,133,98)
{
 Width=308
}
Add(InlineCode,490725,252,98)
{
 WorkPoints=#3:in1|
 EventPoints=#4:out1|
 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:   out1:THI_Event;|42:   procedure in1(var dt:TData;Index:Word);|5: end;|0:|14:implementation|0:|26:procedure THiAsmClass.in1;|49:type   arr = array of array of array of integer; |0:|4:var |11:  ar1: arr;|12:  ar2: arr; |5:begin|32:// An array of 4 by 3 elements: |26:  SetLength(ar1, 4, 3, 5);|19:  // Use the array:|18:  ar1[0,0,0] := 5;|18:  ar1[0,1,0] := 7;|20:  ar1[2,0,0] := 200;|21:  ar1[3,2,0] := 1000;|17:  // and so on...|0:|23:ar2 := ar1; // копируем|0:|30:_hi_OnEvent(out1, ar2[0,0,0]);|0:|24:ar1[0,0,0] := 555555555;|0:|30:_hi_OnEvent(out1, ar2[0,0,0]);|0:|0:|4:end;|0:|4:end.|0:|
 link(out1,15938406:doAdd,[])
}
Add(Button,4071366,196,98)
{
 Left=15
 Top=30
 Width=75
 Height=185
 Data=String(я строка из кнопки)
 link(onClick,490725:in1,[])
}
Add(ListBox,15938406,308,98)
{
 Left=105
 Top=5
 Width=190
 Height=250
}