Вверх ↑
Этот топик читают: Гость
Ответов: 42
Рейтинг: 3
#1: 2012-08-12 17:17:12 ЛС | профиль | цитата
вопросец назрел
как текст из потока вывести в одну строку без переносов
code_28741.txt
сидел сидел ничего не получается
карма: 1

0
файлы: 1code_28741.txt [541B] [92]
Ответов: 1821
Рейтинг: 168
#2: 2012-08-12 17:19:30 ЛС | профиль | цитата
pavleg, Replace
карма: 5

0
Ответов: 42
Рейтинг: 3
#3: 2012-08-12 17:23:32 ЛС | профиль | цитата
а все понял
карма: 1

0
Ответов: 1821
Рейтинг: 168
#4: 2012-08-12 17:24:15 ЛС | профиль | цитата
Заменять "
" на пустоту. Только писать без кавычек надо
карма: 5

0
Ответов: 704
Рейтинг: 44
#5: 2012-08-12 17:26:50 ЛС | профиль | цитата

Add(MainForm,11833027,378,224)
{
Width=675
Height=282
}
Add(Memo,10874735,434,273)
{
Left=10
Top=40
Width=315
Height=195
Strings=#10:т1е1к1с1т1|2:, |10:т2е2к2с2т2|2:, |10:т3е3к3с3т3|2:, |10:т4е4к4с4т4|
link(onChange,14285754:doReplace,[])
}
Add(Button,9110813,378,273)
{
Left=10
Top=10
Width=315
Caption="Нажать"
link(onClick,10874735:doAdd,[])
}
Add(Memo,2730439,602,273)
{
Left=330
Top=40
Width=315
Height=195
}
Add(Replace,14285754,532,273)
{
SubStr="
"
DestStr=" "
link(onReplace,2730439:doAdd,[])
link(Str,10874735:Text,[(538,261)(513,261)(513,344)(440,344)])
}



карма: 0

0
Ответов: 378
Рейтинг: 61
#6: 2012-08-12 17:27:48 ЛС | профиль | цитата
pavleg, StreamConvertor (StrToASCII)

Make(delphi)
ver(4.04 build 185)
Add(StreamConvertor,16051240,567,210)
{
Mode=5
link(onResult,2730439:doAdd,[])
link(Data,10874735:Text,[(573,198)(552,198)(552,267)(531,267)])
}
Add(MainForm,14554130,469,161)
{
Width=675
Height=282
}
Add(Memo,10874735,525,210)
{
Left=10
Top=40
Width=315
Height=195
Strings=#10:т1е1к1с1т1|2:, |10:т2е2к2с2т2|2:, |10:т3е3к3с3т3|2:, |10:т4е4к4с4т4|
link(onChange,16051240:doConvert,[])
}
Add(Button,9110813,469,210)
{
Left=10
Top=10
Width=315
Caption="Нажать"
link(onClick,10874735:doAdd,[])
}
Add(Memo,2730439,623,210)
{
Left=330
Top=40
Width=315
Height=195
}
карма: 0
0
6
Сообщение
...
Прикрепленные файлы
(файлы не залиты)