UTF8Decode gibt kein Resultat zurück

[himitsu]

Na das ginge och.

Freu dich drauf, wenn es bald wieder zurückgestellt wird.
Und dann nächstes Jahr auf COVID 20.

Delphi-Quellcode:

try
  S := TEncoding.UTF8.GetString(B);
except
  S := TEncoding.ANSI.GetString(B);  // oder lieber mit ASCII
end;

Bei uns geht das mit dem ANSI, kommt dann auf's gleiche Ergebnis, wie beim if (S = '') and (A <> '') then S := A; .

Aber ich weiß nicht wie sich z.B. die asiatischen ANSI-CodePages verhalten, drum sah es bei mir zum Schluss so aus.

Delphi-Quellcode:

try
  S := TEncoding.UTF8.GetString(B);
except
  try
    S := TEncoding.ANSI.GetString(B);
  except
    S := TEncoding.ASCII.GetString(B);
  end;
end;

B = TBytes von Indy, TFile, oder aus'm COM-Port