Si es un control de Base de Datos (DBEdit), puedes acceder al campo asociado y al tipo utilizando:
Código Delphi
[-]
DBEdit1.Field.DataType
if (DBEdit1.Field.DataType = ftString) then
...
Si el campo es un Edit, entonces deberás acceder al mismo sitio, pero por la tabla que esté utilizando.
Código Delphi
[-]
Tabla1.FieldByName('codigo').DataType