[Delphi] Jak usunąć wielokrotne spacje ze stringa?

[Delphi] Jak usunąć wielokrotne spacje ze stringa?
PE
  • Rejestracja: dni
  • Ostatnio: dni
0

Witam,

Czy wie ktoś może jak szybko usuąć wielokrotne spacje ze stringa?
Chodzi mi tutaj o przypadek gdy zamiast jednej spacji jest ich więcej, nie wiadomo ile.
Pozdrawiam

piechnat
  • Rejestracja: dni
  • Ostatnio: dni
0
Kopiuj
function func(s: string): string;
begin
  while pos(#32#32, s) <> 0 do
    s := stringReplace(s, #32#32, #32, [rfReplaceAll]);
  result := trim(s);
end;
PE
  • Rejestracja: dni
  • Ostatnio: dni
0

Działa bajera :d
Big thnx!

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.