TMemoryStream.Read - Crash ohne Kommentar!

[SnuffMaster23]

Diese Zeile bereitet mir gerade Kopfschmerzen, da crasht das Programm immer ohne Fehlermeldung (ohne Debugger):

Delphi-Quellcode:

Stream1.Read(Fil, Stream1.Size);

Fil ist ein string.

Mit Debugger krieg ich folgende Meldung:
Project C:\Dokumente und Einstellungen\SnuffMaster23\Eigene Dateien\Eigene Programme\Tool\Project1.exe faulted with message: 'access violation at 0x7c9478ae: write of address Ox00030ffc'. Process Stopped. Use Step or Run to continue.

In dem Stream stecken 11,4 MB, aber das dürfte der String ja leicht packen.

[Robert Marquardt]

Das gibt natuerlich ein heftiges Problem, da der string wahrscheinlich nicht lang genug ist um das ganze File aufzunehmen.
Vorher ein SetLength(Fil, Stream1.Size) machen und es muss Stream1.Read(PChar(Fil)^, Stream1.Size); heissen.

[SnuffMaster23]

SetSize hatt ich auch schon davor, hat (allein) nichts gebracht.
Mit dem dereferenzierten Zeiger krieg ich jetzt ne ganz normale Zugriffsverletzung. :(

//Zugriffsverletzung kommt weiter unten :oops:
Da sollte ich wahrscheinlich auch die Zeigervariente nehmen.
Danke!!

[shmia]

Delphi-Quellcode:

Stream1.Read(Fil, Stream1.Size);  // FALSCH !!

//Richtig
SetLength(Fil, Stream1.Size); // genügend Speicher reservieren
Stream1.Read(Fil[1], Stream1.Size);

[SubData]

Is der Stream auch mit Create erstellt worden? :>

[SnuffMaster23]

Jo isser.
Es funzt mittlerweile mit der Lösung von Robert.
Sorry, hätt ich deutlicher schreiben sollen^^

[Robert Marquardt]

PChar(Fil)^, PChar(Fil)[0] und Fil[1] sind synonym. Man muss sich nur klarmachen wie Delphi das handhabt.

[Muetze1]

... aber Fil allein, klappt bei einem solchen Aufruf grundsätzlich nicht (wenn Fil Ansi/WideString ist)