Delphi-Quellcode:
procedure TForm1.ListView1Click(Sender: TObject);
var
s: String;
begin
if Listview1.Items.Count > 0 then
begin
s := Listview1.ItemFocused.Caption;
ShowMessage(s);
end;
end;
Kleiner Tipp: Einfach ml in der Hilfe kucken und sich die verschiedenen Eigenschaften und Methoden ankucken. Aber meist reicht schon sich anzukucken, was einem die Code-Vervollständigung anbietet.
BTW: Ich habe es bis eben auch nicht gewußt.