Override von Konstanten im Objekt - Alternative?

[Nathan]

Vielleicht hilft es was. Mit der Compiler-Direktive {$J+} kann man festlegen, ob typisierte Konstanten geändert werden können.

Delphi-Quellcode:

procedure Run;
const
  {$J+} C: Integer = 0; {$J-}
begin
  Inc (C);
  // ...
end;

Man könnte im Constructor ggf. die Konstante anpassen. Der Ansatz von Uwe Raabe mit strict private const finde ich aber auch sauberer.