Fehler bei Selektion (beim zweiten mal)

[daNiii]

Hallo!

In meinem Programm habe ich ein Listview "LV_Produkte".
In diesem Listview möchte ich eine Zeile Auswählen und diese in einer Variable speichern.
Wenn ich das erste mal auf ein Element klicke funktioniert es auch, klicke ich gleich drauf noch einmal ein Element an, so kommt eine Fehlermeldung:

Erste Gelegenheit für Exception bei $76D4FBAE. Exception-Klasse EAccessViolation mit Meldung 'Zugriffsverletzung bei Adresse 004A766D in Modul 'Project4.exe'. Lesen von Adresse 00000024'. Prozess Project4.exe (5632)

Delphi-Quellcode:

procedure TForm1.LV_ProdukteSelectItem(Sender: TObject; Item: TListItem;
  Selected: Boolean);
begin
selected_Produkt:= strtoint(LV_Produkte.Selected.caption); //hier kommt der Fehler
showmessage(inttostr(selected_Produkt));
Zeit_laden();
end;

ich hoffe mir kann jemand helfen!
LG Daniela