Der linken Seite kann nichts zugewiesen werden

[Codehunter]

Ok, Problem gelöst. Hier der Originalcode:

Delphi-Quellcode:

var
  ix            : Integer;
  bufPtr        : PChar;
  hexDump       : AnsiString;
begin
  hexDump := ReadAnsiString(aSection,aKey,'');
  Result  := Length(hexDump) DIV 2;
  if Result > BufSize then Result := BufSize;

  bufPtr  := Pointer(Buffer);
  for ix := 0 to Result -1 do
  begin
    Byte(bufPtr[ix]) := StrToIntDef('$' + Copy(hexDump,1 + ix*2,2) ,0);
  end;
end;

Die Deklaration von bufPtr habe ich in PAnsiChar geändert und schon rockts.