Comunidad Gambas-es

ahtonio 15-07-2021, 14:06

Hola, hasta ahora tengo formularios que muestran información en textbox con la propiedad readonly = True y notabfocus = True de modo que puedes seleccionarlos con el ratón y copiar el contenido pero no modificarlo y además no recibe el foco para no tener que pulsar la tecla tab tantas veces como campos haya de esta característica. Podría usar Label para mostrar la info pero no podría usar el copiar/pegar... para mí es muy cómodo.
En el equipo con linux mint 19 donde corre este programa funciona pero en el que lo desarrollo he actualizado a la versión del IDE 3.16.2 y no me hace caso cuando le digo que no reciba el foco. Es este el equipo que necesito abrir con qt4 porque sino el editor de código no funciona correctamente. Tampoco sé si es la versión del IDE lo que ha provocado este comportamiento. Lo he observado cuando lo he necesitado tocar y quizás no funcionaba antes de actualizar.
No se que tendrá que ver, aunque sigo pensando que son cosas de qt5 que no están.... como diría yo.... "refinadas". No se si pasando a linux mint 20 se arreglaría, pero no deja de ser un incordio esto de la frontera entre qt4 y qt5 (vs. Gtk3).

Alguien sabe si hay que tocar alguna propiedad del contenedor (hbox - vbox) para que funcione o simplemente hay que esperar que se solucione con el tiempo?

Gracias!!
Como siempre.

General Respuestas 2

Posición del cursor en textedit

alberto-moyano 12-07-2021, 00:19

Hola gente, tengo una función que agrega un entorno de marcas (para LaTeX) pero al aplicarla lleva el cursor a la posición 1:1 (primer caracter:primera linea) como lo que pretendo es que el cursor quede en la linea siguiente a la última linea de la etiqueta, lo que hago es marcar la posición de la linea y luego sumarle 1 después de aplicadas las etiquetas, pero obtengo que TextEditor.Line es de solo lectura, no comprendo como sumarle las lineas nuevas

Código:
Public Sub menuMYQUOTE_Click()

  Dim seleccion As String

  Dim cadena1 As String

  Dim cadena2 As String

  Dim contador As Integer

  Dim posicion As Integer

  posicion = TextEditor1.Line

  seleccion = TextEditor1.SelectedText

  contador = Len(seleccion)

  cadena1 = seleccion

  cadena2 = "\\begin{myquote}\n    \\enquote{" & seleccion & "}\n\\end{myquote}"

  If contador >= 1 Then

    TextEditor1.Text = Replace(TextEditor1.Text, cadena1, cadena2)

  Endif

  TextEditor1.Line = posicion + 1

End

Gracias por cualquier sugerencia

Aplicaciones/Fragmentos de Código Respuestas 4

Ejercicios con conversión de datos

alberto-moyano 09-07-2021, 04:09

Hola gente

Estoy haciendo una práctica de conversión de datos, primero probé la función de grep desde consola y funciona, es esta:

Código:
grep -oi } texto | wc -l

mi función es esta

Código:
  Dim c As String

  Dim d As String

  Dim contar3 As Integer

  Dim contar4 As Integer

  contar3 = CInt(Val(c))

  contar4 = CInt(Val(d))

  Shell "grep -oi { texto | wc -l 2>&1" To c

  Shell "grep -oi } texto | wc -l 2>&1" To d

  If c = d Then

    Message.Info("Hay coincidencia")

  Else

    Message.Info("No hay coincidencia")

  Endif

El error que obtengo es que el valor de c y d son nulos.

Mi duda es si estoy obteniendo el error en la salida de shell o en la conversión de string a integer

Aplicaciones/Fragmentos de Código Respuestas 7

Páginas (564): 1 … 413 414 415 416 417 … 564

Bienvenido, Invitado

Buscar en los foros

Estadísticas del foro

Miembros: 292

Último miembro: DarkWolf

Temas del foro: 1,742

Mensajes del foro: 9,029

Últimos temas

Portal

ahtonio 15-07-2021, 14:06

alberto-moyano 12-07-2021, 00:19

alberto-moyano 09-07-2021, 04:09

Ordenar en un TableView

Odio a gb.Report

Reportes de Gambas

FACTURA POR REPORT GAMBAS...

Ordenando las carpetas