Buongiorno a tutti , visualizzo un file di testo in una edittext con questo codice, ma non mostra la barra verticale di scorrimento
(aggiungo anche che non riesco a capire dove si trova il file, i dati vengono mostrati e quindi salvati ma non trovo il file)
qualche aiuto da parte vostra?
vorrei capire dov'è il file e come mostrare una barra verticale per salire e scendere quando il file contiene molte righe
Grazie a tutti.
	
	
	
	
	
	
	
		
			
			
			
			
			
		
	
	
	
		
	
	
		
	
			
			(aggiungo anche che non riesco a capire dove si trova il file, i dati vengono mostrati e quindi salvati ma non trovo il file)
qualche aiuto da parte vostra?
vorrei capire dov'è il file e come mostrare una barra verticale per salire e scendere quando il file contiene molte righe
Grazie a tutti.
			
				B4X:
			
		
		
		    Dim strLinea As String
  
    LeggiTxt.Initialize(File.OpenInput(File.DirInternal, "esercizi.txt"))
  
    EditText1.Text = "Dimensioni file: " & File.Size(File.DirRootExternal, "esercizi.txt") & " bytes." & CRLF
    strLinea = LeggiTxt.ReadLine
    Do While strLinea <> Null
        EditText1.Text = EditText1.text & strLinea & CRLF
        strLinea = LeggiTxt.ReadLine
    Loop
    LeggiTxt.Close