como validar un dbgrid

[vtdeleon]

Saludos

Código Delphi [-]
//solo numeros
 if not (key in ['0'..'9',#13,#8]) then 
   key:=#0;

Código Delphi [-]
//solo letras
 if not (key in ['a'..'z','A'..'Z',#13,#8]) then 
   key:=#0;

Nt: Con esto no quiero decir que el codigo de TorreBlanca este mal (aunque no le analizado)

[[Lepe]]

Algunos apuntes:

- la tecla Ñ y ñ estan fuera de A..Z y a..z, por tanto hay que tenerlo en
cuenta si estamos en españa.
- Personalmente me gusta dejar más teclas de control, la 8 era retroceso
no??, pero y la tecla Supr, la estamos quitando.

Código Delphi [-]
if key > 31 then
if not (key in ['0'..'9']) then 
   key:=#0;

También está la posibilidad de usar el portapapeles, y en ese caso, no se
realiza corrección ninguna. Los que han usado este método ya lo saben, pero
Shidalis puede sorprenderse.


Además estamos en un grid, aunque nosotros le digamos que el campo es de
2 decimales, el usuario puede escribir 30 decimales, al tiempo de salir de la
celda se redondeará a 2 decimales.


Por todo, pondría un botón de añadir nuevo registro, y hacer una ventana de
altas, donde tendrá más control sobre cada dato.

Un saludo.

[Shidalis]

Muchisimas Gracias a todos era lo que necesitaba.