Page 1 of 1
Evitar Editar el campo con Enter
Posted: Sat Feb 16, 2008 8:20 pm
by William Chavez Noriega
Uso la Clase TSBrowse 6.0, Como todos saben para editar un campo se puede usar las teclas F2, ENTER, letras (si es alfanumerica) y Numeros (Si es Numerica), etc.
Debo evitar que ENTER edite la celda enfocada, ¿como lo puedo hacer, sin evitar que la columna sea editable... Alguien por favor puede ayudarme?
Gracias de antemano
William Chavez Noriega
Lima - Peru
Re: Evitar Editar el campo con Enter
Posted: Sat Feb 16, 2008 9:31 pm
by mmercado
Hola William:
William Chavez Noriega wrote:Debo evitar que ENTER edite la celda enfocada, ¿como lo puedo hacer, sin evitar que la columna sea editable... Alguien por favor puede ayudarme?
Code: Select all
oBrw:bUserKeys := {|nKey| If( nKey == VK_RETURN, .F., nKey ) }
Saludos
Manuel Mercado
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 12:34 am
by William Chavez Noriega
Sr. Mercado, le agradesco la ayuda... probe su sugerencia, pero pierdo el doble click del mouse que tambien edita la celda.
Gracias
William Chavez Noriega
Lima - Peru
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 2:41 am
by mmercado
William Chavez Noriega wrote:Sr. Mercado, le agradesco la ayuda... probe su sugerencia, pero pierdo el doble click del mouse que tambien edita la celda
Entonces Pruéba así:
Code: Select all
oBrw:bUserKeys := {|nKey, nFlags| If( nKey == VK_RETURN .and. nFlags > 0, .F., nKey ) }
Saludos
Manuel Mercado
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 3:21 am
by William Chavez Noriega
Sr. Mercado Muchas gracias por la ayuda, ahora si funciona muy bien
Le agradesco de corazon la ayuda que me esta brindando estos días.
William Chavez Noriega
Lima - Peru
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 4:49 am
by mmercado
William Chavez Noriega wrote:Sr. Mercado
El "Sr." lo serás tú, para todos mis amigos de los foros de FiveWin soy Manuel y me gusta que me tuteen. Una de las cosas que más me atrajeron de esta profesión hace muchos años fue que entre todos los programadores (no eran muchos eh) no existía la diferencia de edades, todos nos tuteábamos.
Así es que ya lo sabes, ! no seas "Desigualado" ¡ jejeje
Un abrazo.
Manuel Mercado
Posted: Mon Feb 18, 2008 12:52 pm
by ADBLANCO
Manuél, Estoy de Acuerdo contigo, Yo ya tengo casi 30 años en Sistemas, Algunos de mis compañeros ya son cuarentones, y aquí TODOS somos 'Chamos', (Una forma de llamar a los jóvenes en Venezuela).
Saludos;
Posted: Mon Feb 18, 2008 1:05 pm
by jrestojeda
Hola William
Prueba lo siguiente:
Code: Select all
oBrw:bUserKeys := {|nKey, nFlags| If( nKey = 13 .and. nFlags > 0, .F., nKey ) }
Espero te sirva.
Saludos
Re: Evitar Editar el campo con Enter
Posted: Wed Feb 20, 2008 8:08 pm
by Ruben
Sr. Manuel Mercado, soy nuevo en esto de la Programada en xHarbour y quiciera aprender, Ud me podria ayudar con el aprendizaje??
Estoy en ceros, ya tengo todo instalado para empezar alguna practica
Re: Evitar Editar el campo con Enter
Posted: Fri Feb 22, 2008 12:35 pm
by karinha
Ruben wrote:Sr. Manuel Mercado, soy nuevo en esto de la Programada en xHarbour y quiciera aprender, Ud me podria ayudar con el aprendizaje??
Estoy en ceros, ya tengo todo instalado para empezar alguna practica
Hola Ruben, Fivewin é mui sencillo, mira estos ejemplos, espero que ayude.
http://www.fivewin.com.br/exibedicas.asp?id=602
http://www.fivewin.com.br/exibedicas.asp?id=601
http://www.fivewin.com.br/exibedicas.asp?id=579
Saludos.
Re: Evitar Editar el campo con Enter
Posted: Fri Feb 22, 2008 2:18 pm
by mmercado
Hola Rubén. bienvenido al foro
Ruben wrote:Sr. Manuel Mercado, soy nuevo en esto de la Programada en xHarbour y quiciera aprender, Ud me podria ayudar con el aprendizaje??
Siempre estamos dispuestos a ayudar despejando dudas o proponiendo soluciones a problemas encontrados en tus desarrollos
Ruben wrote:Estoy en ceros, ya tengo todo instalado
Cual versión de FiveWin estás usando?
Ruben wrote:para empezar alguna practica
En la carpeta \FWH\Samples encontrarás múltiples ejemplos y un script (BUILDX.BAT) con el que podrás crear los ejecutables desde la consola MS-DOS (Símbolo del sistema), ejemplo: BUILDX TESTDLG
Suerte
Manuel Mercado