IntStringList und Objektfreigabe

[himitsu]

Zitat von TurboMagic:

Integers in dem Platzhalter für Objekte speichern will.
Die darf man natürlich nicht freigeben!

Außer er speichert in dem TObject wirklich eine Objektinstanz,
wo dann das OwnsObjects=True liebendgern die Freigabe übernehmen würde.

Delphi-Quellcode:

type
  TMyDataObject = class
    FValue: Integer
    constructor Create(Value: Integer);
  end;
  
function TIntStringList.AddInteger(const s: string; i: integer): Integer;
begin
  ...
  //InsertItem(Result, S, TObject(i));
  InsertItem(Result, S, TMyDataObject.Create(i));
end;