Hallo Petra,
herzlich willkommen in der Delphi-PRAXiS.
Es wird das Beste sein, wenn wir deine Probleme einzeln angehen. Ich identifiziere dein erstes Problem im Zusammenhang mit der Komponente TListView. Erstelle dir doch einfach ein Testprojekt mit einer Form, darauf eine TListView und Buttons für Add und Delete:
Delphi-Quellcode:
procedure TDemoForm.AddButtonClick(Sender: TObject);
var
li: TListItem;
begin
li := ListView.Items.Add;
li.Caption := IntToStr(ListView.Items.Count);
li.SubItems.Add('Marke');
li.SubItems.Add('Modell');
end;
procedure TDemoForm.DeleteButtonClick(Sender: TObject);
begin
while Assigned(ListView.Selected) do
ListView.Selected.Free;
end;
Beim Löschen stellst du dann fest, dass deine Nummerierung Lücken erhält. Bevor wir weiter machen, müsste ich wissen, ob das von dir gewollt ist.
Grüße vom marabu