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