Der linken Seite kann nichts zugewiesen werden

[mkinzler]

Was für einen Typ hat bufPtr? Ein String?

[sx2008]

Du darfst/solltest auf der linken Seite keinen Cast einsetzen.
Ich gehe mal davon aus, dass bufPtr den Datentyp PByte oder array of Byte hat:

Delphi-Quellcode:

bufPtr[ix] := Byte(StrToIntDef('$' + Copy(hexDump,1 + ix*2,2) ,0));
// evtl. auch so
(bufPtr +ix)^ := Byte(StrToIntDef('$' + Copy(hexDump,1 + ix*2,2) ,0))

[zeras]

Kann es sein, dass Byte(bufPtr[ix]) dazumals als Konstante definiert wurde?
Ich hatte einmal einen ähnlichen Fall, wo ich ein Projekt auf D2009 hochgezogen hatte und da kamen gleiche Fehlermeldungen. Von welcher Version das kam, weiß ich leider nicht mehr.
Offensichtlich war es unter alten Delphi/Pascal Ständen noch erlaubt, eine Konstante zu ändern.

[Codehunter]

Und ich dachte bisher immer, schreibbare Konstanten wären ein Feature neuerer Delphiversionen

Ich habs grad nicht vor mir aber aus dem Kopf meine ich, BufPtr ist ein Array of AnsiChar und als Variable deklariert. Genaueres kann ich erst morgen sagen.

[jaenicke]

Zitat von Codehunter:

Und ich dachte bisher immer, schreibbare Konstanten wären ein Feature neuerer Delphiversionen

Um genau zu sein konnte man diese unsaubere Methode bei Delphi 1 nutzen. Ich glaube schon seit Delphi 2 ist die Standardeinstellung, dass Konstanten genau das sind: konstant...

[Blup]

Das man den Wert typisierter Konstanten ändern kann, ist meines Wissens nach auch bei Delphi 2007 noch Standard.

[gammatester]

Zitat von jaenicke:

Zitat von Codehunter:

Und ich dachte bisher immer, schreibbare Konstanten wären ein Feature neuerer Delphiversionen

Um genau zu sein konnte man diese unsaubere Methode bei Delphi 1 nutzen. Ich glaube schon seit Delphi 2 ist die Standardeinstellung, dass Konstanten genau das sind: konstant...

Ich verstehe ehrlich nicht, was mit der andauernden 'Verteufelung' von typsierten Konstanten hier im Forum bezweckt werden soll, denn

• {$J-} ist als Standard erst bei D6 und nicht schon D2 eingeführt worden,
• alte Delphis kennen keine initialisierte Variablen,
• man kann ja Konstanten verwenden, wenn man will,
• es gibt selbst bei den neuesten Delphis keine Möglichkeit, initialisierte lokale Variable zu benutzen (Error: E2195 Cannot initialize local variables) und man muß eh wieder auf die ungeliebten typisierten Konstanten zurückgreifen.

[jaenicke]

Um genau zu sein nicht typisierte Konstanten, sondern deren Veränderung empfinde ich als unsauber.
Wenn const dransteht, erwartet man nun einmal auch einen konstanten Wert. Wenn der dann plötzlich irgendwo geändert wird, kann man bei fremden Quelltexten ewig suchen bis man das erstens sieht und zweitens findet wo das passiert.

Wenn man eine Variable will, denn nichts anderes ist eine "Konstante" (haha), die man ändern kann, dann sollte man auch eine nehmen und damit kundtun, dass der Wert eben nicht konstant ist.

Zitat von gammatester:

es gibt selbst bei den neuesten Delphis keine Möglichkeit, initialisierte lokale Variable zu benutzen

Wäre ja auch Blödsinn, das kann man ja die paar Zeilen später selbst machen, wenn man dort eh Werte zuweist. Bei sauberem Quelltext sind die einzelnen Methoden ja auch nicht lang.

[baumina]

Zitat von zeras:

Offensichtlich war es unter alten Delphi/Pascal Ständen noch erlaubt, eine Konstante zu ändern.

Dafür gibt es eine Compiler-Einstellung : zuweisbare typisierte Konstanten

Ist diese True, dann müsste das klappen.

[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.