Как удилить в строке пробелы ?

← →
Kostafey © (2007-01-18 00:19) [0]

Вопрос на один ответ. Хуть убей забыл как функция называется.

← →
Джо © (2007-01-18 00:22) [1]

StringReplace

← →
Джо © (2007-01-18 00:23) [2]

Однако же никто не мешает сделать через простой цикл.

← →
kaZaNoVa © (2007-01-18 00:27) [3]

pos

← →
Kostafey © (2007-01-18 00:36) [4]

Всем спасибо!
Но зачем же такие сложности?
Я ж просто просил напомнить функцию Trim !

← →
default © (2007-01-18 00:37) [5]

если он помнил название функции то он, возможно, ищет Trim

← →
default © (2007-01-18 00:37) [6]

Kostafey © (18.01.07 00:36) [4]
трим по бокам только кромсает пробелы

← →
Kostafey © (2007-01-18 00:39) [7]

> [5] default ©

А правда, что общение на DelphiMaster развивает у людей телепатические способности ?

← →
Kostafey © (2007-01-18 00:41) [8]

> [6] default © (18.01.07 00:37)

Да, да я забыл про это сказать. Это-то мне и нужно было.
StringReplace сможет затереть все.

← →
default © (2007-01-18 00:41) [9]

Kostafey © (18.01.07 00:39) [7]
я тут редко бываю:)

← →
Джо © (2007-01-18 00:46) [10]

Trim вовсе не удаляет «строке пробелы», между нами говоря. От удаляет только лидирующие и концевые проблемы.

← →
Джо © (2007-01-18 00:46) [11]

> проблемы.

:) пробелы.

← →
Kostafey © (2007-01-18 00:55) [12]

> Trim вовсе не удаляет «строке пробелы», между нами говоря.
> От удаляет только лидирующие и концевые проблемы.

Ну извиние еще раз: ошибся я в формулировке вопроса.
Именно от первых и последних пробелов мне и нужно было избавиться.

Я когда справку по StringReplace искал на Trim случайно наткнулся.

Спасибо за помошь.

> Джо © (18.01.07 00:46) [10]
>
> Trim вовсе не удаляет «строке пробелы», между нами говоря.
А в сабже нужно было не "удалить", а "удилить" :)
>
> Джо © (18.01.07 00:46) [11]
>
> > проблемы.
>
> :) пробелы.
>

А от проблем не спасёт ни Trim, ни StringReplace, ни даже коньяк с екибаной :)

К тому же, Trim удаляет не только пробелы...

> begin...end © (18.01.07 08:41) [14]

Да-да, все символы <= #32:
function Trim(const S: string): string; var I, L: Integer; begin L := Length(S); I := 1; while (I <= L) and (S[I] <= " ") do Inc(I); if I > L then Result := "" else begin while S[L] <= " " do Dec(L); Result := Copy(S, I, L - I + 1); end; end;
Кстати, можно значительно ускорить функцию, если добавить
if (i = 1) and (L = L0) then result := s
Потому что Copy всегда создаёт новую строку и копирует память, а result := s лишь делает ссылку

← →
Anatoly Podgoretsky (2007-01-18 19:34) [16]

> Джо (18.01.2007 00:46:11) [11]

Это не опечатка, это правда.

← →
Anatoly Podgoretsky (2007-01-18 19:34) [17]

> Германн (18.01.2007 01:07:13) [13]

С чем, с чем???

> Anatoly Podgoretsky (18.01.07 19:34) [17]
>
> > Германн (18.01.2007 01:07:13) [13]
>
> С чем, с чем???
>

http://delphimaster.net/view/15-1169060320/
:)))

Как удилить в строке пробелы ? Найти похожие ветки