Strings ohne Leerzeichen ausgeben

[Tobicaster]

Heyho!

Ich möchte gerne noch Satzpalindrome checken, allerdings muss ich da ja irgendwie die Leerzeichen im String loswerden. Wie ist das möglich?

Delphi-Quellcode:

var
  Palindrom: string;
begin
  Palindrom := AnsiLowerCase(EEdit.Text);
  if Palindrom = ReverseString(Palindrom) then
    begin
    Showmessage('Oh mein Gott! Du hast ein Palindrom eingegeben!');
    end;
end;

[xaromz]

Hallo,

meinst Du am Anfang und am Ende? Dann ist Trim Dein Freund. Wenn Du sämtliche im String Leerzeichen meinst, kannst Du das z. B. mit StringReplace bewerkstelligen:

Delphi-Quellcode:

S := StringReplace(S, ' ', '', [sfReplaceAll]);

Gruß
xaromz

[grenzgaenger]

aber nicht vergessen, auch die satzzeichen mit zu entfernen

• UHU!

was ist das... was du suchst, oder doch lieber nicht :mrgreen: :gruebel:

[knolli]

Zitat:

Zitat von xaromz

Hallo,

meinst Du am Anfang und am Ende? Dann ist Trim Dein Freund. Wenn Du sämtliche im String Leerzeichen meinst, kannst Du das z. B. mit StringReplace bewerkstelligen:

Delphi-Quellcode:

S := StringReplace(S, ' ', '', [sfReplaceAll]);

Gruß
xaromz

mir ist ein fehler bei dir aufgefallen...

es heißt

Delphi-Quellcode:

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

nicht

Delphi-Quellcode:

S := StringReplace(S, ' ', '', [sfReplaceAll]);