Italian PDFWriter

[frx]

Ciao ho un problema con la libreria PDFWrter non mi crea il pdf

Sub EsportaPDF
 
    'Imposta le coordinate iniziali per la tabella
    Dim startX come Int = 100
    Dim startY come Int = 760
    Dim rowHeight come Int = 20
    Dim colWidth come Int = 120
    
    ' Aggiungi intestazione della tabella
    pdf.addText(startX, startY, 12, "Dispositivo")
    pdf.addText(startX + colWidth, startY, 12, "Temperatura (°C)")
    pdf.addText(startX + (2 * larghezzacolonna), startY, 12, "Dati")
    
    ' Inizia a riempire la tabella con i dati dallo storico
    Per i = 0 Per history.Size - 1
        startY = startY - rowHeight ' Aggiorna la posizione Y per ogni riga
        Dim entry As String = history.Get(i)
        
        ' Supponiamo che l'entry sia formattata come: "data : dispositivo : temperatura"
        Dim parts() come stringa = Regex.Split(": ", voce)
        Se parti.Lunghezza >= 3 Allora
            Dispositivo di oscuramento come stringa = parts(1).Trim
            Dim temp come stringa = parts(2).Trim
            Dim dateInfo come stringa = parts(0).Trim
            
            ' Aggiungi i dati alla tabella
            pdf.addText(startX, startY, 12, dispositivo)
            pdf.addText(inizioX + larghezzacolonna, inizioY, 12, temperatura)
            pdf.addText(inizioX + (2 * larghezzacolonna), inizioY, 12, dateInfo)
        Fine se
    Prossimo
    
    ' Specifica il percorso e salva il PDF
    Disattiva come OutputStream
    out = File.OpenOutput(File.DirRootExternal, "dati_esportati.pdf", False)
    fuori.Chiudi
    
    Msgbox("Esportazione PDF completata. Salvato come dati_esportati.pdf", "Esportazione PDF")
    
    MostraMenu
Fine sotto

 

[Sabotto]

innanzitutto metti un codice riproducibile. Hai postato un codice tradotto in italiano

Dim startX come Int = 100

Dispositivo di oscuramento come stringa = parts(1).Trim

 

[Sagenut]

Il problema è che

File.DirRootExternal

non è più utilizzabile liberamente.
Puoi salvare il file senza problemi nella cartella della tua app, ma poi sarà accessibile solo dalla app stessa.
Per salvare in altre posizioni devi fare scegliere all'utente dove con il codice contenuto in questa discussione
https://www.b4x.com/android/forum/t...-folder-list-of-other-related-methods.129897/

 

[frx]

Grazie