Se relizaron investigaciones sobre como componer un archivo de texto en Gambas creando un pequeño sistema de una agenda para que reconociera los datos y lo mostrara directo en un editor de textos.
Se utilizó la siguiente programación Para llenar la tabla con datos:
Y este otro para modificar e incrementar Datos nuevos:
Los botones se programaron de la siguiente manera:
Botón Salir ME.close
Botón Agregar
DIM row AS Integer = TableView1.Rows.Count
IF textnombre.Text <> "" AND Textapellido.Text <> "" AND Textnumero.Text <> "" THEN
IF textnombre.Text <> "" AND Textapellido.Text <> "" AND Textnumero.Text <> "" THEN
TableView1.Rows.Count += 1
TableView1[row, 0].Text = textnombre.Text
TableView1[row, 1].Text = Textapellido.Text
TableView1[row, 2].Text = Textnumero.Text
ELSE
Message.Info("Debe llenar los datos")
ENDIF
END
Botón Eliminar
DIM N AS Integer
N = 0
TableView1.clear
N = 0
TableView1.clear
Botón Guardar
DIM linea AS String
Linea = TableView1[3, 0].Text & ";" & TableView1[3, 1].Text & ";" & TableView1[3, 2].Text
File.Save("/home/usuario/Archivo/Datos.txt", Linea)
Linea = TableView1[3, 0].Text & ";" & TableView1[3, 1].Text & ";" & TableView1[3, 2].Text
File.Save("/home/usuario/Archivo/Datos.txt", Linea)
Se creo una ruta de archivo LLamada : ("/home/usuario/Archivo/Datos.txt", Linea) para que se guardaran los datos
y los mostrara En una carpeta llamada archivo

Se guardaran los Datos en Un Archivo de texto y se podrá visualizar Detalladamente
No hay comentarios.:
Publicar un comentario