Comunidad Gambas-es

mostrar resultados de consulta en textbox

alberto-moyano 28-12-2024, 22:34

Hola gente, espero hayan tenido buenas fiestas.

Siguiendo la sugerencia de Tincho estoy haciendo una actualización en mi aplicación, pasando las consultas al evento data, este es el código

Código:
Public Sub VListaBIB_Data(Row As Integer, Column As Integer)

  If ContenidoBibTotal = Null Then Return

  If Row < 0 Or Row >= ContenidoBibTotal.Count Then Return

  ContenidoBibTotal.MoveTo(Row)

  Select Case Column

    Case 0

      VListaBIB.Data.Text = ContenidoBibTotal["id"]

    Case 1

      VListaBIB.Data.Text = ContenidoBibTotal["author"]

    Case 2

      VListaBIB.Data.Text = ContenidoBibTotal["editor"]

    Case 3

      VListaBIB.Data.Text = ContenidoBibTotal["title"]

    Case 4

      VListaBIB.Data.Text = ContenidoBibTotal["journalTitle"]

    Case 5

      VListaBIB.Data.Text = ContenidoBibTotal["yearY"]

    Case 6

      VListaBIB.Data.Text = ContenidoBibTotal["dateD"]

    Case 7

      VListaBIB.Data.Text = ContenidoBibTotal["publisher"]

  End Select

End

el evento funciona sin problemas, ahora bien cuando hago click en cualquiera de las filas pretendo que se muestren en los textbox correspondientes los datos de la fila seleccionada, este es el código que escribi

Código:
Public Sub VListaBIB_RowClick(Row As Integer)

  ' configurar como se muestran los botones

  btnGuardarCambios.Visible = True

  BtnEliminarBib.Visible = True

  btnAgregarCitationKey.Visible = True

  btnGuardar.Visible = False

  btnAgregarKeyBIB.Visible = True

  BtnRefrescarBib.Visible = True

  ' Asegura de que hay una fila seleccionada

  If Row < 0 Or Row >= VListaBIB.Count Then Return

  ' Rellenar los campos de texto con los valores de la fila seleccionada

  txtIDbibtex.Text = VListaBIB[Row, 0].Text

  ComboBox1.Text = VListaBIB[Row, 1].Text

  txtCLAVEbib.Text = VListaBIB[Row, 2].Text

  txtKEYWORDS.Text = VListaBIB[Row, 3].Text

  txtAUTHOR.Text = VListaBIB[Row, 4].Text

... siguen campos

End

Ahora no obtengo error alguno, quiero decir, puedo seleccionar cualquier fila del grid, la aplicación no se cuelga pero no se reflejan en los textbox los datos de la fila seleccionada.

Y este es el código que diseña el grid en el evento open del formulario

Código:
  ' Ejecutar las consultas SQL

  ContenidoBibTotal = meConn.Exec("SELECT * FROM bibtex ORDER BY id DESC")

  VListaBIB.Rows.Count = ContenidoBibTotal.Count

  ' Configurar diseño del GridView

  With VListaBIB

    .Header = True

    .Grid = True

    .Columns.Count = 8 ' Ajusta según las columnas necesarias

    .Columns[0].Title = "Id"

    .Columns[0].Width = 0

    .Columns[1].Title = "Autor"

    .Columns[1].Width = 250

    .Columns[2].Title = "Editor"

    .Columns[2].Width = 250

    .Columns[3].Title = "Título"

    .Columns[3].Width = 600

    .Columns[4].Title = "Revista"

    .Columns[4].Width = 250

    .Columns[5].Title = "Año"

    .Columns[5].Width = 70

    .Columns[6].Title = "Fecha"

    .Columns[6].Width = 120

    .Columns[7].Title = "Editorial"

    .Columns[7].Width = 250

  End With

Estoy medio perdido, porque lei en algun lugar a Shordi decir que el evento data no trabaja con filas, alguno tiene idea de por donde vienen los tiros.

Saludos

Bases de Datos Respuestas 5

Imágenes gigantes en el cuerpo del mensaje. Imgur. [Solucionado]

Shell 28-12-2024, 15:04

Buenas!.

¿ Existe alguna forma de reducir el tamaño de la imagen que se muestra en el mensaje ?.
( Aunque sea modificando el código html ) Usando la etiqueta width, height o mejor si hay posibilidad de escalar.
Que raro es esto.

Se ven gigantescas, tanto que no se corresponden con su tamaño original.

¿ Os habéis fijado como queda la linea html con imágenes de imgur ?. Es como si se repitiese dos veces
la fuente del archivo (img), pero cambiando una letra al final.

Espero que no sea una configuración de mi "cegato" usuario.

Saludos

Sobre gambas-es.org Respuestas 2

Cuelgue del editor al borrar formularios

Shell 28-12-2024, 14:35

Buenas!.

Tengo por costumbre de cuando estoy practicando con Gambas que para no (guarrear) algo que funciona,
importo el formulario anterior en el proyecto y en este realizo las modificaciones.Y así sucesivamente.

FMain pasa a llamarse FMain1, lo renombro a Form1
Al importar Form1, se llamaría Form11, lo renombro a Form2, etc, etc.

Y siempre voy haciendo que el último formulario sea la clase de inicio.
Pues bien. Ahora imaginar que quiero cuando ya tengo lo que me interesa o me derivo a otra cosa,
Creo del mismo proyecto, otro, con todos los formularios que tenía antes.

Yyyyyy, ahora, comienzo a borrar formularios de arriba a abajo y me quedo en el nuevo proyecto
con el último formulario. Pues es posible que en esa eliminación de formulario es cuando se cuelga el editor.
Que pueda no ocurrir, pues también.

Y el IDE puede decirte ignorar, pero mejor cerrar por si las moscas. Eso hace cosas raras si no lo cierras.

¿ Os ha pasado a vosotros ?. Suelo usar siempre Qt, por si con Gtk no hiciera lo mismo.

Esto es como queda la parte donde se encuentran los formularios después del error:
El formulario se muestra visualmente más como una clase que como un formulario.