Вверх ↑
Ответов: 537
Рейтинг: 14
#1: 2017-07-18 08:12:34 ЛС | профиль | цитата
Удаляет от указанного слова до конца строк и сохраняет

Add(MainForm,2953706,21,168)
{
link(onCreate,15381611:doExecute,[])
}
Add(Delete,1856882,231,378)
{
link(onDelete,15502664:doEvent1,[])
link(Str,28556:Var2,[])
link(Position,12499524:Position,[])
link(Count,7263068:Position,[(251,366)(272,366)(272,479)(223,479)])
}
Add(ODialog,15381611,70,182)
{
link(onExecute,2377438:doEvent1,[])
}
Add(Edit,959078,245,231)
{
Left=5
Top=5
Width=365
Text=""
}
Add(Position,12499524,238,322)
{
ShortSearch=1
link(onSearch,9007889:doEvent1,[])
link(Str,14350323:Var2,[])
link(Target,959078:Text,[])
}
Add(GetDataEx,14350323,238,287)
{
link(Data,219047:Text,[])
}
Add(StrList,219047,238,161)
{
Point(EndIdx)
Point(doGetString)
Point(onGetString)
link(FileName,4487202:GetData,[])
link(onGetString,12763116:doData,[])
}
Add(Position,7263068,217,434)
{
ShortSearch=1
link(onSearch,1856882:doDelete,[(261,440)(261,412)(219,412)(219,384)])
link(Str,28556:Var1,[(223,362)])
link(Target,12763116:GetData,[(230,282)(377,282)])
}
Add(GetDataEx,28556,231,357)
{
link(Data,14350323:Var1,[(237,292)])
}
Add(EventFromData,12763116,371,168)
{
}
Add(Hub,9007889,287,322)
{
link(onEvent1,426995:doData,[])
link(onEvent2,7263068:doSearch,[(323,335)(323,416)(205,416)(205,440)])
}
Add(Button,10070301,154,322)
{
Left=5
Top=30
Caption="Удалить"
link(onClick,12499524:doSearch,[])
}
Add(DoData,426995,329,322)
{
link(onEventData,219047:doGetString,[(373,328)(373,266)(231,266)(231,209)])
link(Data,219047:EndIdx,[(335,229)(265,229)])
}
Add(Hub,2377438,126,182)
{
link(onEvent1,4487202:doData,[(192,188)(192,118)])
link(onEvent2,219047:doLoad,[])
}
Add(EventFromData,4487202,245,112)
{
}
Add(Hub,15502664,287,378)
{
link(onEvent1,219047:doText,[(319,384)(319,283)(226,283)(226,188)])
link(onEvent2,219047:doSave,[(313,391)(313,294)(219,294)(219,202)])
}
карма: 4

0