Forum: Object-Pascal / Delphi-Language
Delphi
by jfheins,
12. Sep 2008
Ich glaube, jetzt sindd wir an einem Punkt, wo ein quantitativer Vergleich hilfreich wäre :mrgreen:
Ausserdem wäre es interessant, wie die Daten aussehen - also ob im Normalfall alles in Ordung ist, und nur in Ausnahmefällen überhaupt etwas gemacht werden muss, oder ob die doppelten Leerzeichen fast immer vorhanden sind ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by jfheins,
12. Sep 2008
Soo, hier nochmnal das was du wolltest (Nur Leerzeichen löschen, die doppelt sindd, oder vorne oder hinten)
Setlength(Result, length(AString));
j = 1;
SpaceBefore = true;
for(i=1; i<=length(AString); i++)
{
if (not (AString == ' ' and SpaceBefore))
{
Result = AString;
Forum: Object-Pascal / Delphi-Language
Delphi
by jfheins,
12. Sep 2008
Ich würde es so machen:
2 Indizies, einer für den AusgangsString, einer für den Endstring.
Ein bisschen C-like Pseudocode:
Setlength(Result, length(AString));
j = 0;
for(i=0; i<length(AString); i++)
if (AString != ' ')