![]() |
Leerzeichen aus string löschen
Hallo!
Ich habe einen String a mit mehreren Leerzeichen am Anfang. Diese möchte ich komplett löschen. ICh dachte das kann man so machen:
Delphi-Quellcode:
aber ich bekomme immer eine fehlermeldung und die letzte zeile wird markiert.
repeat
delete(a,0,1); until a[1]<>' '; Wo ist der Fehler? |
Re: Leerzeichen aus string löschen
Guck mal in der Hiulfe unter [oh]trim(left/right)[/oh].
|
Re: Leerzeichen aus string löschen
Danke!
|
Re: Leerzeichen aus string löschen
Merkwürdig,
in der Hiulfe habe ich nichts gefunden und ein Fehler zeigt er mir auch nicht, er hängt sich nur auf... * er = mein PC |
Re: Leerzeichen aus string löschen
Also am Code würde ich mal folgendes ändern:
Delphi-Quellcode:
while a[1]=' ' do delete(a,0,1);
[edit=SirThornberry]Delphitags berichtigt. Mfg, SirThornberry[/edit] |
Re: Leerzeichen aus string löschen
Trim entfernt Leerzeichen am Anfang und am /ende eines Strings. Soll nur am Anfang oder nur am Ende entfernt werden verwendet man die Funktioenne TrimLeft bzw. TrimRight
Zitat:
|
Re: Leerzeichen aus string löschen
Trim ist die beste Lösung, aber so sollte auch die Andere funktionieren:
Delphi-Quellcode:
Florian
repeat
Delete(a, 1, 1); until Copy(a, 1, 1) <> ' '; |
Re: Leerzeichen aus string löschen
trim würde ich aus performancegründen vorziehen.
|
Re: Leerzeichen aus string löschen
Das mit a[1] dürfte eleganter sein als copy. Und das repeat würde ich durch ein while ersetzen.
Denn mal angenommen, am Anfang des Strings befindet sich kein Leerzeichen, dann würde trotzdem das erste Zeichen gelöscht werden. Besser noch: Folgender String: 'a b' Bei deinem Code würde nur 'b' übrig bleiben. |
Re: Leerzeichen aus string löschen
ich würde mit einer For-Schleife von Anfang bis ende durchgehen und eine zweite zählvariable mitführen die bestimmt wohin geschrieben wird. Kommt ein Leerzeichen so wird diese nicht weitergerückt. Da aber Trim wohl nix anderes macht erspaare ich mir mal den Quelltext zz posten.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:40 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz