Hola Gaim2205.
Cita:
Como hago para que una celda de un dbgrid acepte solo numeros?
|
Leyendo bién tu primer post (cosa que parece que no hice antes), veo que entendí cualquier cosa
. El código anterior verifica columna no celda.
Probá de esta forma:
Código Delphi
[-]
type
TDBGridEx = class(TDBGrid);
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
with TDBGridEx((Sender as TDBGrid)) do
if(Col = ACol) and (Row= ARow) and not(Key in [#8,#9,#13,'0'..'9']) then
begin
MessageBeep(MB_ICONERROR);
Key:= #0;
end;
end;
...
ACol y ARow son variables de tipo Integer que almacenan columna y fila de la celda que sólo deberá aceptar números.
Un saludo.