![]() |
AW: #0 durch "nichts" ersetzen
Zitat:
|
AW: #0 durch "nichts" ersetzen
Zitat:
Ich hab keine Unicode-Textdatei vor mir! Ich hab eine Datei aus einer Siemens-Steuerung, die ich versuche auszulesen. Und diese hat lauter #0´s drin. |
AW: #0 durch "nichts" ersetzen
Zitat:
|
AW: #0 durch "nichts" ersetzen
Zitat:
Aber ich muss dir wiederrum wiedersprechen, das ist keine UniCode-Datei! Und die Texte werden auch nicht als Unicode-Strings gespeichert! |
AW: #0 durch "nichts" ersetzen
Hier noch eine Version, die direkt auf dem String arbeitet:
Delphi-Quellcode:
j:=0;
For i:=1 to Length(s) do if s[i]<>#0 then begin inc(j); s[j] := s[i]; end; SetLength (S,j); |
AW: #0 durch "nichts" ersetzen
Zitat:
Aber kannst du dafür sorgen das das €-Zeichen in der Datei liegt? Damit könnte man Unicode ausschließen. |
AW: #0 durch "nichts" ersetzen
Zitat:
|
AW: #0 durch "nichts" ersetzen
Dennoch wäre es wohl einfacher/sicherer, den Text in einen WideString zu kopieren oder nach Ansi umzuwandeln
![]() |
AW: #0 durch "nichts" ersetzen
Lieber nicht,
da ich die Daten so wie sie abgelegt sind brauche und lieber unverändert/unverwandelt lasse. (Sonst gibts Schläg von meinen Kollegen, und wer will mir das schon antun?) |
AW: #0 durch "nichts" ersetzen
Also doch WideString, denn beim Löschen/Ersetzen der #0 veränderst du das ja. :zwinker:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:52 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 by Thomas Breitkreuz