https://foro.gambas-es.org/viewtopic.php?f=3&t=1225
-----------------------------------
Erik
Jueves, 16 Diciembre 2010, 08:22

Tabla Con Link (solucionado)
-----------------------------------
Que tal, estoy desarrollando una base de datos para un negocio, y me gustaria que al momento de abrir la aplicacion carge la base de datos en una tabla, y que al dar click sobre el nombre del articulo me abra un documento (de preferencia pdf) con la descripcion mas detallada del articulo y/o una foto, sera muy dificil?
Cargar la tabla ya esta hecho, pero no tengo idea de como hacer que el nombre del articulo dentro de la tabla sirva de link, o que se pueda poner un boton a un lado para llamar al documento pero que respete el articulo seleccionado ya que son mas de mil y quiero evitar tener que teclear el nombre para buscar el archivo, muchas gracias


-----------------------------------
shordi
Jueves, 16 Diciembre 2010, 08:53

Re: Tabla Con Link
-----------------------------------
Mucho pides en un momento.
Empieza estudiando en las ayudas más o menos lo siguiente:

- el dialog.openfile para seleccionar los ficheros pdf del disco, 
- los eventos Activate o click o dblclick  para ejecutar el código en el gridview o table view, 
- el componente gb.pdf o gb.desktop para visualizar el pdf... 

En los ejemplos de Gambas tienes el funcionamiento de cada cosa, más o menos.

Cuando tengas eso algo claro, pon aquí tu código o tu proyecto y te podremos ayudar en cosas concretas.

Suerte


-----------------------------------
Invitado
Jueves, 16 Diciembre 2010, 17:27

Re: Tabla Con Link
-----------------------------------
[quote user="shordi" post="6998"]Mucho pides en un momento.
Empieza estudiando en las ayudas más o menos lo siguiente:

- el gb.openfile para seleccionar los ficheros pdf del disco, 
- los eventos Activate o click o dblclick  para ejecutar el código en el gridview o table view, 
- el componente gb.pdf o gb.desktop para visualizar el pdf... 

En los ejemplos de Gambas tienes el funcionamiento de cada cosa, más o menos.

Cuando tengas eso algo claro, pon aquí tu código o tu proyecto y te podremos ayudar en cosas concretas.

Suerte[/quote]

Es Dialog.OpenFile  :mrgreen:


-----------------------------------
shordi
Jueves, 16 Diciembre 2010, 18:40

Re: Tabla Con Link
-----------------------------------
Corregido.


-----------------------------------
Erik
Viernes, 17 Diciembre 2010, 00:27

Re: Tabla Con Link
-----------------------------------
Ok gracias, voy a checar todo lo que me comentas, en unos dias les digo como me fue, sabia que no seria facil :P


-----------------------------------
Erik
Miercoles, 22 Diciembre 2010, 04:51

Re: Tabla Con Link
-----------------------------------
Hola de nuevo, parece ser que ya solucione mi problema, no es tal cual generar un link dentro de la tabla, no encontre mucha informacion al respecto, es seleccionando un elemento de esta y luego dar click a un boton que agregue, en cuanto termine les prometo subir el codigo por si a alguien le interesa. Peeero jejejeje, haciendo pruebas cree mas bases de datos, solo que al querer abrir de nuevo las primeras con el gestor de gambas no las encuentra, pero voy a la carpeta y ahi estan, no se si se deba a que cree una carpeta dentro de esa carpeta desde nautilus que ya no me las reconoce, me gustaria que me ayudaran a poder abrir de nuevo esas bases con el gestor de gambas, no me reconoce la clave de encriptacion y estoy 100% seguro que la estoy metiendo bien, gracias y perdonen las molestias


-----------------------------------
Erik
Miercoles, 22 Diciembre 2010, 05:00

Re: Tabla Con Link
-----------------------------------
Olvidenlo entre como si fuera a crear una nueva base pero con la misma contrase;a y aparecieron de nuevo jejeje

Pero diganme como quitar mensajes esque no encuentro donde :P :shock:


-----------------------------------
Erik
Miercoles, 22 Diciembre 2010, 06:59

Re: Tabla Con Link
-----------------------------------
Por fin, como les prometi aqui tengo mi codigo a quien le interese, este muestra una ventana con una tabla y 3 botones, el de cotizar (tema aparte), abrir y salir, la funcion Tabla.Current.Text me manda el texto de la primer columna del objeto seleccionado, en este caso el numero de dato y lo guardo en "archivo", en "ruta" guardo la ruta de la carpeta con los archivos que se llaman igual excepto por la terminacion del archivo (ej: archivo1.pdf, archivo2.pdf, archivo3.pdf...), junto las cadenas mas la terminacion del archivo que tambien puede ser .pdf y listo, lo mando a abrir. Gracias por contestar mis dudas, aun no termino mi proyecto y aun tengo mas preguntas, pero las pondre en otro tema, gracias de nuevo

NOTA:Faltan depurar errores en el programa como por ejemplo si no seleccionas ningun archivo y mandas a abrir

PRIVATE conect AS Connection
PRIVATE Clave AS String

PUBLIC SUB SalirB_Click()    'Boton salir

  ME.CLOSE(0)

END


PUBLIC SUB LlenarTabla() 'LLeno mi tabla con datos
   DIM Res AS Result
  
   
   Tabla.Clear()
   
   Tabla.Columns.Count = 4
   Tabla.Columns[0].Text = "#"
   Tabla.Columns[1].Text = "Serie"
   Tabla.Columns[2].Text = "Tipo"
   Tabla.Columns[3].Text = "Precio ($)"
  
   ConectarBase()
   Res = conect.EXEC("select * from ArticulosDatos")
   
   DO WHILE Res.Available
       Clave = Res["NumeroDato"] 
       Tabla.Add(Clave, Clave)
       
       Tabla[Clave][1] = Res["NumeroSerie"]
       Tabla[Clave][2] = Res["Tipo"]
       Tabla[Clave][3] = Res["Precio"]
   
       Res.MoveNext()
       
   LOOP 
   
   CerrarConexion()

END

PRIVATE FUNCTION ConectarBase() AS Boolean
   
   IF conect <> NULL THEN RETURN FALSE
      
   conect = NEW Connection
   conect.Host = "/home/user/..."
   conect.Name = "ArticulosEE"
   conect.Type = "sqlite3"
   
   TRY conect.OPEN()
   
   IF ERROR THEN 
       conect = NULL
       Message.ERROR("Error al conectar en la base")
       RETURN TRUE
   END IF
   
   RETURN FALSE

END

PRIVATE SUB CerrarConexion()
   
   IF conect = NULL THEN RETURN 
   conect.Close()
   conect = NULL
   
END

PUBLIC SUB Form_Open()

  ConectarBase()
  LlenarTabla()
  ME.ShowModal()

END



PUBLIC SUB AbrirB_Click()

  DIM archivo AS String
  DIM ruta AS String
  
  archivo = Tabla.Current.Text 'Guardo el numero del articulo
  ruta = "/home/user/..."
  ruta = ruta & archivo & ".odt"
  Desktop.OPEN(ruta) 
  
END


