Ergebnis = ReadStringFormat(#Datei)

[PIC18F2550]

Ergebnis ist ein Numerischer Wert. wie ist die Zuordnung zu den Konstanten?

#PB_Ascii : Kein BOM gefunden. Dies kennzeichnet üblicherweise eine normale Textdatei.
#PB_UTF8 : UTF-8 BOM gefunden.
#PB_Unicode: UTF-16 (Little Endian) BOM gefunden.

#PB_UTF16BE: UTF-16 (Big Endian) BOM gefunden.
#PB_UTF32 : UTF-32 (Little Endian) BOM gefunden.
#PB_UTF32BE: UTF-32 (Big Endian) BOM gefunden.

Mein Programm sagt meine Datei ist vom Typ $18.

[mk-soft]

Das steht in der Hilfe von Purebasic unter Konstanten.
Oder einen kleinen Code mit Select Case schreiben und als Text den Konstanten Namen ausgeben.
Der Wert ist uninteressant. Um nicht mit Werten sich Rum zu schlagen, gibt es ja die Konstanten als Name.

[Axolotl]

Einfach testen...

Code: Alles auswählen

Procedure.s EncodingToStr(ByteOrderMark) 
  Protected result$ 
  Select ByteOrderMark 
    Case #PB_Ascii   : result$ = "ASCII"    ;: No BOM detected. This usually means a plain text file.
    Case #PB_UTF8    : result$ = "UTF-8"    ;: UTF-8 BOM detected.
    Case #PB_Unicode : result$ = "UTF-16"   ;: UTF-16 (little endian) BOM detected.
    Case #PB_UTF16BE : result$ = "UTF-16"   ;: UTF-16 (big endian) BOM detected.
    Case #PB_UTF32   : result$ = "UTF-32"   ;: UTF-32 (little endian) BOM detected.
    Case #PB_UTF32BE : result$ = "UTF-32"   ;: UTF-32 (big endian) BOM detected.
    Default : result$ = "Unknown" 
  EndSelect 
  ProcedureReturn result$
EndProcedure