|
Вопрос # 1 583/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
Подскажите пожалуйста. Необхоимо удалить из строки #$D#$A и прочитать несколько строк как одну целую.
Как это можно осуществить?
 |
Вопрос задал: John (статус: Посетитель)
Вопрос отправлен: 14 мая 2008, 07:22
Состояние вопроса: открыт, ответов: 3.
|
Ответ #1. Отвечает эксперт: Иусов Сергей Ник.
Здравствуйте, John-1434!
Используй функцию StringReplace из модуля StrUtils
 |
Ответ отправил: Иусов Сергей Ник. (статус: 3-ий класс)
Время отправки: 14 мая 2008, 07:26
Оценка за ответ: 4
|
Ответ #2. Отвечает эксперт: min@y™
Дополню немного. Скорее всего, нужно не удалить символы переноса строки и возврата каретки (#13#10), а заменить их на пробелы (чтоб слова не слипались).
AllText:= StringReplace(Memo.Lines.Text, #13#10, #32, rfReplaceAll);
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 14 мая 2008, 08:18
Оценка за ответ: 5
|
Ответ #3. Отвечает эксперт: ANBsoft
Здравствуйте, John-1434!
Если прочитать из файла, то примерно так:
Var F:TextFile;
s,s1:String;
Begin
AssignFile(f,'FileName.ext');
Reset(f);
s:='';
while not EOF(f) do begin
readln(f,s1);
s:=s+s1;//Если нужно, можно еще пробел добавить.
end;
closefile(f);
 |
Ответ отправил: ANBsoft (статус: Студент)
Время отправки: 14 мая 2008, 09:05
Оценка за ответ: 4
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|