¿ Para qué sirve la tarjeta externa ? (pa ná, ahora mismo)

[nachoap]

Bueno, pues os vuelvo a pedir ayuda. ¿Alguien sabe cómo vincular CoolReader a los Intent de tipo "text/*"?

Os dejo el código que tengo. Ya es capaz de copiar el libro de la carpeta oculta a la de trabajo (si no existe ya) y de realizar la llamada al libro copiado, pero en la lista de programas disponibles no aparece CoolReader por ninguna parte. Imagina que tiene que haber alguna forma de que se pueda asociar. De hecho, si pulso en un fb2 desde file expert, sí sale CoolReader en la lista, pero ni desde Root explorer ni desde la aplicación salen. LA llamada que realizo es la misma que en lipapa android, que funciona en todas las tabletas y teléfonos "decentes".

En fin, es el penúltimo paso que he de seguir para dar por factible un lipapa en el T1 (el último será la prueba de que con la poca memoria que le queda es capaz de trabajar con una bd de 30 megas, pero es un tema que ya llegará en su momento).

Gracias por adelantado

-----------------------------------------------------------------------------------------------------
'Activity module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.

End Sub

Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.

Dim btAbrir As Button
End Sub

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Entrada")
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub PonerURL(sCadena As String) As String
Dim i As Long
Dim sAux As String
Dim StrOrg() As String
Dim StrDst() As String

StrOrg = Array As String("%", "!", "#", "$", "&", "'", "(", ")", "*", "+", ",", ":", ";", "=", "?", "@", "[", "]", " ", "<", ">", "\", "^", "`", "{", "|", "}" )
StrDst = Array As String("%25", "%21", "%23", "%24", "%26", "%27", "%28", "%29", "%2A", "%2B", "%2C", "%3A", "%3B", "%3D", "%3F", "%40", "%5B", "%5D", "%20", "%3C", "%3E", "/", "%5E", "%60", "%7B", "%7C", "%7D")

' StrOrg = Array As String("%", "!", "#", "$", "&", "'", "(", ")", "*", "+", ",", ":", ";", "=", "?", "@", "[", "]", " ", "<", ">", "\", "^", "`", "{", "|", "}", "€", "‚", "ƒ", "„", "…", "†", "‡", "ˆ", "‰", "Š", "‹", "Œ", "Ž", "‘", "’", "“", "”", "•", "–", "—", "˜ ", "™", "š", "›", "œ", "ž", "Ÿ", "¡", "¢", "£", "¥", "|", "§", "¨", "©", "ª", "«", "¬", "¯", "®", "¯", "°", "±", "²", "³", "´", "µ", "¶", "·", "¸", "¹", "º", "»", "¼", "½", "¾", "¿", "À", "Á", "Â", "Ã", "Ä", "Å", "Æ", "Ç", "È", "É", "Ê", "Ë", "Ì", "Í", "Î", "Ï", "Ð", "Ñ", "Ò", "Ó", "Ô", "Õ", "Ö", "Ø", "Ù", "Ú", "Û", "Ü", "Ý", "Þ", "ß", "à", "á", "â", "ã", "ä", "å", "æ", "ç", "è", "é", "ê", "ë", "ì", "í", "î", "ï", "ð", "ñ", "ò", "ó", "ô", "õ", "ö", "÷", "ø", "ù", "ú", "û", "ü", "ý", "þ", "ÿ")
' StrDst = Array As String("%25", "%21", "%23", "%24", "%26", "%27", "%28", "%29", "%2A", "%2B", "%2C", "%3A", "%3B", "%3D", "%3F", "%40", "%5B", "%5D", "%20", "%3C", "%3E", "/", "%5E", "%60", "%7B", "%7C", "%7D", "%80", "%82", "%83", "%84", "%85", "%86", "%87", "%88", "%89", "%8A", "%8B", "%8C", "%8E", "%91", "%92", "%93", "%94", "%95", "%96", "%97", "%98", "%99", "%9A", "%9B", "%9C", "%9E", "%9F", "%A1", "%A2", "%A3", "%A5", "%A6", "%A7", "%A8", "%A9", "%AA", "%AB", "%AC", "%AD", "%AE", "%AF", "%B0", "%B1", "%B2", "%B3", "%B4", "%B5", "%B6", "%B7", "%B8", "%B9", "%BA", "%BB", "%BC", "%BD", "%BE", "%BF", "%C0", "%C1", "%C2", "%C3", "%C4", "%C5", "%C6", "%C7", "%C8", "%C9", "%CA", "%CB", "%CC", "%CD", "%CE", "%CF", "%D0", "%D1", "%D2", "%D3", "%D4", "%D5", "%D6", "%D8", "%D9", "%DA", "%DB", "%DC", "%DD", "%DE", "%DF", "%E0", "%E1", "%E2", "%E3", "%E4", "%E5", "%E6", "%E7", "%E8", "%E9", "%EA", "%EB", "%EC", "%ED", "%EE", "%EF", "%F0", "%F1", "%F2", "%F3", "%F4", "%F5", "%F6", "%F7", "%F8", "%F9", "%FA", "%FB", "%FC", "%FD", "%FE", "%FF")


sAux = sCadena
For i = 0 To StrOrg.Length-1
sAux = sAux.Replace(StrOrg(i), StrDst(i))
Next

Return sAux
End Sub

Sub EjecutarRoot (comando As String)
Dim Command, Runner As String
Dim StdOut, StdErr As StringBuilder
Dim Result As Int
Dim Ph As Phone


Runner = File.Combine(File.DirInternalCache, "runner")
Command = File.Combine(File.DirInternalCache, "command")
File.WriteString(File.DirInternalCache, "runner", "su < " & Command)
File.WriteString(File.DirInternalCache, "command", comando & CRLF & "exit") 'Any commands via crlf, and exit at end
StdOut.Initialize
StdErr.Initialize
Result = Ph.Shell("sh", Array As String(Runner), StdOut, StdErr)
MsgboStdOut.tostring, "")
End Sub

Sub AbrirLibro (RutaLibro As String)
Dim inAct As Intent
Dim RutaL, RutaE, Prefijo, Origen, Destino, sFichero, sOrg, sOrg2, sFicheroDst As String
Dim NumLetras, i, iPos As Long
Dim TR As TextReader

Prefijo = "file://" & "mnt/extsd/MISLIBROS/"
Origen = "/mnt/extsd/.LIBROS/"
Destino = "/mnt/extsd/MISLIBROS/"

' Número de letras a descartar (prefijo de lipapa)
NumLetras = 10

If NumLetras < RutaLibro.Length Then

' Descartamos las primeras
sFichero = RutaLibro.SubString(NumLetras)
iPos = RutaLibro.LastIndexOf("\")
sFicheroDst = RutaLibro.SubString2(iPos+1, RutaLibro.Length)

sOrg = Prefijo & PonerURL(sFicheroDst)
sOrg2 = sFichero.Replace("\", "/")

'Copiar si no existe
'EjecutarRoot("mkdir /mnt/extsd/MISLIBROS")
If Not(File.Exists(Destino, sFicheroDst)) Then
EjecutarRoot("cat '" & Origen & sOrg2 & "'>'" & Destino & sFicheroDst & "'")
End If

' Abrir el libro
Try
inAct.Initialize(inAct.ACTION_VIEW, sOrg)
inAct.SetType("text/*")
StartActivity(inAct)
Catch
ToastMessageShow("No puedo abrir el libro: " & sOrg, True)
End Try
Else
ToastMessageShow("El libro seleccionado no tiene la ruta asignada. Haz Copiar en ebook desde Lipapa para PC", True)
End If
End Sub


Sub btAbrir_Click
'El tipo de rutas que se encontrará en RUTAPAPYRE, en la bd de lipapa
AbrirLibro("C:\LIBROS\A\AS\ASI\Asimov, Isaac & Janet\Fronteras II [10349].FB2")
End Sub

[j0534ng31]

Lo que he hecho es (tras muchos cabezazos, pues no sabía que este android no tiene comando cp) usar un ingenioso sistema de B4A para crear "al vuelo" un shell y ejecutarlo como root. Para la copia uso cat (porque, como he comentado, "cp" no funciona):

Anda, quita eso y pon "busybox cp -p /mnt/extsd/kkk.fb2 /mnt/extsd/MISLIBROS/kkk.fb2"

Bueno, pues os vuelvo a pedir ayuda. ¿Alguien sabe cómo vincular CoolReader a los Intent de tipo "text/*"?

Lo siento, en eso estoy totalmente pez.

Por lo que he creído entender, la asociación de una extensión con una aplicación se hace en el AndroidManifest.xml de la propia aplicación. (Aunque no se si es de eso de lo que hablas, o de que tu aplicación abra determinada extensión con otra aplicación.)

Si es lo primero, he visto algo de información aquí

Y si es lo último (aunque a mi se me parece mucho a tu código), quizás te sirva alguno de los ejemplos del AndExplorer de aquí, o los dos últimos ejemplos de aquí

[nachoap]

Anda, quita eso y pon "busybox cp -p /mnt/extsd/kkk.fb2 /mnt/extsd/MISLIBROS/kkk.fb2"



Lo siento, en eso estoy totalmente pez.

Por lo que he creído entender, la asociación de una extensión con una aplicación se hace en el AndroidManifest.xml de la propia aplicación. (Aunque no se si es de eso de lo que hablas, o de que tu aplicación abra determinada extensión con otra aplicación.)

Si es lo primero, he visto algo de información aquí

Y si es lo último (aunque a mi se me parece mucho a tu código), quizás te sirva alguno de los ejemplos del AndExplorer de aquí, o los dos últimos ejemplos de aquí

Gracias por la respuesta. Finalmente me han echado un cable en la web de Basic4Android. Al parecer, cuando preparas un Intent puedes indicar el paquete y la clase con la que ha de abrirse. Con una rutina de B4A puedes comprobar todos los nombres de paquetes instalados (CoolReader era el primero) y con un poco de imaginación (lo cierto es que "sonó la flauta") he añadido otro código que, al depurar, me ha mostrado la clase (.Coolreader). Ahora se salta la lista de apps directamente, y abre CoolReader con el libro en cuestión. Evidentemente, esa opción sólo interesa si es un fb2, y en la aplicación final habrá que preguntar si se quiere hacer eso, por si lo que se quiere es editar el fb2 con Jota, pero como aproximación, por si hay alguien interesado en este tema, os dejo el código operativo de la prueba. Insisto, funciona de maravilla, aunque le faltan las protecciones, el control de excepciones, etc.:


'Activity module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.

End Sub

Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.

Dim btOpen AsButton
End Sub

Sub Activity_Create(FirstTime AsBoolean)
Activity.LoadLayout("Entrada")
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed AsBoolean)

End Sub

Sub PonerURL(sCadena AsString) AsString
Dim i AsLong
Dim sAux AsString
Dim StrOrg() AsString
Dim StrDst() AsString

StrOrg = ArrayAsString("%", "!", "#", "$", "&", "'", "(", ")", "*", "+", ",", ":", ";", "=", "?", "@", "[", "]", "", "<", ">", "\", "^", "`", "{", "|", "}" )
StrDst = ArrayAsString("%25", "%21", "%23", "%24", "%26", "%27", "%28", "%29", "%2A", "%2B", "%2C", "%3A", "%3B", "%3D", "%3F", "%40", "%5B", "%5D", "%20", "%3C", "%3E", "/", "%5E", "%60", "%7B", "%7C", "%7D")

sAux = sCadena
For i = 0To StrOrg.Length-1
sAux = sAux.Replace(StrOrg(i), StrDst(i))
Next

Return sAux
End Sub

Sub EjecutarRoot (comando AsString)
Dim Command, Runner AsString
Dim StdOut, StdErr AsStringBuilder
Dim Result AsInt
Dim Ph AsPhone

Runner = File.Combine(File.DirInternalCache, "runner")
Command = File.Combine(File.DirInternalCache, "command")
File.WriteString(File.DirInternalCache, "runner", "su < " & Command)
File.WriteString(File.DirInternalCache, "command", comando & CRLF & "exit") 'Any commands via crlf, and exit at end
StdOut.Initialize
StdErr.Initialize
Result = Ph.Shell("sh", ArrayAsString(Runner), StdOut, StdErr)
Msgbox(StdOut.tostring, "")
End Sub

Sub AbrirLibro (RutaLibro AsString)
Dim inAct AsIntent
Dim RutaL, RutaE, Prefijo, Origen, Destino, sFichero, sOrg, sOrg2, sFicheroDst AsString
Dim NumLetras, i, iPos AsLong
Dim TR AsTextReader
' Prefijo
Prefijo = "file://" & "mnt/extsd/MISLIBROS/"
Origen = "/mnt/extsd/.LIBROS/"
Destino = "/mnt/extsd/MISLIBROS/"

' Número de letras a descartar (prefijo de lipapa)
NumLetras = 10

If NumLetras < RutaLibro.Length Then

' Descartamos las primeras
sFichero = RutaLibro.SubString(NumLetras)
iPos = RutaLibro.LastIndexOf("\")
sFicheroDst = RutaLibro.SubString2(iPos+1, RutaLibro.Length)

sOrg = Prefijo & PonerURL(sFicheroDst)
sOrg2 = sFichero.Replace("\", "/")

'EjecutarRoot("mkdir /mnt/extsd/MISLIBROS")
IfNot(File.Exists(Destino, sFicheroDst)) Then
EjecutarRoot("cat '" & Origen & sOrg2 & "'>'" & Destino & sFicheroDst & "'")
EndIf

Try
inAct.Initialize(inAct.ACTION_VIEW, sOrg)
inAct.SetType("text/*")
inAct.SetComponent("org.coolreader/.CoolReader")
StartActivity(inAct)
Catch
ToastMessageShow("No puedo abrir el libro: " & sOrg, True)
EndTry
Else
ToastMessageShow("El libro seleccionado no tiene la ruta asignada. Haz Copiar en ebook desde Lipapa para PC", True)
EndIf
End Sub


Sub btOpen_Click
Dim pm AsPackageManager
Dim packages AsList
Dim sPaquete AsString
Dim in AsIntent

'Ver paquetes instalados
'in = pm.GetApplicationIntent("org.coolreader")
'packages = pm.GetInstalledPackages
'For i = 0 To packages.Size - 1
' sPaquete = packages.Get(i)
' Log(packages.Get(i))
'Next

'El tipo de rutas que se encontrará en RUTAPAPYRE, en la bd de lipapa
AbrirLibro("C:\LIBROS\A\AS\ASI\Asimov, Isaac & Janet\Fronteras II [10349].FB2")
End Sub

No es la victoria completa (falta la prueba de la bd con tan poca memoria) pero creo
que, como mínimo, se puede construir un buen catalogador teniendo los libros en la
carpeta oculta. La potencia de lo que se pueda hacer dependerá de la potencia del T1 y
de la memoria que consuma con sqlite. Pero lo más complicado ya funciona

Más tarde voy a probar el código para sustituir el "cat"

[j0534ng31]

Y, ya que estás en ello, ¿tienes alguna posibilidad de asociar los .fb2.zip al coolreader?

Que yo sepa, aún no hay modo de invocarlos sin descomprimirlos (que funcionen directamente), pero no se por qué.

[nachoap]

Y, ya que estás en ello, ¿tienes alguna posibilidad de asociar los .fb2.zip al coolreader?

Que yo sepa, aún no hay modo de invocarlos sin descomprimirlos (que funcionen directamente), pero no se por qué.

Pues voy a probar a ver qué pasa si el fichero de ejemplo es un zip... Ahora te cuento.

[nachoap]

Pues lo abre perfectamente, y sin necesidad de que sea un .fb2.zip, sino como zip directo.

He hecho la prueba comprimiendo con 7z el libro "La vida difícil" (para que no hubiese "falsos positivos" por usar el mismo libro que en la prueba anterior). Ese libro no había sido usado nunca en estas pruebas. Luego he cambiado la función AbrirLibro de antes por ésta:

AbrirLibro("C:\LIBROS\M\MR\MRO\Mrozek, Slawomir\La vida difícil [14373].zip")

Sin ningún otro cambio, ¡y se ha abierto CoolReader y ha cargado ese libro!

Te veo dejando el java y pasándote a Basic4Android

Si quieres te pongo el apk y cómo configurar una prueba.

Un saludo

P.D.: este cambio me puede dar algo más de trabajo en Lipapa Marte, porque tendría que añadir un empaquetador (zip) de los libros, pero éstos pasarían a ocupar una tercera parte (o menos) de lo que ocupan ahora.

Editado: lo he estado comprobando, y efectivamente, ha copiado en /mnt/extsd/MISLIBROS el fichero zip, y CoolReader lo ha abierto. No necesita descomprimirlo y al añadir el Intent el paquete y la clase, lo abre perfectamente

[nachoap]

Os dejo una copia de mi mensaje en la web amiga:

Tras unas cuantas horas de pruebas, "darle al tarro" y más pruebas, he llegado a dos conclusiones:

1. No tengo ganas de reprogramar Lipapa Android para el T1 (es un coñazo ).
2. Quiero poder acceder a mi biblioteca desde el T1.

¿Y cómo se "come" eso? Pues se me ha ocurrido una aplicación muy sencilla que permite abrir con CoolReader un libro simplemente escribiendo su número en el T1. Es decir, con el móvil android o desde alguno de los otros lipapas se localiza el número del libro a leer, se ejecuta el programita del T1, se escribe el numero, se pulsa un botón... y listo.

¿Utilidad? Para mí, que llevo siempre encima el móvil con lipapa android, es una maravilla, pues me evita estar copiando los libros de la carpeta oculta a la visible. ¿Para el resto de la humanidad? Pues para algunos sí, y para otros no. Quien lo vea útil que lo use, y quien no, pues que no lo use

Lo que he logrado hacer con el T1:

1. Lo he rooteado.
2. He logrado que funcione samba, con lo que ya no uso el cable para transferir o sacar ficheros. Es interesante porque con cada conexión por cable comieza un ciclo de carga, y si lo enchufáis y desenchufáis mucho la batería se irá a la porra antes de tiempo, y no es extraíble (directamente).
3. Tengo una partición ext3 de 600 megas en la microSD de 32 Gb, para poder instalar en ella las aplicaciones nuevas, y para mover las que no sean de sistema, así libero espacio.

Todo lo anterior se explica muy bien en la web amiga (lectoreselectronicos), y todo funciona perfectamente.

Los pasos previos para meter la biblioteca en el T1:

1. Crear una carpeta (por ejemplo, con Root Explorer) en /mnt/extsd llamada ".LIBROS" (en mayúsculas y con el punto delante). Al tener un punto delante el gestor de contenidos del Sony T1 no se pondrá a analizar qué hay dentro, lo que evita que se quede colgado al tratar de catalogar miles de libros.
2. Copiar en ella la estructura de libros tal y como la genera Lipapa al copiar en el papyre. Este programa no es configurable, y requiere que la copia en el papyre se haga sobre C:\LIBROS\. El programilla va a eliminar las primeras 10 letras de RUTAPAPYRE para generar la ruta del libro en la microSD. Así, un libro se Asimov se guardará en /mnn/extsd/.LIBROS/A/AS/ASI/Asimov, Isaac/
3. Crear la carpeta MISLIBROS (en mayúsculas).
4. Descargar el .apk e instalarlo.
5. Copiar la base de datos lipapa.sqlite (la genera Lipapa Marte) en /mnt/extsd/

La forma de trabajar es muy simple: se ejecuta el programa (Buscador Libros T1), se pone el número de libro y se pulsa en "Abrir con CoolReader". Si es un EPUB o se quiere editar con Jotas, se pulsa en "Abrir con App Genérica".

Lo que el programa hace es:

1. Busca el número en la bd lipapa.sqlite. A partir de él obtiene RUTAPAPYRE
2. De RUTAPAPYRE elimina las primeras 10 letras (C:\LIBROS\) y genera una ruta concatenando /mnt/extd/.LIBROS/ con el resto de RUTAPAPYRE
3. Obtiene el nombre del fichero (todo lo que está después de la última "/").
4. Crea una shell como superusuario en la que hace un "cat" del libro original en la carpeta MISLIBROS (porque CoolReader no puede leer libros en la carpeta oculta .LIBROS).
5. Se queda esperando a que se copie el libro un máximo de 5 segundos (en libros muy grandes es posible que la primera vez que lo busquéis no os lo abra, por tardar más de 5 segundos en copiarlo. En ese caso podéis volver a pulsar el botón de "Abrir").
5. Si se pulsó el primer botón, prepara un "Intent" indicando que se use el paquete org.coolreader y la clase Coolreader, lo que supone llamar directamente al CoolReader para que abra el libro. Si se pulsó el segundo botón, saca una lista de las aplicaciones capaces de abrir un fichero de tipo mime text/* (a mí no me sale CoolReader en esa lista).

Y ya está...

Algunas considerciones:

1. El programa permite abrir los fb2 comprimidos como zip . Pero Lipapa Marte todavía no los genera de forma automática al copiar en el libro electrónico (lo hará en breve). Cuando lo haga, podréis copiar los zip en lugar de los fb2, y ahorraréis la mitad del espacio de la SD. Al llamar directamente a CoolReader no hay problemas con que no reconozca la extensión zip para abrirlos.

2. Esta aplicación sólo usa los campos NUMERO y RUTPAPYRE de lipapa.sqlite, pero lipapa genera la BD lipapa.sqlite con todos los datos. Podéis usar una aplicación que gestione SQLIte (por ejemplo, SharpPlus SQLite Developer) para eliminar LOS CAMPOS sobrantes, y que sólo queden en la BD los campos NUMERO y RUTAPAPYRE. Luego compactáis la BD y vuestro T1 os lo agradecerá (pasa de 18Mb a 1Mb). En breve lo hará Lipapa, pero hasta el verano no creo que lo distribuya.

3. Los libros que vayáis abriendo se quedarán guardados en la carpeta original (.LIBROS) y en MISLIBROS. De vez en cuando podéis ir haciendo limpieza en MISLIBROS para que el gestor de contenidos del Sony no se sature.

El APK: http://www.4shared.com/android/wQdjh...paMarteT1.html

Recordad que a veces falla y hay que volver a pulsar el botón "Abrir con CoolReader"

Y el código fuente completo (cortito, pero matón), en Basic4Android, por si alguien lo quiere retocar o usar de base para hacer un lipapa completo:

http://www.4shared.com/zip/1fBMI3uM/..._marte_T1.html

[huanglao]

Quiero dar las gracias a nachoap por su trabajo y por ponerlo a disposición de todos nosotros. También agradezco las sugerencias vertidas por j0534ng34 respecto del nuevo Lipapa.

Os ruego encarecidamente a todos que os paseis por el hilo Lipapa T1 y animeis al autor.

Gracias, gracias, gracias.


He modificado la cabecera del mensaje original, espero que lo admitan.

[jotam]

Tras ver ésto:

Tras unas cuantas horas de pruebas, "darle al tarro" y más pruebas, he llegado a dos conclusiones:
1. No tengo ganas de reprogramar Lipapa Android para el T1 (es un coñazo ).
2. Quiero poder acceder a mi biblioteca desde el T1.

No esperaba nuevas reformas al Lipapa para el T1. Por otro lado, tampoco uso el Lipapa de escritorio, pese a conocer el proyecto. Nunca me ha dado por 'instalarlo' y estructurar mi biblioteca conforme a éste programa.
Y pese a todo me parecía extraño que nadie comentara nada. Total que ayer entré en la página amiga para ver si sus comentarios pasaban tan desapercibidos como aquí, y vi que no era así, así que supuse que nachoap es un incondicional de la página amiga, y que la gente estaría allí animándole para que siguiera con el proyecto.
Cuál fue mi sorpresa hoy al ver que había creado un nuevo hilo con el tema. Me parece estupendo que siga con éste proyecto que tanto promete. Adelante nachoap. Me parece genial que tengas fuerzas para seguir pese a todo. Parece ser que la gente todavía no sabía del tema, éste hilo estaba un poco oculto para la gente.

Por otro lado tampoco entiendo que si ya habías desarrollado una aplicación para Android, no entiendo por qué no funciona. He intentado buscarla, pero cuando comprendía que la única forma era mediante el market, lo dejé pasar (porque el market y yo no nos llevamos bien, por decirlo de alguna forma). Pero entiendo que no funciona, sino no la tendrías que modificar.

Otra cosa que me parece muy curiosa, es la aplicación que usas para desarrollar y el código mismo. Cuando lo vi, dije, ¡pero si es Visual! Al menos por las declaraciones. Por eso me pareció interesante el código que nos dejaste. Claro que fui a ver el programa de desarrollo, el Basic4Android, y cuando vi que era de pago me desinflé. Porque yo de programación de muy poco a nada. Y menos si tengo que invertir a cero resultados.

Y pese a que no vaya a ser un usuario activo de ésta aplicación, me parece un estupendo proyecto para nuestros T1 modificados.

Como dice huanglao, hay que pasar por el hilo.
De todas formas, lo escrito pintaba poco allí. Aquí tampoco mucho, pero allí nada.

Saludos y gracias.

[erpatochino]

Muhas gracias nachoap por tu gran "curre".
La verdad es que no entiendo la mitad de las cosas que dices, pero da igual, te animo a que sigas
que seguro que muhca gente le da utilidad.
La verdad es que yo con tener 10 libros en el t1 voy en moto.
Pero claro, hay mucha gente que necesita tener bibliotecas en el t1.
Así que gracias.