Ver Mensaje Individual
  #2  
Antiguo 06-10-2011
beginner01 beginner01 is offline
Miembro
NULL
 
Registrado: mar 2011
Ubicación: República Dominicana
Posts: 181
Reputación: 14
beginner01 Va por buen camino
Cita:
Empezado por Gaim2205 Ver Mensaje
Buen día amigos,

despues de mucho tiempo alejado del mundillo delphi, vuelvo a empezar. Y esperando siempre el buen consejo de los expertos del foro tengo una pequena duda.

Como hago para que una celda de un dbgrid acepte solo numeros? algo parecidoa como si lo hiciera en un Edit
Código:
if not (Key in ['0'..'9']) then      Key := #0;
saludos!
Saludos.

Si te refieres a una columna en especifico puedes probar con esto.

Código Delphi [-]
 if (not (key in ['0'..'9'])) and ((sender as TDBGrid).Col = 4)  then
 key := #0;

Cambia col = 4 por la columna a la que deseas aplicar.

Para que sea una celda en especifico se le debe agregar una condición mas.

Código Delphi [-]
 and ((sender as TDBGrid).Row = 1)
Responder Con Cita