Make(delphi)
ver(4.04 build 184)
Add(MainForm,10060205,112,84)
{
 Left=20
 Top=105
 Width=618
 Height=751
 Caption="Загрузчик"
 ClientSize=0
}
Add(Label,11771378,644,14)
{
 Left=350
 Top=160
 Width=14
 Height=20
 Caption="R"
}
Add(Edit,7300222,364,14)
{
 Left=350
 Top=55
 Width=250
 Text="1"
}
Add(Edit,14134189,427,56)
{
 Left=350
 Top=185
 Width=250
 Text="0,1"
}
Add(Button,14957407,140,154)
{
 Left=15
 Top=225
 Width=125
 Caption="Преобразование"
 link(onClick,2135612:doEvent1,[(188,160)(188,132)])
}
Add(ArrayEnum,7811733,350,161)
{
 link(onItem,86503:doString,[(390,167)(390,160)])
 link(onEndEnum,3021149:doData,[(394,174)(394,223)])
 link(Array,1963196:Array,[(356,149)(349,149)])
}
Add(Label,13682595,658,56)
{
 Left=350
 Top=215
 Width=90
 Height=20
 Caption="Погрешность"
}
Add(StrList,16371780,455,154)
{
}
Add(Label,13482986,294,7)
{
 Left=10
 Top=35
 Width=65
 Height=20
 Caption="точки X Y"
}
Add(FormatStr,86503,399,154)
{
 DataCount=6
 Mask="[%1];;1;;;%2;%3;%4;%5;%6;"
 link(onFString,16371780:doAdd,[])
 link(Str1,7300222:Text,[(405,100)(370,100)])
 link(Str5,14134189:Text,[])
 link(Str6,10636840:Text,[(440,98)(465,98)])
}
Add(DoData,3021149,455,217)
{
 link(onEventData,12052682:doWork2,[(504,223)(504,144)])
 link(Data,16371780:Text,[])
}
Add(Replace,2281858,252,84)
{
 SubStr=" "
 DestStr=";"
 link(onReplace,1963196:doAdd,[(306,90)(306,97)])
 link(Str,2212373:Text,[])
}
Add(Memo,2212373,252,14)
{
 Left=15
 Top=60
 Width=315
 Height=155
 Strings=#19:295526,15 115334,83|19:295500,32 115327,72|19:295474,33 115319,97|19:295463,66 115316,88|19:295467,62 115299,93|
 ScrollBars=2
}
Add(Hub,2135612,203,126)
{
 OutCount=3
 link(onEvent1,2281858:doReplace,[(235,132)(235,90)])
 link(onEvent2,7811733:doEnum,[(280,139)(280,167)])
 link(onEvent3,16107301:doStrCat,[(273,146)(273,289)])
}
Add(Button,11759354,154,56)
{
 Left=90
 Top=10
 Width=100
 Caption="Очистить все"
 link(onClick,7976860:doEvent1,[(203,62)(203,68)])
}
Add(Hub,7976860,214,62)
{
 OutCount=3
 link(onEvent1,2212373:doClear,[(240,68)(240,27)])
 link(onEvent2,1963196:doClear,[(278,75)(278,104)])
 link(onEvent3,16371780:doClear,[(342,82)(342,167)])
}
Add(Edit,10636840,459,11)
{
 Left=350
 Top=240
 Width=250
 Text="0,2"
}
Add(ODialog,5941211,133,14)
{
 Filter="Тектсовые файлы|*.*txt"
 FileName="txt"
 Select=1
 link(onExecute,2212373:doLoad,[(209,20)(209,48)])
}
Add(Button,1292099,28,14)
{
 Left=5
 Top=5
 Width=65
 Caption="Открыть"
 link(onClick,5941211:doExecute,[(74,20)(74,19)(121,19)(121,20)])
}
Add(SDialog,1319199,224,203)
{
 Filter="Текстовые файлы|*.*txt|*.*csv"
 FileName="КоордТехнокад.csv"
 link(onExecute,1963196:doSave,[(292,209)(292,132)])
}
Add(Button,15576603,144,207)
{
 Left=350
 Top=450
 Width=80
 Caption="Сохранить"
 link(onClick,1319199:doExecute,[(200,213)(200,209)])
}
Add(Label,15041411,648,46)
{
 Left=350
 Top=30
 Width=152
 Height=20
 Caption="Обозначение объекта"
}
Add(HubEx,12052682,413,138)
{
 Angle=2
 link(onEvent,1963196:doText,[(317,144)(317,118)])
}
Add(Memo,6288726,437,347)
{
 Left=20
 Top=505
 Width=580
 Height=200
 ScrollBars=2
}
Add(StrCat,5959164,321,399)
{
 link(onStrCat,6288726:doAdd,[(531,405)(531,353)])
 link(Str1,15739847:Text,[(327,385)(304,385)])
 link(Str2,4648746:Text,[(334,347)(388,347)])
}
Add(Button,12823784,179,319)
{
 Left=20
 Top=475
 Width=170
 Caption="Шапка и результат"
 link(onClick,5959164:doStrCat,[(270,325)(270,405)])
}
Add(StrCat,16107301,330,283)
{
 link(onStrCat,4648746:doAdd,[(372,289)(372,284)])
 link(Str1,1963196:Text,[(336,203)(335,203)])
 link(Str2,4560620:Text,[(343,273)(349,273)])
}
Add(Memo,1963196,329,91)
{
 Left=20
 Top=270
 Width=300
 Height=195
 Visible=1
 ScrollBars=3
}
Add(StrList,4560620,343,217)
{
 Strings=#15:
;;;;;;;;;;;|
}
Add(StrList,15739847,298,326)
{
 Strings=#45:Обозначение объекта;номер;X;Y;;;R;погрешность|15:;;;;;;;;;;;
|
}
Add(Memo,4648746,382,278)
{
 Left=15
 Top=250
 Width=315
 Height=225
 ScrollBars=3
}
Add(Label,8604452,642,40)
{
 Left=350
 Top=90
 Width=118
 Height=20
 Caption="Нумерация строк"
}
Add(Edit,5678058,522,53)
{
 Left=350
 Top=115
 Width=250
 Text="1"
}