[Elven_Fun]

Как удалить букву из слова?
Как можно очистит лишние пробелы в тексте?

[Aristarh Dark]

1. Delete
2. Да

[The Shadow]

Сообщение от Elven_Fun

Как удалить букву из слова?
Как можно очистит лишние пробелы в тексте?

Все прбелы или только первые и последние?

[The Shadow]

Вот код для удаления первых и последних пробелов:

Код:

function DeleteSpaces(S: String): String;
begin
Result:=S;
while Result[1] = ' ' do
Delete(Result, 1, 1);
while Result[Length(Result)] = ' ' do
Delete(Result, Length(Result), 1);
end;

[Aristarh Dark]

то же что и The Shadow только чуть короче:

Код:

S:=Trim(S);

[The Shadow]

Сообщение от Aristarh Dark

то же что и The Shadow только чуть короче:

Код:

S:=Trim(S);

Не знал. :-)

[Winny]

Заменить все пробелы в строке:

Код:

S:=StringReplace(S,' ','',[rfReplaceAll])

[Aristarh Dark]

Сообщение от Winny

Заменить все пробелы в строке:

Код:

S:=StringReplace(S,' ','',[rfReplaceAll])

Это удалит все пробелы в строке!