Datenbank überschreibt inhalte

[DeddyH]

Und wie viele davon? Du musst natürlich je Eintrag in Deine Liste eine Instanz erzeugen.

[edit] Oder wenn Du sowieso immer 112 Instanzen brauchst, kannst Du sie ja gleich von vornherein anlegen.

Delphi-Quellcode:

constructor TPeriodensystem.Create;
var 
  i: integer;  
begin
  inherited;
  for i := Low(inhalt) to High(inhalt) do
    inhalt[i] := TAtom.Create;
  //usw.
end;

destructor TPeriodensystem.Destroy;
var 
  i: integer;  
begin
  for i := Low(inhalt) to High(inhalt) do
    inhalt[i].Free;
  //usw.
  inherited;
end;

[/edit]