|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Не сохранять в файл пустую строку
Как проверить что пустая строка (пробелы) и не записывать в файл?
Код:
Writeln(f, Trim(RegExp.Match[1])); |
#2
|
|||
|
|||
Ну а самому подумать?
Код:
var Buf : String; begin ... Buf := Trim(RegExp.Match[1]); If Buf <> '' Then WriteLb(f, Buf); |
Этот пользователь сказал Спасибо lmikle за это полезное сообщение: | ||
noviceQ (30.08.2015)
|
#3
|
||||
|
||||
Тут хитрость в том, что даже если у вас строка будет пустая, в файл запишется #13#10 которые WriteLn генерит в конце любой строки.
Можно переписать ваш код так: Код:
Write(f, IfThen(Length(Trim(RegExp.Match[1]))=0,'',RegExp.Match[1]+#13#10)); Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. Последний раз редактировалось Страдалецъ, 30.08.2015 в 10:55. |
Этот пользователь сказал Спасибо Страдалецъ за это полезное сообщение: | ||
noviceQ (30.08.2015)
|
#4
|
|||
|
|||
Цитата:
Код:
... if Trim(RegExp.Match[1]) <> '' then Writeln(f, Trim(RegExp.Match[1])); ... Последний раз редактировалось noviceQ, 30.08.2015 в 13:45. |
#5
|
||||
|
||||
Вариант lmikle лучше, т.к. Trim вызывается только один раз.
jmp $ ; Happy End! The Cake Is A Lie. |