kA was du meinst, wie gesagt 4 Spalten:
Name, Einkaufspreis, Verkaufspreis, Umsatz
Aus der Datei werden Name, Einkaufspreis und Verkaufspreis in die Listview geladen, die Umsatzspalte (Spalte4!!!) bleibt dabei leer!
Wie in meinem ersten Beitrag bereits angemerkt und durch gerade erneutes Testen stelle ich fest, dass das ganze funktioniert wenn in der Umsatzspalte bereits etwas steht!!!
Also hat die Listview (speziell liv_transfersalltime.Items[i].SubItems[2] := IntToStr(Umsatz); ) irgend ein Problem mit der leeren Spalte4 oder nicht??!?!
EDIT:
Zitat von
DeddyH:
Wo soll die 4. Spalte denn herkommen? Ich sehe da einen ImageIndex, einen Namen und 2 Zahlen, damit komme ich auf 3 Spalten.
[edit]Aber gut:
Delphi-Quellcode:
Umsatz_gesamt := 0;
for i := 0 to liv_transfersalltime.Items.Count - 1 do
begin
Umsatz := StrToInt(ZahlohnePunkte(liv_transfersalltime.Items[i].SubItems[1])) - StrToInt(ZahlohnePunkte(liv_transfersalltime.Items[i].SubItems[0]));
if liv_transfersalltime.Items[i].SubItems.Count < 3 then
liv_transfersalltime.Items[i].SubItems.Add(IntToStr(Umsatz))
else
liv_transfersalltime.Items[i].SubItems[2] := IntToStr(Umsatz);
inc(Umsatz_gesamt,Umsatz);
// doppelt gemoppelt: Umsatz_gesamt := Umsatz_gesamt + Umsatz;
end;
So müsste es immer passen.[/edit]
aaaah ok, jetzt gehts
EDIT2: hat sich erledigt xD