#0 durch "nichts" ersetzen

[Bernhard Geyer]

Zitat:

Zitat von Helmi (Beitrag 1042084)

Dort ersetz ich #0 durch #32 (Leerzeichen)
Wie kann ich aber das #0 durch nichs ersetzen? - also komplett löschen?

Hört sich danach an das du eine Unicode-Textedatei vor dir hast. Bedenke das dein "schöne" Idee das €-Zeichen zerschießt!

[Helmi]

Zitat:

Zitat von Bernhard Geyer (Beitrag 1042257)

Zitat:

Zitat von Helmi (Beitrag 1042084)

Dort ersetz ich #0 durch #32 (Leerzeichen)
Wie kann ich aber das #0 durch nichs ersetzen? - also komplett löschen?

Hört sich danach an das du eine Unicode-Textedatei vor dir hast. Bedenke das dein "schöne" Idee das €-Zeichen zerschießt!

Nein, nein :-)

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.

[Bernhard Geyer]

Zitat:

Zitat von Helmi (Beitrag 1042283)

Ich hab eine Datei aus einer Siemens-Steuerung, die ich versuche auszulesen.
Und diese hat lauter #0´s drin.

Wird das gleiche sein. Die Steuerungsdatei speichert Texte als Unicodestrings.

[Helmi]

Zitat:

Zitat von Bernhard Geyer (Beitrag 1042433)

Zitat:

Zitat von Helmi (Beitrag 1042283)

Ich hab eine Datei aus einer Siemens-Steuerung, die ich versuche auszulesen.
Und diese hat lauter #0´s drin.

Wird das gleiche sein. Die Steuerungsdatei speichert Texte als Unicodestrings.

Interessant dass du die Datei besser kennst als ich!
Aber ich muss dir wiederrum wiedersprechen, das ist keine UniCode-Datei!
Und die Texte werden auch nicht als Unicode-Strings gespeichert!

[alzaimar]

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);

[Bernhard Geyer]

Zitat:

Zitat von Helmi (Beitrag 1042442)

Interessant dass du die Datei besser kennst als ich!
Aber ich muss dir wiederrum wiedersprechen, das ist keine UniCode-Datei!
Und die Texte werden auch nicht als Unicode-Strings gespeichert!

Und Siemens Implementiert ihre Software so das Datei immer mit 0-Bytes an jeder zweiten Stelle gespeichert werden - Ist ja auch einfacher zu implementieren.

Aber kannst du dafür sorgen das das €-Zeichen in der Datei liegt? Damit könnte man Unicode ausschließen.

[Helmi]

Zitat:

Zitat von Bernhard Geyer (Beitrag 1042460)

Zitat:

Zitat von Helmi (Beitrag 1042442)

Interessant dass du die Datei besser kennst als ich!
Aber ich muss dir wiederrum wiedersprechen, das ist keine UniCode-Datei!
Und die Texte werden auch nicht als Unicode-Strings gespeichert!

Und Siemens Implementiert ihre Software so das Datei immer mit 0-Bytes an jeder zweiten Stelle gespeichert werden - Ist ja auch einfacher zu implementieren.

Aber kannst du dafür sorgen das das €-Zeichen in der Datei liegt? Damit könnte man Unicode ausschließen.

Das €-Zeichen liegt mit 100%iger Sicherheit nicht in der Datei!

[himitsu]

Dennoch wäre es wohl einfacher/sicherer, den Text in einen WideString zu kopieren oder nach Ansi umzuwandeln WideCharToMultiByte

[Helmi]

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?)

[himitsu]

Also doch WideString, denn beim Löschen/Ersetzen der #0 veränderst du das ja. :zwinker: