Ich würde den Code, zum Füllen der ListView aus der
DB, etwas dynamischer gestalten. So wie er jetzt ist wird er bei Änderungen der Daten/Abfrage nicht mehr richtig funktionieren.
Vielleicht hilft dir das
"SQL Ergebnis in einer Listview Komponente anzeigen?".
Das Kopieren des Items könnte so klappen (ungetestet nur drauf-los-getippt!)
Delphi-Quellcode:
Var
SrcListItem :TListItem; //Hier weiß ich jetzt nicht, wie der Datentyp heißt...
Begin
SrcListItem := nil;
SrcListItem := Form14.LVSeaResult.ItemFocused;
Assert(Assigned(SrcListItem),'LVSeaResult.ItemFokused is not assigned');
With TargetListView.Items.Add Do //neues Item
Begin
Caption := SrcListItem.Caption; //übertrage Caption
For i := 0 to pred(SrcListItem.SubItems.Count) Do //Kopiere alle SubItems
SubItems.Add(SrcListItem.SubItems[i]);
End;
End;