Kundenliste

[EdAdvokat]

bedeutet das, dass ich die procedure Delete(idx:integer); in meiner bestehenden CustomerList deklarieren sollte, etwa so:

Delphi-Quellcode:

type
  TCustomerlist : Class(Tobjectlist); //also die bei mir bestehende TCustomerlist?

  procedure Delete(idx:integer); //neu aufnehmen
  
  end;

procedure TCustomerList.Delete(idx:integer); { lÖSCHEN DES DATENSATZES AUS DER lISTE }
begin
  if self.id>-1 then DeleteFromDB(self.id); { und aus der DB }
  inherited dELETE;
end;

Alles weitere müßte natürlich dann noch geschrieben werden. Nur im Prinzip so?