Zeichen in einem String ersetzen |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Dieses Beispiel ersetzt alle Leerzeichen durch Nullen:
procedure TForm1.Button1Click(Sender: TObject);
var
S: string;
begin
S := ' 123,5';
//Leerzeichen in Nullen umwandeln
while Pos(' ', S) > 0 do
S[Pos(' ', S)] := '0';
end;
Dieses Beispiel löscht alle Leerzeichen:
procedure TForm1.Button1Click(Sender: TObject);
var
S: string;
begin
S := ' 123,5';
while Pos(' ', S) > 0 do
Delete(S,Pos(' ', S),1);
end;
// TODO: StringReplace?
Ähnliche Seiten:
- Text im StringGrid ausrichten
- StringGrid Text vertikal ausgeben
- Datei in einen String laden
- Strings in einem Bitmap ausgeben
- String in der Tag-Eigenschaft speichern
- Wort aus einem String an einer Position extrahieren
- String hinter Cursorposition einfügen
- Hinzufügen von Einträgen in Listen beschleunigen
- Prüfen, ob ein Eintrag in TStrings schon vorhanden ist
- Stringgrid-Zelle per Programmcode selektieren