Verständnisfragen zu TObject und TObjectList

[Die Muhkuh]

Hi,

zu zwei: Du könntest per Items[0] das Auto auslesen und die Eigenschaften verändern.

Quasi so:

Delphi-Quellcode:

procedure TForm1.ErstelleNeuesAuto(auto_Marke : String, auto_Marke : String, auto_Baujahr : Integer);
var newCar : TAuto;
begin
  newCar = TAuto(autoSammlung.Items[0]);

  if newCar = nil then
  begin
    newCar := TAuto.Create;
    autoSammlung.Add(newCar);
  end;

  newCar.Marke := auto_Marke;
  newCar.Modell := auto_Marke;
  newCar.Baujahr := auto_Baujahr;
end;