File - ReadData()-Problem (Ver3.30)

[man-in-black]

moin,

würde gerne wissen, ob es ein Fehler von PB 3.3 ist oder der meine.
Hab versuch eine Doc/Exe/JPG... - Datei auszulesen mit dem Befehl >readdata(...)<. Nun bekomme ich aber nur die ersten paar Zeichen der Dateien. Wobei ich bei einfachen TXT - Dateien den gesamten Inhalt erhalte.

Bräuchte dringend Hilfe


MFG,
MIB

titel angepasst - Kaeru fecit

[HemSA]

Hallo Mann in Schwarz,
wenn du mal den Code zeigen könntest wäre das bestimmt besser.

Du hast bestimmt ja auch schon in der Hilfe nachgeschaut.

Ich habe keine Version 3.3, aber in der Version 3.94 und 4 erhält man mit ReadData(......... ) die Anzahl der tatsächlich eingelesenen Zeichen.

Syntax

Länge = ReadData(*MemoryBuffer, LengthToRead)
Beschreibung

Liest den Inhalt der aktuellen Datei mit der angegebenen Länge 'LengthToRead' (Anzahl zu einzulesender Zeichen) in den angegebenen Speicherbereich '*MemoryBuffer'.

'Länge' enthält nach der Ausführung des Befehls die Anzahl der tatsächlich eingelesenen Zeichen. Dies ist nützlich für Überprüfungszwecke.

[roherter]

Für die ganze Datei direkt hinter Readfile oder Openfile Lof() benutzen

Code: Alles auswählen

  length = Lof()                
          

[man-in-black]

mein Code:

Code: Alles auswählen

...
If OpenFile(0,OpenFileRequester("...","","*.*",0))
  AllocateMemory(1,Lof())
  ReadData(UseMemory(1),Lof())

  Debug(PeekS(UseMemory(1)))  ; Zum Überprüfen

EndIf
...

MIB

[ts-soft]

Mit PeekS können nur Strings gelesen werden. Beim ersten Nullbyte ist schluß.

[man-in-black]

Und wie kann man das ändern, Ich meine vollständig auslesen?


MIB

[ts-soft]

Es steht doch komplett im Speicher. Als Text anzeigen kannste es nicht. Sag
lieber mal was Du vorhast.

[man-in-black]

"Verschlüsseln", heißt das Zauberwort.
Ich habe schon alles zusammen gefriemelt, um einen String zu verschlüsseln. Desshalb habe ich auch mit Peeks(...) gearbeitet.

MIB

[ts-soft]

Mußt den Speicher verschlüsseln. Im CodeArchiv findeste z.B. RC4Mem dafür.

[man-in-black]

Danke, werd mal gucken!


MFG,
MIB