PChar aus TFileStream lesen

[Rangarig]

Hallo,

ich möchte einen PChar aus einen TFileStream lesen, aber es folgenter Fehler: EAccessViolation.


Hier mein Code:

Delphi-Quellcode:

...
var
len : integer;
temp : PChar;
f : TFileStream;
...
f.Read(len, sizeof(len));
if (len > 0) then
begin
f.Read(temp, len);
end;

Ich habe auch ausprobiert, indem ich den Read-Befhel auskommentiert habe, da lief es ohne Probleme.


Danke schoneimal in Vorraus.

[tommie-lie]

Ein PChar ist ein Pointer auf einen nullterminierten String. Für den musst du Speicher reservieren und für um an den Speicher ranzukommen musst du den Pointer dereferenzieren, denn TFileStream.Read schreibt in einen Speicherbereich.
Du musst dir also mit GetMem soviele Bytes reservieren, wie du für den String brauchst, und beim lesen den Pointer dereferenzieren und TFileStream.Read somit nicht einfach eine Variable mit einer Adresse, sondern die Adresse selbst geben.

[Rangarig]

Danke tommi-lie. Ich habe die Änderungen vorgenommen und jetzt funktioniert es.