Seite 1 von 1

ListIcon - Mit einträgen in Column rechnen!

Verfasst: 17.06.2006 16:13
von FISCHAUGE

Code: Alles auswählen

For c=1 To CountGadgetItems(4)
erg=Val(GetGadgetItemText(4,c$,2))
erge=0+erg
e$=Str(erge)
Debug e$
Nex
Ich habe in diesem ListIconGadget eine unbestimmte anzahl an Einträgen!
Im Column 2 befinden sich z.B. "Beträge 10.00"
Ich möchte nun das er alle Einträge zählt die schleife so lange durchlaufen lässt wie es einträge sind, und alle "Beträge" aus dem Column addiert!

Was mache ich Falsch? oder besser gesagt was fehlt!?

danke im vorraus!

Re: ListIcon - Mit einträgen in Column rechnen!

Verfasst: 17.06.2006 16:16
von Jilocasin
FISCHAUGE hat geschrieben:Was mache ich Falsch?
vieles :mrgreen:

Nein ernsthaft... so müsste es gehen:

Code: Alles auswählen

erg = 0
For index = 0 To CountGadgetItems(4)-1
  erg + Val(GetGadgetItemText(4,index,2))
Next
Debug erg
//nachtrag

Allerdings ist der zweite Column im Gadget die Zahl 1 im Befehl... also:

Code: Alles auswählen

...
GetGadgetItemText(4,index,1)
...

Verfasst: 17.06.2006 16:18
von #NULL
das hier macht keinen sinn

Code: Alles auswählen

erge=0+erg 
entweder du schreibst

Code: Alles auswählen

erge+erg 
oder

Code: Alles auswählen

erge=erge+erg 
<edtit- gemeint war fischauge>

Re: ListIcon - Mit einträgen in Column rechnen!

Verfasst: 17.06.2006 20:18
von FISCHAUGE
Jilocasin hat geschrieben:
FISCHAUGE hat geschrieben:Was mache ich Falsch?

//nachtrag

Allerdings ist der zweite Column im Gadget die Zahl 1 im Befehl... also:

Code: Alles auswählen

...
GetGadgetItemText(4,index,1)
...

Also normal ist der erste Column = 0, der zweite Column = 1 und der Dritte in meinem Fall dieser Column = 2, deshalb habe ich zweiter Column geschrieben ;-)

Aber vielen dank!

Verfasst: 22.06.2006 10:34
von mike41
Hi Fischauge

Variablen und Strings sind ein mächtiges Werkzeug, an denen sich schon hartgesottene Programmierer festgebissen haben (mich eingeschlossen :wink: )

Hier der Code der garantiert funktioniert (weil getestet 8)

Code: Alles auswählen

      For sum = 0 To CountGadgetItems(#ListIcon_0)
        r.l=Val(GetGadgetItemText(#ListIcon_0,sum,0))+r
        f.s=Str(r)
      Next sum
Viel Spass und nicht verzagen :allright:

Mfg Mike

PS: "for sum = 0 to " weil du willst ja sicherlich alle Zeilen berechnen :wink: