Objectlist für listview

[Natcree]

Habe Gesamt jetzt unter Privat declariert Daher so

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
    Item: TListItem;
    i: integer;
    irgendwas : TIrgendwas; 
 begin
    if form2.ShowModal = mrok then begin
    Gesamt := 0;
    ListView1.Items.BeginUpdate;
    try
      ListView1.Items.Clear;
      for i := 0 to fObjects.Count - 1 do
        begin
          irgendwas := FObjects[i] as TIrgendwas; 
          Item := ListView1.Items.Add;
          Item.Caption := irgendwas.ErsteZahlasstring;
          Item.SubItems.Add (irgendwas.ZweiteZahlasstring);
          Gesamt := Gesamt + irgendwas.Summe; Variable "Gesamt"
          Item.SubItems.Add(Format('%.0n €', [Gesamt]));
       end;
    finally
      ListView1.Items.EndUpdate;
    end;
  end;
 end;

Er Zeigt aber immer noch nichts in der Listview an. Muss der code in die Form1 oder Form2 wo ich die Daten eingebe und mit ok bestätige ???