Selected ListView-Query-Ergebnis in Variable speichern

[Yikes]

Hallo, ich brauche mal wieder Hilfe. Eigentlich habe ich so ziemlich dasselbe Problem wie letztes Mal. Irgendwie krieg ich das ganze noch nicht so in den Kopf rein...

Ich habe mir eine ListView erstellt:

Delphi-Quellcode:

ListView1.BeginUpdate;
  try
    while not FDStoredProc1.eof do
    begin
      LItem := ListView1.Items.Add;

      LItem.Detail := FDStoredProc1.FieldByName('Vorname').AsString + ' ' + FDStoredProc1.FieldByName('Name').AsString;
      FDStoredProc1.Next;
    end;
  finally
    ListView1.EndUpdate;
    ListView1.Visible := true;
  end;

Bei einem Klick auf den ListView-Button, soll das Ergebnis eines Queries in einer Variable gespeichert werden.

Delphi-Quellcode:

procedure TForm1.ListView1ButtonClick(const Sender: TObject;
  const AItem: TListItem; const AObject: TListItemSimpleControl);
var
  LLocal : TRec;
begin

  if Assigned(ListView1.Selected) then begin
    LLocal.wert1 := FDStoredProc1.FieldByName('SpalteA').AsFloat;
    LLocal.wert2 := FDStoredProc1.FieldByName('SpalteB').AsFloat;
  end;
end;

Das bringt mir leider nur die allerletzten Werte aus der Datenbank. Ist mir auch relativ klar, warum ich nur den letzten Wert bekomme, allerdings weiß ich nicht, wie ich diesen Fehler beheben kann.