Thema: Delphi groß/kleinschreibung

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.287 Beiträge
 
Delphi 12 Athens
 
#27

Re: groß/kleinschreibung

  Alt 22. Mai 2006, 20:53
einfach nach dem Plus suchen und dann jeweils das Zeichen davor und dahinter prüfen, ob's ein Leerzeichen ist und wenn nicht, dann einfach eines einfügen

Was man z.B. z.B. machen kann:
Delphi-Quellcode:
i := Pos('+', S);
If i <> 0 Then Begin
  If (i > 1) and (S[i - 1] <> ' ') Then Insert(' ', S, i);
  If (i < Length(S)) and (S[i + 1] <> ' ') Then Insert(' ', S, i + 1);
End;
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat