[jhonny]

La verdad es que no conozco el TDBStringGrid, pero Con un TEdit se puede hacer asi:

Código Delphi [-]
 
var
  N :Integer;
begin
  N := StrToIntDef(Edit1.Text, -1);
  if N = -1 then
    ShowMessage('Letra')
  else
    ShowMessage('Numero');
end;

Si adecuas este ejemplo a lo que necesitas seguramente te sera útil.