Android Question [Solved] for each: do not understand item-type-issue

[Pflichtfeld]

Why do I get error in line 4 : "current delaration does not match previous one"

Private Sub FlipHorizontal(img As B4XView, pkt() As Mypkt )
    'Spiegelt um Senkrechte, mitte img
    Dim ww as double=img.Width, pp As Mypkt
    For Each pp In pkt
        pp.x=ww-pp.x
    Next
End Sub

Each element in pkt is a pp, isn't it? If I omit the declaration of pp in line 3 like:

Private Sub FlipHorizontal(img As B4XView, pkt() As Mypkt )
    'Spiegelt um Senkrechte, mitte img
    'rückgabe in Pkt
    Dim ww as double=img.Width
    For Each pp In pkt
        pp.x=ww-pp.x
    Next
End Sub

I get error in line 5: unknown type: object
Can anybody help me to understand?

 

[OliverA]

Do you have a global variable named pp?

 

[Pflichtfeld]

no, but I found the answer: (sorry that I did not search deep enough!)

There isn't any decent way to iterate over types fields.

 

[LucaMs]

For Each [VariableName] As [Type] In ...

 

[ilan]

you need to set the type when you do a for each loop, like this:

    Dim i(6) As Int = Array As Int(1,2,3,4,5,6)
    For Each nr As Int In i
        Log(nr)
    Next

if you have an array with different types you can do something like this:

    For Each obj As Object In i
        If obj Is Int Then
            Dim nr As Int = obj
            Log(nr)
        End If
    Next

 

[DonManfred]

Dim ww as double

do you have another variable ww (or maybe pp) which is not declared as double resp. declared as any other Type?

 

[Pflichtfeld]

For Each [VariableName] As [Type] In ...

Uups! (not what Erel said...)
Thanks!