Comentarios |
Re: Cargar Al Azar Textos En Un Textarea
|
Hola
No necesitas esa variable TEXTO.
user.home devuelve tu home. A eso le añades /Texto. Luego calculas un valor entero entre 1 y 5 y se lo anexas y luego e. .txt. Abres ese archivo y el contenido lo metes en el textarea.
Declaras una variable de tipo file cuando quieres hacer otras cosas en las que no entro por no hacer mas espeso.
|
soplo [ Sabado, 18 Junio 2011, 18:22 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea
|
Gracias
|
ivanovichenco [ Sabado, 18 Junio 2011, 18:32 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea
|
DIM TEXTO AS File
Hola
Sólo a modo de apunte, decir que los nombres de variables no deberías ponerlos en mayúsculas, ya que por convención (prácticamente en todos los lenguajes de programación) las mayúsculas se suelen usar en la declaración de constantes, facilitando así la lectura del código e identificación de objetos.
Saludos
|
jguardon [ Sabado, 18 Junio 2011, 19:54 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea
|
Sigo con el problema pues no me quiso cargar. Dice que no existe el archivo.
PUBLIC SUB Form_Open()
DIM Texto AS File
Textarea1.text = File.load(user.home &/ "Textos/" & CInt(Rnd(1, 5)) & ".txt")
END
última edición por ivanovichenco el Domingo, 19 Junio 2011, 02:12; editado 2 veces
|
ivanovichenco [ Sabado, 18 Junio 2011, 23:34 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea
|
Pero hombre, tu mira lo que estás intentando cargar que será lo que tengas en tu home y dentro en un directorio Textos y allí algo como 1.txt o 5.txt.
Yo no sé lo que tienes en tu home. Podría ser la T de "Textos" ¿como quieres que yo lo sepa?
Lo que estás cargando allí es Textos/X.txt en tu home donde X es entre 1 y 5. Si allí no está el fichero ese pues claro que tienes error pero yo no puedo saber donde está. Me limito a dar la direccion que tu pusiste al principio.
Aparte ¿que es eso de Dim file as file? quita esa línea.
última edición por soplo el Sabado, 18 Junio 2011, 23:49; editado 1 vez
|
soplo [ Sabado, 18 Junio 2011, 23:47 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea
|
Cargar textos
Mira, este es mi problemita y no le saco punta por ningun lado.
gambas 2.22
última edición por ivanovichenco el Domingo, 19 Junio 2011, 01:11; editado 1 vez
|
ivanovichenco [ Domingo, 19 Junio 2011, 01:10 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea
|
¿Y has comprobado que en /home/usuario/Textos está el archivo X.txt?
|
soplo [ Domingo, 19 Junio 2011, 01:52 ]
|
|
Re: Cargar Al Azar Textos En Un Textarea(Solucionado)
|
Soplo,ya quedo solucionado, Gracias. Así cargan, les quité el path user.home.
PUBLIC SUB Form_Open()
DIM Texto AS File
Textarea1.text = File.load("Textos/" & CInt(Rnd(1, 5)) & ".txt")
END
última edición por ivanovichenco el Domingo, 19 Junio 2011, 02:11; editado 2 veces
|
ivanovichenco [ Domingo, 19 Junio 2011, 02:09 ]
|
|
|