Italian Stampare una List (ListView)

RobyLaga · Mar 14, 2019

In gergo si dice che si rompe ...

*** Service (starter) Create ***
** Service (starter) Start **
** Activity (prev01) Create, isFirst = true **
** Activity (prev01) Resume **
>>>>> - 2 - KafKa01 ---
** Activity (prev01) Pause, UserClosed = false **
** Activity (prelista01) Create, isFirst = true **
** Activity (prelista01) Resume **
prelista01_vvvvvvv5 (java line: 1077)
java.lang.ArrayIndexOutOfBoundsException: length=1; index=11 <<<<<credo sia qui il problema
at it.h24Dome.eNotes.prelista01._vvvvvvv5(prelista01.java:1077)
at it.h24Dome.eNotes.prelista01._whatsappbutt01_click(prelista01.java:2081)
at java.lang.reflect.Method.invoke(Native Method)
at java.lang.reflect.Method.invoke(Method.java:372)
at anywheresoftware.b4a.BA.raiseEvent2(BA.java:196)
at anywheresoftware.b4a.BA.raiseEvent2(BA.java:180)
at anywheresoftware.b4a.BA.raiseEvent(BA.java:176)
at anywheresoftware.b4a.objects.ViewWrapper$1.onClick(ViewWrapper.java:80)
at android.view.View.performClick(View.java:5184)
at android.view.View$PerformClick.run(View.java:20893)
at android.os.Handler.handleCallback(Handler.java:739)
at android.os.Handler.dispatchMessage(Handler.java:95)
at android.os.Looper.loop(Looper.java:145)
at android.app.ActivityThread.main(ActivityThread.java:5938)
at java.lang.reflect.Method.invoke(Native Method)
at java.lang.reflect.Method.invoke(Method.java:372)
at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:1400)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:1195)
*** Service (starter) Create ***
** Service (starter) Start **
** Activity (prev01) Create, isFirst = true **
** Activity (prev01) Resume **

RobyLaga · Mar 14, 2019

*** Service (starter) Create ***
** Service (starter) Start **
** Activity (prev01) Create, isFirst = true **
** Activity (prev01) Resume **
>>>>> - 2 - KafKa01 ---
** Activity (prev01) Pause, UserClosed = false **
** Activity (prelista01) Create, isFirst = true **
** Activity (prelista01) Resume **
prelista01_vvvvvvv5 (java line: 1077)
java.lang.ArrayIndexOutOfBoundsException: length=1; index=11
at it.h24Dome.eNotes.prelista01._vvvvvvv5(prelista01.java:1077)
at it.h24Dome.eNotes.prelista01._whatsappbutt01_click(prelista01.java:2081)
at java.lang.reflect.Method.invoke(Native Method)
at java.lang.reflect.Method.invoke(Method.java:372)
at anywheresoftware.b4a.BA.raiseEvent2(BA.java:196)
at anywheresoftware.b4a.BA.raiseEvent2(BA.java:180)
at anywheresoftware.b4a.BA.raiseEvent(BA.java:176)
at anywheresoftware.b4a.objects.ViewWrapper$1.onClick(ViewWrapper.java:80)
at android.view.View.performClick(View.java:5184)
at android.view.View$PerformClick.run(View.java:20893)
at android.os.Handler.handleCallback(Handler.java:739)
at android.os.Handler.dispatchMessage(Handler.java:95)
at android.os.Looper.loop(Looper.java:145)
at android.app.ActivityThread.main(ActivityThread.java:5938)
at java.lang.reflect.Method.invoke(Native Method)
at java.lang.reflect.Method.invoke(Method.java:372)
at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:1400)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:1195)
*** Service (starter) Create ***
** Service (starter) Start **
** Activity (prev01) Create, isFirst = true **
** Activity (prev01) Resume **

Star-Dust · Mar 14, 2019

Scusami ero fuori.
Sembra che il file list non contenga in tutti i campi che dovrebbe.
tu fai uno split di ogni stringa nella lista e si prevede che abbia un certo numero di campi(almeno 12) almeno così si capisce dal codice che hai inviato tu.
In realtà sembra che invece ne contenga uno solo

Io di fatto non so cosa c'è dentro quel file. Dovrei saperne di più per darti una mano

RobyLaga · Mar 14, 2019

Da quel file, filtro solo i record vhe mi interessano, e faccio una list, che potrebbe avere anche 50 "righe"... ecco a quel punto vorrei poterle "WhatsApp are". .

RobyLaga · Mar 14, 2019

questo è il file completo di tutti i record

RobyLaga · Mar 14, 2019

Non so se è meglio scriverci una email, così ti mando il programma è carino... anche se solo all'inizio. ...

Star-Dust · Mar 14, 2019

L'App la puoi mandare in privato. Zippi la cartella e la alleghi in una conversazione privata

Star-Dust · Mar 14, 2019

Sembra che non trova i 16 elementi divisi dala carattere "|". Quindi il difetto potrebbe essere nel file.

correggi così:

B4X:

Sub CreaText(Lista As List) As String
    Dim Txt As String =""

    For i = 0 To Lista.Size-1
        'creo un mini array con tutte le parti della riga esaminata
        Dim stringArray() As String = Regex.Split("|",Lista.get(i))

        Try
            Txt=Txt & stringArray(11) & CRLF
            Txt=Txt & stringArray(0) & " - " & stringArray(2) & " - " & stringArray(4) & " : " & stringArray(16) & CRLF
            Txt=Txt & "_____________________________________________________" & CRLF
        Catch
            log("Errore nella riga: " & Lista.Get(i))
        End Try
    Next
 
    Return Txt
End Sub

RobyLaga · Mar 14, 2019

Star-Dust said:

Sembra che non trova i 16 elementi divisi dala carattere "|". Quindi il difetto potrebbe esser enel file.

correggi così:

B4X:

Sub CreaText(Lista As List) As String
    Dim Txt As String =""

    For i = 0 To 999
        'creo un mini array con tutte le parti della riga esaminata
        Dim stringArray() As String = Regex.Split("|",Lista.get(i))

        Try
            Txt=Txt & stringArray(11) & CRLF
            Txt=Txt & stringArray(0) & " - " & stringArray(2) & " - " & stringArray(4) & " : " & stringArray(16) & CRLF
            Txt=Txt & "_____________________________________________________" & CRLF
        Catch
            log("Errore nella riga: " & Lista.Get(i))
        End Try
    Next
 
    Return Txt
End Sub

Ok, domani provo, poi ti dico. ..
intanto grazie
poi se mi dici quanto è il saldo., sarei più contento ...

Star-Dust · Mar 14, 2019

RobyLaga said:
Ok, domani provo, poi ti dico. ..
intanto grazie
poi se mi dici quanto è il saldo., sarei più contento ...

Offre la casa

Domani credo nel pomeriggio, di mattina sono impegnato devo montare una regia AUDIO/VIDEO e non potrò staccarmi molto

RobyLaga · Mar 15, 2019

Non riesco a capire come condividere un file ... in Privato ... e nemmeno in pubblico

RobyLaga · Mar 15, 2019

Comunque, con questa modifica del codice, ora va meglio

riesco a mandare questo :

Ronedella d.6 |Ronde
- o - e : R
__
Tubo 20 Pvc|CodOOOAr
- u - o : O
__
Cacciavite croce 10C
- a - c : e
__
Plafoniera 2X36 IP65
- l - f :
__
Lampada|LEDR|Lampada
- a - p : m
__
Porta Maserati Dx 1
- o - t : D
__
Plafoniera 2X36 IP65
- l - f :
__
Filo 1.5 GV|CodArt T
- i - o : A
__
Filo 1.5 GV|CodArt T
- i - o : A
__
Plafoniera 2X36 IP65
- l - f :
__
Tubo 20 Pvc|CodOOOAr
- u - o : O
__
Plafoniera 2X36 IP65
- l - f :
__
Sensore dual|Cod Art
- e - s : d
__
Tubo 20 Pvc|CodOOOAr
- u - o : O
__
Plafoniera 2X36 IP65
- l - f :
__
Plafoniera 2X36 IP65
- l - f :
__
Plafoniera 2X36 IP65
- l - f :
__
Plafoniera 2X36 IP65
- l - f :
__
Plafoniera 2X36 IP65
- l - f :
__
Telecamera Bullet 2.
- e - e : e
__
Ronedella d.6 |Ronde
- o - e : R
__
Ronedella d.6 |Ronde
- o - e : R
__
Cacciavite croce 10C
- a - c : e
__

il codice modificato è il seguente :

Sub CreaText(Lista As List) As String
Dim Txt As String =""
'ListLMA01 = File.ReadList(File.DirRootExternal, "VideoCam12/ListResults10.txt")'''''
For i = 0 To Lista.Size-1

'creo un mini array con tutte le parti della riga esaminata
Dim stringArray() As String = Regex.Split("|",Lista.get(i))
Try

'Txt= Txt & stringArray(11) & CRLF
Txt= Txt & stringArray(0) & stringArray(1) &stringArray(2) &stringArray(3) &stringArray(4) &stringArray(5) & stringArray(6) &stringArray(7) & stringArray(8) & stringArray(9) & stringArray(10) & stringArray(11) & stringArray(12) & stringArray(13) & stringArray(14) & stringArray(15) & stringArray(16) & stringArray(17) & stringArray(18) & stringArray(19) & stringArray(20) & CRLF
Txt= Txt & stringArray(0) & " - " & stringArray(2) & " - " & stringArray(4) & " : " & stringArray(16) & CRLF
Txt= Txt & "____" & CRLF

Catch
Log("Errore nella riga: " & Lista.Get(i))
End Try
Next
Return Txt
End Sub

'ovviamente non si "rompe" vedo porzioni di record ...

GIS · Mar 15, 2019

RobyLaga said:
Dim stringArray() As String = Regex.Split("|",Lista.get(i))

B4X:

Dim stringArray() As String = Regex.Split("\|",Lista.get(i))

metti la barra....

RobyLaga · Mar 16, 2019

GIS said:
B4X:

Dim stringArray() As String = Regex.Split("\|",Lista.get(i))

metti la barra....

si "rompe" ...

GIS · Mar 16, 2019

RobyLaga said:
si "rompe" ...

cosa intendi?
adesso il tuo problema qual'è? vedi porzioni di file, cioe non estrai il record o solo certi campi?

Italian Stampare una List (ListView)

RobyLaga

Member

RobyLaga

Member

Star-Dust

Expert

RobyLaga

Member

RobyLaga

Member

Attachments

RobyLaga

Member

Star-Dust

Expert

Star-Dust

Expert

RobyLaga

Member

Star-Dust

Expert

RobyLaga

Member

RobyLaga

Member

GIS

Well-Known Member

RobyLaga

Member

GIS

Well-Known Member

Similar Threads

Italian Stampare una List (ListView)

Member

Member

Expert

Member

Member

Attachments

Member

Expert

Expert

Member

Expert

Member

Member

Well-Known Member

Member

Well-Known Member

Similar Threads

Privacy & Transparency

Privacy & Transparency