Leerzeichen in einem String rauslöschen

[Tails]

Hi! Kleine Beginner Frage hier. :wiejetzt:

Gibt es eine Funktion mit der ich in einem String alle Leerzeichen rauslöschen kann?

Hier ein Beispiel:

String := '12 34 56'
soll zu
String := '123456'
werden

Ich weiß ich kann mit der Funktion "Trim" bzw "Trimleft" & "Trimright"
die Leerzeichen am Anfang und Ende des Strings wegnehmen, geht es aber auch mit Leerzeichen mittendrin?

[DeddyH]

Einfachste Möglichkeit:

Delphi-Quellcode:

DeinString := StringReplace(DeinString, ' ', '', [rfReplaceAll]);

P.S.: Willkommen in der DP :dp:

[Tails]

Zitat:

Zitat von DeddyH (Beitrag 1280516)

Einfachste Möglichkeit:

Delphi-Quellcode:

DeinString := StringReplace(DeinString, ' ', '', [rfReplaceAll]);

P.S.: Willkommen in der DP :dp:

Cool danke für die Hilfe :thumb:

[himitsu]

PS: Jemand ist mal auf die saublöde Idee gekommen und hat auch noch ein ReplaceStr und ReplaceText eingeführt, welche für "ersetzte alles" irgendwie netter sind.
(einen Default-Wert für die TReplaceFlags wäre aber bestimmt besser gewesen :wall:)

Und, seit XE3, natürlich noch TStringHelper.Replace. :stupid:

[DeddyH]

Zitat:

Zitat von himitsu (Beitrag 1280527)

..., welche für "ersetzte alles" irgendwie netter sind.

Hm... http://docwiki.embarcadero.com/Libra...ils.ReplaceStr

Zitat:

Anmerkung: Das rekursive Ersetzen von Teilstrings wird nicht unterstützt. Das bedeutet Folgendes: Wenn die Ersetzung von AToText eine neue Übereinstimmung für AFromText ergibt, wird diese Übereinstimmung nicht ersetzt.

[himitsu]

Zitat:

Delphi-Quellcode:

function ReplaceStr(const AText, AFromText, AToText: string): string;
begin
  Result := AnsiReplaceStr(AText, AFromText, AToText);
end;

function AnsiReplaceStr(const AText, AFromText, AToText: string): string;
begin
  Result := StringReplace(AText, AFromText, AToText, [rfReplaceAll]);
end;

Wem glaubt man da wohl mehr? :roll:

[DeddyH]

Soll man nun jede Funktion erst im Quelltext nachlesen? Dafür ist mir meine Zeit zu schade.

[Sherlock]

Zitat:

Zitat von DeddyH (Beitrag 1280546)

Soll man nun jede Funktion erst im Quelltext nachlesen? Dafür ist mir meine Zeit zu schade.

Dafür ein +1

Sherlock

[himitsu]

Ich hatte das in der OH damals garnicht nachgelesen. Sah die Funktion nur mal in irgendeinem Code und dachte erst "hääääää, wird das nicht andersrum geschrieben?" und dort wurde es halb für "ersetzte Alles" verwendet, also hatte ich mir das so gemerkt. :oops:


Jetzt muß man sich nur noch überlegen was man repariert
* die OH umschreiben, damit dort steht, was wirklich passiert
* oder die Funktion umschreiben, damit sie das macht, was die OH behauptet :stupid:

[Der schöne Günther]

Ich schaue mittlerweile leider auch oft in den Quelltext. Die Hilfe hat mich schon zu oft belogen. RAD at its best.