Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Kostafey © (2007-01-18 00:19:00)
Вопрос на один ответ. Хуть убей забыл как функция называется.

Германн (2007-01-19 00:12:00) [1]

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

http://delphimaster.ru/cgi-bin/forum.pl?id=1169060320&n=3
:)))

Anatoly Podgoretsky (2007-01-18 19:34:00) [2]
> Германн (18.01.2007 01:07:13) [13]

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

Anatoly Podgoretsky (2007-01-18 19:34:00) [3]
> Джо (18.01.2007 00:46:11) [11]

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

ors_archangel (2007-01-18 11:28:00) [4]

> 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 лишь делает ссылку

begin...end (2007-01-18 08:41:00) [5]
К тому же, Trim удаляет не только пробелы...

Германн (2007-01-18 01:07:00) [6]

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

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

Kostafey (2007-01-18 00:55:00) [7]
> Trim вовсе не удаляет «строке пробелы», между нами говоря.
> От удаляет только лидирующие и концевые проблемы.

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

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

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

Джо (2007-01-18 00:46:00) [8]
Trim вовсе не удаляет «строке пробелы», между нами говоря. От удаляет тольколидирующие и концевые проблемы.

Джо (2007-01-18 00:46:00) [9]
> проблемы.

:) пробелы.

default (2007-01-18 00:41:00) [10]
Kostafey © (18.01.07 00:39) [7]
я тут редко бываю:)

Kostafey (2007-01-18 00:41:00) [11]
> [6] default © (18.01.07 00:37)

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

Kostafey (2007-01-18 00:39:00) [12]
> [5] default ©

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

default (2007-01-18 00:37:00) [13]
Kostafey © (18.01.07 00:36) [4]
трим по бокам только кромсает пробелы

default (2007-01-18 00:37:00) [14]
если он помнил название функции то он, возможно, ищет Trim

Kostafey (2007-01-18 00:36:00) [15]
Всем спасибо!
Но зачем же такие сложности?
Я ж просто просил напомнить функцию Trim !

kaZaNoVa (2007-01-18 00:27:00) [16]
pos

Джо (2007-01-18 00:23:00) [17]
Однако же никто не мешает сделать через простой цикл.

Джо (2007-01-18 00:22:00) [18]
StringReplace

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »