Forum: Programmieren allgemein
by DieDolly,
9. Feb 2020
95% dieses Codes sind auf Basis von ByteStream und alles ist gut. Ich benutze StringOf(bytes) und danach Pos() um an die Positition von ein paar bestimmten Zeichen zu kommen. Das funktioniert auch auf allen Systemen scheinbar. Dann lese ich von dieser Position aus 48 weitere Zeichen (Bytes) mit ByteStream.Read aus aus und forme es am Ende in einen String um.
Das scheint jetzt augenscheinlich...
Forum: Programmieren allgemein
by DieDolly,
8. Feb 2020
Irgendwie muss man die paar Bytes die man von Position X bis Y (maximal 48 wie gesagt, nicht die ganze Datei) ausliest ja lesbar machen.
Die Bytes die ich auslesen und umwandeln möchte ergeben mit absoluter Sicherheit immer Zeichen A bis Z und 0 bis 9.
Welche Möglichkeit gibt es denn sonst noch diese paar Bytes lesbar zu machen? Das ergeben am Ende ziemlich sicher rund 48 Zeichen.
Sonst...
Forum: Programmieren allgemein
by DieDolly,
8. Feb 2020
Ich habe jetzt ein Teilergebnis.
Es muss wohl irgendwas mit str := TEncoding.ANSI.GetString(ByteStream.Bytes) ... zu tun haben. Auf einem System mit türkischem Windows, aber englishcer Benutzeroberfläche kommt da nicht das raus, was rauskommen soll. Ich kopiere eine bestimmte Anzahl Zeichen von einer Position A an bis zu einer Position B. Das funktioniert in 99% der Fälle einwandfrei nur hier...
Forum: Programmieren allgemein
by DieDolly,
7. Feb 2020
Ich sehe gerade alles hat jetzt seine Richtigkeit. Der Fehler lag an der Ausgabe. Die Ausgabe war nur für mich. Ich hab mich schon gewundert, wo die 4 zusätzlichen KB herkamen!
Zur Klarstellung. Ich bearbeite hier ausschließlich meine eigenen Dateien!
Wenn ich das so nutze, erhalte ich EEncodingError. Der Fehler kommt, sobald ich E := TMBCSEncoding.Create($FFFF, 0, 0); irgendwo schreibe.
Forum: Programmieren allgemein
by DieDolly,
6. Feb 2020
Ich komme leider nicht weiter. Ich habe eine ausführbare Datei die an irgendeiner Stelle einen const RawByteString deklariert hat.
Den Inhalt dieses Strings kann ich auch wiederfinden, wenn ich die Exedatei in ein Bytes Array schreibe und dann mit TEncoding.ANSI.GetString() in eine Txt-Datei schreibe.
Das Problem ist aber, dass ich es nicht schaffe diesen String richtig zu ersetzen. Eine...