Ungültige Zeigeroperation (FreeMem)

[Ghostwalker]

Ist zwar schon ne weile her seit ich Delphi programmiert hab aber das:

Code:

Result := WriteFile(FHandle, Pointer(Msg)^, dwSize, dwBW, nil);

wird so auch nicht wirklich funktionieren, wenn ich das noch richtig im Kopf hab.

Damit interpretierst du nur die ersten 32 Bit des Strings als Adresse, aber der der Inhalt stehen soll.

Die Variante von jaenicke wär die einfachste, die auch wirklich funktioniert.

[jaenicke]

Doch, Pointer(Msg)^ geht. Das liegt daran, dass ein String intern ein Pointer auf die Stelle im Speicher zwischen Referenzzähler, Stringlänge und dem Stringinhalt selber ist. Ein Cast auf Pointer ergibt daher den Pointer auf das erste Zeichen und durch dessen Dereferenzierung landet man beim ersten Zeichen. Das als Puffer übergeben funktioniert dann.

[Alter Mann]

Moin, Moin,

ich glaub, ich werde alt

Ihr habt nartürlich Recht.

[himitsu]

Na das Problem lasst sich leicht lösen.

Benenn dich doch einfach um.







Junger Mann

[p80286]

Ich würde auch noch einen Blick auf "String" werfen. Spätestens abD2009 sollte man da vorsichtig sein (Unicode) und bei D5 gab es, da nicht einen Compilerschalter der String mit shortstring belegt hat?

Gruß
K-H