Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2012-12-09 20:30:58 ЛС | профиль | цитата
г. Гость Алексей, Надо очищать StrList.
------------ Дoбавленo в 20.30:

Add(MainForm,2953706,63,203)
{
Height=125
Position=1
}
Add(SearchInFile,11930633,217,175)
{
Text="DISPLAY_LENGTH:"
Point(onEnd)
link(onNotSearch,4996106:doWork2,[])
link(onSearch,11481593:doString,[])
link(FileName,5732926:Var2,[])
link(Text,7203:Var1,[(230,153)])
link(onEnd,3378209:doEvent1,[(255,195)(255,216)])
}
Add(Edit,5222673,217,98)
{
Left=5
Top=20
Width=135
}
Add(Edit,13854287,273,98)
{
Left=145
Top=20
Width=115
Text="DISPLAY_LENGTH:"
}
Add(Edit,9546985,315,98)
{
Left=265
Top=20
}
Add(Button,6769630,63,161)
{
Left=45
Top=50
link(onClick,8735501:doEvent1,[])
}
Add(StrList,12348525,427,175)
{
link(FileName,5732926:Var3,[(440,138)])
}
Add(HubEx,4996106,378,175)
{
link(onEvent,12348525:doAdd,[])
}
Add(GetDataEx,5732926,217,133)
{
link(Data,5222673:Text,[])
}
Add(FormatStr,11481593,294,182)
{
Mask="[%1:%2]"
link(onFString,4996106:doWork3,[(382,188)])
link(Str1,7203:Var3,[(300,153)])
link(Str2,9546985:Text,[(307,156)(321,156)])
}
Add(GetDataEx,7203,273,148)
{
link(Data,13854287:Text,[])
}
Add(Label,8365245,61,98)
{
Left=5
Width=311
Height=17
Caption="Полный путь к файлу Параметр Значение"
}
Add(Label,1127888,448,70)
{
Left=150
Top=50
Width=86
Height=17
Visible=1
Caption="Файл сохранён."
Point(doVisible)
}
Add(Hub,3378209,336,210)
{
link(onEvent1,12348525:doSave,[])
link(onEvent2,1254962:doWork2,[(366,223)(366,90)])
}
Add(Hub,8735501,105,161)
{
OutCount=3
link(onEvent1,1254962:doWork1,[(130,167)(130,83)])
link(onEvent2,12348525:doClear,[(410,174)(410,188)])
link(onEvent3,11930633:doSearch,[])
}
Add(ChanelToIndex,1254962,378,77)
{
link(onIndex,1127888:doVisible,[])
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0