Вверх ↑
Этот топик читают: Гость
Ответов: 3
Рейтинг: 0
#1: 2014-07-11 17:40:07 ЛС | профиль | цитата
Парни выручайте, не могу никак понять как сделать.Надо вписать например 100 символов и перейти на следующую строку,а у меня получается по одному символу в строке,уже 2 дна мучаюсь что только не пробывал не получается.В RichEdit я понял как писать символы в в одну строку,надо (InsertCRLF - Вставлять символы 13 и 10 при добавлении новой строки) поменять в False,но как перейти на следующую строку после добавления определенного числа символов так и не разобрался.И кстати символы идут непрерывным потоком в 0 и 1.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#2: 2014-07-11 18:15:09 ЛС | профиль | цитата
Используй StrCat + Length
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 3
Рейтинг: 0
#3: 2014-07-11 18:36:27 ЛС | профиль | цитата
Все равно не понял, можете привести пожалуйста пример как сделать с непрерывного потока 0 и 1 строку из 100 символов, как только строка достигнет 100 она перейдет на другую строку,т.е. 1 строка =100 символов,2 строка =100 символов,3 строка =100 символов и.т.д
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2014-07-11 18:47:59 ЛС | профиль | цитата
code_33985.txt
------------ Дoбавленo в 18.47:
или так из "0" и "1" :

Add(MainForm,2953706,91,189)
{
Width=1009
Height=660
link(onCreate,16655523:doFor,[])
}
Add(ListBox,11199062,714,210)
{
Left=5
Top=65
Width=970
Height=535
Font=[Consolas,12,0,0,204]
link(onChange,4850231:doClear,[(756,216)(756,263)(534,263)(534,216)])
}
Add(StrCat,4850231,546,203)
{
Point(doClear)
link(onStrCat,663139:doEvent1,[])
link(Str1,4850231:Result,[(552,191)(597,191)(597,249)(552,249)])
}
Add(If_else,2765891,644,210)
{
Op2=Integer(100)
link(onTrue,11199062:doAdd,[])
link(Op1,13638953:Result,[])
}
Add(Length,13638953,644,154)
{
}
Add(Hub,663139,609,203)
{
link(onEvent1,13638953:doLength,[(632,209)(632,160)])
link(onEvent2,2765891:doCompare,[])
}
Add(For,16655523,217,203)
{
End=10000
link(onEvent,2342025:doRandom,[])
}
Add(Random,2342025,287,203)
{
Min=48
Max=49
link(onRandom,2965997:doConvert,[])
}
Add(Convertor,2965997,343,203)
{
Mode=4
link(onResult,4850231:doStrCat,[])
}
Add(InfoTip,2765396,518,126)
{
Info=#21:Это то, что ты просил|
Font=[MS Sans Serif,8,1,255,1]
Width=253
Height=172
Margin=5
}
Add(InfoTip,13459353,203,126)
{
Info=#15:Генератор 0 и 1|
Font=[MS Sans Serif,8,1,255,1]
Width=183
Height=151
Margin=5
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_33985.txt [1.1KB] [84]
Ответов: 3
Рейтинг: 0
#5: 2014-07-11 19:03:34 ЛС | профиль | цитата
Tad Вы Человек с большой буквы)) спасибо огромное, все работает
карма: 0

0
5
Сообщение
...
Прикрепленные файлы
(файлы не залиты)