Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2015-04-03 08:39:34 ЛС | профиль | цитата
VadimM писал(а):
Была у меня такая попытка — вставить
Зачем ?
Можно было и так решить :

Add(ODialog,12900011,175,112)
{
link(onExecute,4838462:doEvent1,[])
}
Add(Button,10542969,126,112)
{
Left=25
Top=25
Width=100
Height=25
Caption="Выбрать файл"
link(onClick,12900011:doExecute,[])
}
Add(StrList,8982454,448,133)
{
FileName="mytext.txt"
}
Add(If_else,2864856,329,126)
{
Op2=String()
link(onTrue,16769151:doWork1,[(424,132)])
link(onFalse,10274204:doString,[])
}
Add(FormatStr,10274204,378,133)
{
DataCount=1
Mask="{{Выступ|%1}}"
link(onFString,16769151:doWork2,[])
}
Add(Hub,4838462,217,112)
{
link(onEvent1,8982454:doClear,[(433,118)(433,146)])
link(onEvent2,15652489:doSearch,[])
}
Add(HubEx,16769151,420,133)
{
link(onEvent,8982454:doAdd,[])
}
Add(SearchInFile,15652489,266,119)
{
Sensitive=1
Point(onEnd)
link(onSearch,2864856:doCompare,[])
link(onEnd,8982454:doSave,[(315,139)(315,174)])
}


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