Add(MainForm,1830313,294,175)
{
 Width=310
 Height=156
}
Add(ToolBar,13583034,371,175)
{
 Width=302
 Height=25
 Align=2
 Caption=0
 Buttons=['Файл'=[ZIP3604000078DAAD922193C2301085F766F8019595E0AEF20C3F00D9190C127B1259598BAC8CACADAC44D6562291B5959191615F935CD20037C05D66BE493AE97BD97DC966BB5ED034D6CC2793583E686936EC7E38B4D67F266B2FF4751A68C5F3BBFA7A9074949AF27E9C7CD2A6FFE119FDAE1BA9E6B5608A41CD083D7FD3B7BCAE14233D731F79B747E841CB3D08D68BC823F481C73D3DF6A61C5C0DEA712D711FD0E14C57432395E181BEEDD46DFE36B72CCA1E7EA8837245A23733E8CE660EF5A821CCEB60FDE051349AD29DD7677B4DA5B8D587381FEC3BDD866BC8CFDEC7E97B7BF7F0B958D0B3B07DBBFF4B7CABB97E65DF1F3C00D6699403C0FFC9515352995EEA93CF11EF3FCC2EBE6368BF4B7F6E51F9F35F21ACFB3FB8022C6564E9],'-'=[],'Начать'=[ZIP3604000078DA8552218C843010DC4F5E202B918F7B24E6126C65933795674F224F62914824B61289C4229148EC4924929F2D853B0E9223999474776667772BFF2EDF64BF0BF00B08872FFA59022EFEFACDF37C00450848403BF07F749EBBE349979B7A44E51BF84E91C52957217E030C1C9B13BE7148BC8317CB4D04792600FC23F75D27F1763E982FAA0808173E3C882AA07E1AE8318DA45A7DD4707C9E8F9705246AB9F0CBA53E9F599FDB9C699E48366ACFE779B8190B23C9AF95F560FB7FA975EFD3A306F30BC747DF41AD2D9AB1035AAADFC05CD618E791747B7DEA43CEBB0B8A9B84C2E6FA71BF8CEA513FF97AE1EB3625D9DEEDA9BB6C83C25DDA175BFD6230E4A3C76D4772E12BD4CF10E31E780E6B3FACC7F3676E3694763E9E713BCA173EC70213C1574B49972347590DEE69ADBBE7E28D54BE7D036B4FCCD7F0DA8C3DDDA0B1D667CD62A8DD6EE2ED8D8832D8F1197CC7F5FBE9412566C4DEE3E666E71AE16404D89F402D7EE767B355C861704DF6625CFD14FE15F4FC32B6F8B423EE27867F092D466850370F4F73FF01368992BE]]
 Point(PHandle)
 link(onClick,2214446:doEvent,[])
}
Add(InlineCode,6998165,371,280)
{
 WorkPoints=#6:doText|
 EventPoints=#6:onText|
 DataPoints=#7:Phandle|3:Idx|7:NewText|
 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|12:     onText,|9:     Idx,|13:     NewText,|24:     PHandle: THI_Event;|50:     procedure doText(var Data:TData; Index:word);|5: end;|0:|14:implementation|0:|29:procedure THiAsmClass.doText;|3:var|21:  sControl: PControl;|5:begin|48:  sControl := PControl(ToIntegerEvent(PHandle));|38:  if not Assigned(sControl) then exit;|71:  sControl.TBButtonText[ToIntegerEvent(Idx)] := ToStringEvent(NewText);|4:end;|0:|4:end.|
 link(Phandle,13583034:PHandle,[])
 link(Idx,4627289:Text,[])
 link(NewText,3886641:Text,[(391,257)(412,257)])
}
Add(IndexToChanel,2214446,427,175)
{
 Count=3
 link(onEvent3,6998165:doText,[(466,195)(466,167)(361,167)(361,286)])
}
Add(VisualStrings,3886641,406,231)
{
 Lines=#10:Продолжить|
 Width=74
}
Add(VisualStrings,4627289,378,231)
{
 Lines=#1:2|
 Width=18
}