dunottrue писал(а):
как сделать так что бы работать в программе только со средней частью всего текстового файла? скажем например начиная с 15 строки и заканчивая 33 строкой....
Add(DropFile,14470338,266,126)
{
link(onDropFile,13312380:doEvent1,[])
}
Add(StrList,10988134,378,98)
{
}
Add(Hub,13312380,329,126)
{
link(onEvent1,10988134:doLoad,[])
link(onEvent2,8106846:doFor,[(353,139)(353,181)])
}
Add(For,8106846,364,175)
{
Start=14
End=32
link(onEvent,12489996:doRead,[])
}
Add(ArrayRW,12489996,413,175)
{
link(onRead,762002:doAdd,[])
link(Array,10988134:Array,[(419,159)(398,159)])
}
Add(Memo,762002,490,175)
{
Left=30
Top=45
Width=335
Height=215
ScrollBars=3
}
Номера строк зависят от параметров цикла For - их и менять. Строки нумеруются с нуля (т.е. первая строка имеет индекс в массиве - 0).
dunottrue писал(а):
строку разбитую на части пробелами, разойтись по отдельным текстовым формам
Add(Edit,12045827,224,259)
{
Left=30
Top=20
Width=170
Text="landsad 1700 4541 845 4"
link(onEnter,2587504:doTrim,[])
}
Add(Trim,2587504,273,266)
{
Mode=7
link(onTrim,11638894:doEnum,[])
}
Add(Str_Enum,11638894,322,266)
{
Delimiter=" "
link(onEnum,7354593:doEvent,[])
}
Add(IndexToChanel,7354593,371,266)
{
Count=5
Point(Index)
link(onEvent2,14424782:doMessage,[])
link(Index,11638894:NumSubStr,[(377,254)(353,254)(353,310)(328,310)])
link(onEvent3,2700949:doMessage,[])
link(onEvent4,10341421:doMessage,[(425,293)(425,328)])
link(onEvent5,13155749:doMessage,[(425,300)(425,370)])
}
Add(Message,14424782,490,273)
{
Caption="1"
}
Add(Message,2700949,448,280)
{
Caption="2"
}
Add(Message,10341421,448,322)
{
Caption="3"
}
Add(Message,13155749,448,364)
{
Caption="4"
}
Поиск
Друзья
Администрация