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.