Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > #13 перевод на след.строку, а наоборот

Автор: Drizhenko 22.12.2005, 04:43

Подскажите, пожалуйста, как вернуться на предыдущую строку. Этакая противоположность #13.

Автор: Albinos_x 22.12.2005, 05:59

не понятно, что требуется... поясни, что значит перевести строку на предыдущую, как #13....тебе курсор перевести?

Автор: Drizhenko 22.12.2005, 06:08

Есть текстовая переменная, котоая содержит столбик строк. Допутим.
Гагарина
Мира
Обручева

Переход на следующую строку осуществляется с помощью #13. Вследствии чего последняя строка получается пустой. Т.е. переход осуществился, а улицы нет. Как её (пустую строку) убрать?

Автор: andrey_pst 22.12.2005, 06:34

Trim(); TrimLeft(); TrimRight();

Автор: Quadr0 22.12.2005, 14:07

...

Автор: Yanis 22.12.2005, 15:42

Может ты имеешь ввиду пару символов #13#10 в конце строковой переменной? Тогда можно так удалить:

Код


  if (S[Length(S)] = #10) and (S[Length(S)-1] = #13) then
    Delete(S, Length(S)-1, Length(S));
    { or
      S := Copy(S, 1, Length(S)-2); }

Автор: ambarka 22.12.2005, 16:32

извините меня, зачем городить велосипед, уже давно все придумано

Цитата(Quadr0 @ 22.12.2005, 14:07)

эти методы удаляют лишние пробелы из строки

SysUtils -> function Trim(const S: string): string;

Код


while S[L] <= ' ' do Dec(L);

только ли пробелы? условие S[L] <= ' ' о чем нибудь говорит?

p.s. Trim & F1 -> Trims leading and trailing spaces and control characters from a string.

Автор: Zero 22.12.2005, 16:57

Цитата(Drizhenko @ 22.12.2005, 05:43)

Подскажите, пожалуйста, как вернуться на предыдущую строку. Этакая противоположность #13.

А теперь окнончательный ответ, в точности соостветствующий вопросу...

Ответ: #8

Автор: Poseidon 22.12.2005, 17:45

Цитата(Drizhenko @ 22.12.2005, 06:08)

Есть текстовая переменная, котоая содержит столбик строк

А почему бы просто не использовать TStringList?

Автор: Quadr0 22.12.2005, 20:32

...

Автор: Drizhenko 23.12.2005, 05:15

Спасибо всем, Trim() подходит.

Автор: ambarka 23.12.2005, 09:57

offtop:
Zero, жжоте! smile