FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Evitar Editar el campo con Enter
William Chavez Noriega
Posts: 21
Joined: Wed May 10, 2006 05:49 PM
Evitar Editar el campo con Enter
Posted: Sat Feb 16, 2008 08:20 PM

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 :P

mmercado
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: Evitar Editar el campo con Enter
Posted: Sat Feb 16, 2008 09:31 PM
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 Collapse
oBrw:bUserKeys := {|nKey| If( nKey == VK_RETURN, .F., nKey ) }


Saludos

Manuel Mercado
manuelmercado at prodigy dot net dot mx
William Chavez Noriega
Posts: 21
Joined: Wed May 10, 2006 05:49 PM
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 12:34 AM

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

mmercado
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 02:41 AM
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 Collapse
oBrw:bUserKeys := {|nKey, nFlags| If( nKey == VK_RETURN .and. nFlags > 0, .F., nKey ) }

Saludos

Manuel Mercado
manuelmercado at prodigy dot net dot mx
William Chavez Noriega
Posts: 21
Joined: Wed May 10, 2006 05:49 PM
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 03:21 AM

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 :wink:

mmercado
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: Evitar Editar el campo con Enter
Posted: Sun Feb 17, 2008 04:49 AM
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
manuelmercado at prodigy dot net dot mx
ADBLANCO
Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Evitar Editar el campo con Enter
Posted: Mon Feb 18, 2008 12:52 PM

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;

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
jrestojeda
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Evitar Editar el campo con Enter
Posted: Mon Feb 18, 2008 01:05 PM
Hola William

Prueba lo siguiente:

Code: Select all Collapse
oBrw:bUserKeys := {|nKey, nFlags| If( nKey = 13 .and. nFlags > 0, .F., nKey ) }


Espero te sirva.
Saludos
Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Ruben
Posts: 40
Joined: Wed Feb 20, 2008 05:40 PM
Re: Evitar Editar el campo con Enter
Posted: Wed Feb 20, 2008 08:08 PM
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
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: Evitar Editar el campo con Enter
Posted: Fri Feb 22, 2008 12:35 PM
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.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: Evitar Editar el campo con Enter
Posted: Fri Feb 22, 2008 02:18 PM
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
manuelmercado at prodigy dot net dot mx

Continue the discussion

Static archive · New replies & topics via GitHub Discussions