Página 1 de 1

CTRL + END. En TDBMemo

Publicado: Vie May 08, 2009 4:38 pm
por jrcsistemas
Hola.
No encuentro la forma de que un TDBMemo aparezca con su cursor al final del
texto. Mostrando la ultma página del texto.
Necesito saber como cargo el teclado con HK_Keyput( VK_CONTROL + VK_END )
No se como windows trata las combinaciones de teclas.
Gracias
Juan

CTRL + END. En TDBMemo

Publicado: Lun May 11, 2009 11:10 am
por jfgimenez
Juan,
> No encuentro la forma de que un TDBMemo aparezca con su cursor al final
> del texto. Mostrando la ultma página del texto.
> Necesito saber como cargo el teclado con HK_Keyput( VK_CONTROL + VK_END )
> No se como windows trata las combinaciones de teclas.
::oMemo:SetSel( -1, -1 )
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

CTRL + END. En TDBMemo

Publicado: Lun May 11, 2009 2:40 pm
por jrcsistemas
José
Gracias por tu respuesta.
Pero lo unico que hace es posicionar el cursor al final del texto. Igual que
::oMemo:Append(""). Pero muestra el inicio del texto. (el cursor no se ve,
porque son varias paginas)
Lo que yo quiero es cada vez que voy recorriendo el TDBBrowse, resultado de
la consulta.Que el campo asociado a HISTORIA, un TDBMemo, me muestre la
ultima pagina del texto.
Gracias
Juan
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:4a07eb88$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Juan,
>
>> No encuentro la forma de que un TDBMemo aparezca con su cursor al final
>> del texto. Mostrando la ultma página del texto.
>> Necesito saber como cargo el teclado con HK_Keyput( VK_CONTROL +
>> VK_END )
>> No se como windows trata las combinaciones de teclas.
>
> ::oMemo:SetSel( -1, -1 )
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>

CTRL + END. En TDBMemo

Publicado: Lun May 11, 2009 2:44 pm
por jfgimenez
Juan,
> Pero lo unico que hace es posicionar el cursor al final del texto. Igual
> que ::oMemo:Append(""). Pero muestra el inicio del texto. (el cursor no se
> ve, porque son varias paginas)
> Lo que yo quiero es cada vez que voy recorriendo el TDBBrowse, resultado
> de la consulta.Que el campo asociado a HISTORIA, un TDBMemo, me muestre la
> ultima pagina del texto.
Prueba a llamar a:
::oMemo:SendMsg( EM_SCROLLCARET )
después del :SetSel()
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

CTRL + END. En TDBMemo

Publicado: Lun May 11, 2009 2:49 pm
por jrcsistemas
Perfecto.
Gracias Jose.
Hay algun lugar donde obtener los codigos de las teclas en windows. Ej
CTRL+END, ALT+F1, etc
Juan
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:4a081d97$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Juan,
>
>> Pero lo unico que hace es posicionar el cursor al final del texto. Igual
>> que ::oMemo:Append(""). Pero muestra el inicio del texto. (el cursor no
>> se ve, porque son varias paginas)
>> Lo que yo quiero es cada vez que voy recorriendo el TDBBrowse, resultado
>> de la consulta.Que el campo asociado a HISTORIA, un TDBMemo, me muestre
>> la ultima pagina del texto.
>
> Prueba a llamar a:
>
> ::oMemo:SendMsg( EM_SCROLLCARET )
>
> después del :SetSel()
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>

CTRL + END. En TDBMemo

Publicado: Mié May 13, 2009 11:26 am
por jfgimenez
Juan,
> Hay algun lugar donde obtener los codigos de las teclas en windows. Ej
> CTRL+END, ALT+F1, etc
En windows, todas las teclas van por separado. Es decir, no existe un código
de tecla para F1, otro para Shift F1 y otro para Ctrl F1. Sí existe un
código genérico para F1, pero las teclas de cambio (Shift, Ctrl y Alt) hay
que comprobarlas por separado, utilizando la función lGetKeyState(). P.ej.:
IF lGetKeyState( VK_SHIFT )
...
ELSEIF lGetKeyState( VK_CONTROL )
...
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info