General :: Textarea: Controlar Su Scrollbar Con El Teclado [solucionado]

Portal

Foro

Buscar

FAQ

Registrarse

Conectarse

Fecha y hora actual: Miercoles, 22 May 2024, 06:35 • Todas las horas son UTC + 1 Hora

Textarea: Controlar Su Scrollbar Con El Teclado [solucionado]

Página 1 de 2
Ir a la página 1, 2 Siguiente

Textarea: Controlar Su Scrollbar Con El Teclado [solucionado]

Autor	Mensaje
jsbsan Analista Programador Registrado: Septiembre 2009 Mensajes: 4175 Edad: 51 Ubicación: dos hermanas, sevilla	Textarea: Controlar Su Scrollbar Con El Teclado [solucionado] Preguntilla: ¿se puede mover el scroll bar de un textarea con el teclado? Por ejemplo: Si pulso la tecla Flecha Abajo (o la tecla Flecha Arriba), puedo hacer que el scrollbar se mueva hacia abajo o hacia arriba y asi mover el texto, sin tener en cuenta donde este el cursor. A ver si sabeis si es posible.. Saludos =================== Blog personal Web: SoloGambas seleccion de articulos dedicados a Gambas Visita el Curso de Gambas3 ¡¡¡Gratuito!!! última edición por jsbsan el Lunes, 02 Octobre 2017, 20:24; editado 1 vez Editado por jsbsan, Lunes, 02 Octobre 2017, 20:24: Solucionado: usando setfocus
#1 Jueves, 28 Septiembre 2017, 20:36

tincho Analista Programador Registrado: Noviembre 2014 Mensajes: 2565 Edad: 48 Ubicación:	Re: Textarea: Controlar Su Scrollbar Con El Teclado jsbsan escribió: [Ver mensaje] ...¿se puede mover el scroll bar de un textarea con el teclado?...A ver si sabeis si es posible.. Si, es posible. Prueba algo así Código: [Descargar] [Ocultar] [Seleccionar] Código: [Descargar] [Mostrar] Public Sub TextArea1_KeyRelease() Print Key.Code Select Key.Code Case 16777238 Print "SUBIR" Case 16777239 Print "BAJAR" Case 16777237 End Select End Esto es para ver el codigo de la tecla, pero el textArea baja o sube su posicion del cursor con la rueda o con las teclas última edición por tincho el Jueves, 28 Septiembre 2017, 21:20; editado 1 vez
#2 Jueves, 28 Septiembre 2017, 21:14

vuott Analista Programador Registrado: Agosto 2013 Mensajes: 2086 Edad: 60 Ubicación:	Re: Textarea: Controlar Su Scrollbar Con El Teclado Pero con las teclas PagUp y PagDown - de verdad - se mueve verticalmente y horizontalmente el cursor de la TextArea, y por eso tambien el ScrollBar ! En cambio, al usar el puntero del ratón, no se mueve tambien el cursor de la TextArea.
#3 Jueves, 28 Septiembre 2017, 22:36

jsbsan Analista Programador Registrado: Septiembre 2009 Mensajes: 4175 Edad: 51 Ubicación: dos hermanas, sevilla	Re: Textarea: Controlar Su Scrollbar Con El Teclado Tincho y Vuott: Tincho, el codigo que expones si lo uso, pero me sirve. Lo que quiero es que al pulsar la tecla Fecha Abajo, haga como si hiciera click en el scrollbar y se desplazara un poco la barra, y asi el texto. Osea lo que quiero es enviar el evento click al scrollbar del textArea, pulsando la tecla Fecha Abajo. =================== Blog personal Web: SoloGambas seleccion de articulos dedicados a Gambas Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
#4 Viernes, 29 Septiembre 2017, 06:56

shordi Analista Programador Registrado: Septiembre 2009 Mensajes: 4982 Edad: 64 Ubicación: Albacete	Re: Textarea: Controlar Su Scrollbar Con El Teclado Julio No lo he probado, pero TextArea dispone del método ensurevisible(). De las ayudas: Citar: TextArea.EnsureVisible (gb.qt4) Sub EnsureVisible ( ) Ensure that the cursor is visible on the screen, by scrolling the text area contents if necessary. Imagino que debería funcionar algo así: Código: [Descargar] [Ocultar] [Seleccionar] Código: [Descargar] [Mostrar] Public Sub TextArea1_KeyRelease() if key.code=key.down or if key.code=key.up or if key.code=pagedown or if key.code=pageup then ensurevisible() wait End if End Ya nos cuentas =================== No podemos regresar
#5 Viernes, 29 Septiembre 2017, 07:37

vuott Analista Programador Registrado: Agosto 2013 Mensajes: 2086 Edad: 60 Ubicación:	Re: Textarea: Controlar Su Scrollbar Con El Teclado shordi escribió: [Ver mensaje] TextArea dispone del método ensurevisible() Tambien esto, pero, hace referencia a el cursor de texto del TextArea.
#6 Viernes, 29 Septiembre 2017, 18:05

vuott Analista Programador Registrado: Agosto 2013 Mensajes: 2086 Edad: 60 Ubicación:	Re: Textarea: Controlar Su Scrollbar Con El Teclado Si bien farragosa... se podría quizás perfeccionar esta posible modalidad: Código: [Descargar] [Ocultar] [Seleccionar] Código: [Descargar] [Mostrar] Public Struct timeval tv_sec As Long tv_usec As Long End Struct Public Struct input_event tv As Struct Timeval type As Short code As Short value As Integer End Struct Private Const EV_SYN As Integer = 0 Private Const SYN_REPORT As Integer = 0 Private Const EV_KEY As Integer = 1 Private Const BTN_LEFT As Integer = 272 Private s As String Private evento As New Input_event Private fin_evento As New Input_event Public Sub Button1_Click() Dim pw As String ' Carga un archivo de texto: TextArea1.Text = File.Load("/ruta/de/un/archivo/de/texto") ' Identificamos exactamente el file-device del ratón: s = File.Load("/proc/bus/input/devices") ' Identificamos la raya contenente el texto "Handlers=mouse...". ' La última palabra de la raya será el nombre del file-device del ratón: s = Scan(s, "Handlers=mouse * *")[2] ' Para escribir en el file-device identificado, hace falta tener los necesarios permisos. ' Hace falta modificar su permisos mediante contraseña de sistema. pw = InputBox("Dame... dame... dame tu propia password de sistema...") If Stat("/dev/input" &/ s).Auth <> "rwsrwxrwx" Then Shell "echo " & pw & " \| sudo -S chmod 4777 /dev/input" &/ s Wait Endif With evento .type = EV_KEY .code = BTN_LEFT .value = 1 End With With fin_evento .type = EV_SYN .code = SYN_REPORT .value = 0 End With End Public Sub Form_KeyPress() Dim fl As File If Key.Code = Key.Down Then ' Mueve el puntero del ratón sobre el ápice del "ScrollBar" del TextArea: Mouse.Move(TextArea1.ScreenX + TextArea1.W - 10, TextArea1.ScreenY + 10) ' Abre el file-device: fl = Open "/dev/input" &/ s For Write If IsNull(fl) Then Error.Raise("Imposible abrir el file-device !") ' Escribe los datos para el evento "mouse-clic" Write #fl, evento As Input_event Write #fl, fin_evento As Input_event fl.Close Endif End última edición por vuott el Viernes, 29 Septiembre 2017, 20:42; editado 2 veces
#7 Viernes, 29 Septiembre 2017, 20:36

jsbsan Analista Programador Registrado: Septiembre 2009 Mensajes: 4175 Edad: 51 Ubicación: dos hermanas, sevilla	Re: Textarea: Controlar Su Scrollbar Con El Teclado Vuott: No consigo que tu código me funcione en mi escritorio (tengo xfce) (no lo he probado en otros escritorios) =================== Blog personal Web: SoloGambas seleccion de articulos dedicados a Gambas Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
#8 Sabado, 30 Septiembre 2017, 11:22

vuott Analista Programador Registrado: Agosto 2013 Mensajes: 2086 Edad: 60 Ubicación:	Re: Textarea: Controlar Su Scrollbar Con El Teclado jsbsan escribió: [Ver mensaje] Vuott: No consigo que tu código me funcione Por qué ? Que ocurre ? Hace falta ante todo hacer clic en el Button1; luego tú puedes presionar la tecla [↓].
#9 Sabado, 30 Septiembre 2017, 14:03

jsbsan Analista Programador Registrado: Septiembre 2009 Mensajes: 4175 Edad: 51 Ubicación: dos hermanas, sevilla	Re: Textarea: Controlar Su Scrollbar Con El Teclado Vuott: Citar: Por qué ? Que ocurre ? Selecciona parte del texto que muestra el textArea, y no se desplaza el scrollbar =================== Blog personal Web: SoloGambas seleccion de articulos dedicados a Gambas Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
#10 Sabado, 30 Septiembre 2017, 18:30

Mostrar mensajes anteriores:

Temas parecidos

	Autor	Foro	Respuestas	último mensaje
Controlar Proceso Del Ftp	pittusa	General	4	Viernes, 11 Febrero 2011, 05:30 razaAztk
Controlar El Evento Scroll	netking86	General	3	Domingo, 13 Marzo 2011, 16:36 netking86
Controlador De Teclado En Gambas 2 [soluci...	juancv	General	4	Jueves, 03 May 2012, 09:24 juancv
Controlar Tu S.O. Mediante Voz	jsbsan	Aplicaciones/Fragmentos de Código	9	Martes, 20 Septiembre 2016, 08:04 vuott

Página 1 de 2
Ir a la página 1, 2 Siguiente

Fecha y hora actual: Miercoles, 22 May 2024, 06:35 • Todas las horas son UTC + 1 Hora

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

Lista de permisos

No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

Versión reducida del foro - (Lo-Fi)
Página generada en:: 1.1818s (PHP: -90% SQL: 190%)
Consultas SQL: 49 - Debug off - GZIP Activado

Design by Mighty Gorgon