if (ind < 0) or (ind > FList.Count - 1) then exit;
Но вполне было достаточно и вот такой
if (ind < 0) then exit;
filyaxxxcom писал(а):
Точка doInsert понадобилась для обратной сортировки упорядоченнного списка строкА вот так сделать нельзя было Быстродействие еще выше, чем с doInsert
Add(MainForm,35645,263,89)
{
Width=323
Height=364
Position=1
link(onCreate,16542094:doFor,[])
}
Add(ListBox,9870300,728,169)
{
Left=10
Top=10
Width=140
Height=210
}
Add(ListBox,9135548,728,266)
{
Left=165
Top=10
Width=135
Height=210
}
Add(Button,16161122,97,266)
{
Left=10
Top=245
Width=240
Caption="Обратная сортировка используя doGetString"
link(onClick,15885844:doEvent1,[])
}
Add(StrList,3278894,430,420)
{
@Hint=#45:тут добавлена ненужная строка для возможности|29:использования точки doInsert |
Strings=#16:ненужная сторока|
Point(doInsert)
link(Str,12773655:Item,[(436,408)(315,408)(315,506)(335,506)])
AddHint(16,-54,198,39,@Hint)
}
Add(Button,11894171,98,455)
{
Left=10
Top=290
Width=240
Caption="Обратная сортировка используя doInsert"
link(onClick,294177:doEvent1,[])
}
Add(ArrayEnum,12773655,329,462)
{
link(onItem,394757:doData,[])
link(onEndEnum,9894289:doData,[(369,475)(369,503)])
link(Array,6166207:Var2,[])
}
Add(DoData,9894289,430,497)
{
link(onEventData,1044661:doEvent1,[])
link(Data,3278894:Text,[])
}
Add(DoData,394757,378,462)
{
Data=Integer(0)
link(onEventData,3278894:doInsert,[])
}
Add(StrList,13022606,371,103)
{
Point(doGetString)
Point(onGetString)
}
Add(For,16542094,308,103)
{
End=10000
link(onEvent,13022606:doAdd,[])
link(onStop,2596150:doData,[(350,116)(350,196)])
}
Add(DoData,2596150,371,190)
{
link(onEventData,9870300:doText,[])
link(Data,13022606:Text,[])
}
Add(DoData,1599264,516,280)
{
link(onEventData,9029228:doEvent1,[])
link(Data,9980251:Text,[])
}
Add(StrList,9980251,516,110)
{
}
Add(HubEx,6013925,679,287)
{
link(onEvent,9135548:doText,[])
}
Add(TimeCounter,1863297,181,224)
{
link(onStop,6303535:doText,[])
}
Add(Label,6303535,230,231)
{
Left=265
Top=250
}
Add(Label,12699063,226,427)
{
Left=264
Top=290
}
Add(Hub,15885844,139,266)
{
link(onEvent1,1863297:doStart,[(162,272)(162,230)])
link(onEvent2,16518440:doEnum,[])
}
Add(Hub,9029228,566,280)
{
link(onEvent1,1863297:doStop,[(593,286)(593,317)(171,317)(171,237)])
link(onEvent2,6013925:doWork2,[])
}
Add(Hub,1044661,476,497)
{
link(onEvent1,8648412:doStop,[(506,503)(506,539)(170,539)(170,433)])
link(onEvent2,6013925:doWork3,[(683,510)])
}
Add(Hub,294177,140,455)
{
link(onEvent1,8648412:doStart,[(162,461)(162,426)])
link(onEvent2,12773655:doEnum,[])
}
Add(TimeCounter,8648412,182,420)
{
link(onStop,12699063:doText,[])
}
Add(ArrayEnum,16518440,392,273)
{
Type=1
link(onItem,9980251:doAdd,[(470,279)(470,116)])
link(onEndEnum,1599264:doData,[])
link(Array,6166207:Var3,[(398,229)])
}
Add(GetDataEx,6166207,329,224)
{
link(Data,13022606:Array,[(335,172)(391,172)])
}