FileSeek und Chinesische Zeichen
Verfasst: 12.06.2022 20:07
Hallole,
wenn ich das Beispiel mit FileSeek aus der Hilfe mache bekomme ich Chinesische Zeichen zurück.
Der Code ist so:
Die Debugger-Ausgabe ist:
Position: 68
㐳㘵㠷〹Ң
Meine Datei ist:
1
12
123
1234
12345
123456
1234567
12345678
123456789
1234567890
Hat da einer eine Idee warum ich statt 1234567890 㐳㘵㠷〹Ң zurück bekomme?
Danke schon mal.
wenn ich das Beispiel mit FileSeek aus der Hilfe mache bekomme ich Chinesische Zeichen zurück.
Der Code ist so:
Code: Alles auswählen
file$ = OpenFileRequester("Datei auswählen...","","Text (.txt)|*.txt|All files (*.*)|*.*",0)
If file$
If ReadFile(0, file$)
length = Lof(0) ; ermitteln der Dateilänge
FileSeek(0, length - 10) ; setzen des Zeigers auf 10 Zeichen vor Ende der Datei
Debug "Position: " + Str(Loc(0)) ; anzeigen der aktuellen Zeigerposition
*MemoryID = AllocateMemory(10) ; reservieren des benötigten Speichers für 10 Bytes
If *MemoryID
bytes = ReadData(0, *MemoryID, 10) ; einlesen der letzten 10 Zeichen in der Datei
Debug PeekS(*MemoryID)
EndIf
CloseFile(0)
EndIf
EndIf
Position: 68
㐳㘵㠷〹Ң
Meine Datei ist:
1
12
123
1234
12345
123456
1234567
12345678
123456789
1234567890
Hat da einer eine Idee warum ich statt 1234567890 㐳㘵㠷〹Ң zurück bekomme?
Danke schon mal.