Einzelnen Beitrag anzeigen

Alter Mann

Registriert seit: 15. Nov 2003
Ort: Berlin
946 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

Ungültige Zeigeroperation (FreeMem)

  Alt 1. Okt 2016, 11:25
Moin,

nachdem ich nun Besitzer von 10.1 Update 1 Prof bin, wollte ich 'alten' Code weiterverwenden,
doch nun bekomme ich aufeinmal die Fehlermeldung: 'Ungülltige Zeigeroperation' an dieser Stelle:
Code:
...
var
  Buffer : Pointer;
  Msg   : String;
  dwSize : DWORD;
  dwBW  : DWORD;
...
  dwSize := Length(Msg) * SizeOf(Char) + 1;
  dwBW  := 0;
  GetMem(Buffer, dwSize);
  Move(Msg, Buffer, dwSize);
  Result := WriteFile(FHandle, Buffer, dwSize, dwBW, nil);
  FreeMem(Buffer, dwSize);                                              [COLOR="Lime"]<- Hier[/COLOR]
...
Schon etwas Komisch, da es bei der Starter Edition 10.1 und früheren Versionen keine Fehlermeldung gab.

Hat jemand einen Tipp?
  Mit Zitat antworten Zitat