Sentencia Case... error Incompatible types

[[BlueSteel]]

Hola Amigos

Quiero realizar una consulta utilizando el case... hace tanto tiempo que no lo use.. me parece que desde clipper... uff.. y quiero poner algo así.. y obvio como no funciona .. pregunto aquí... la idea es sustituir varios if por esto.. y no se muy bien como hacerlo..

lo que quiero hacer es consultar el estado de un campo de una tabla en particular, la cual puede tener varias opciones pero parametrisadas.. y por eso quiero utilizarlo

Código Delphi [-]
Case Datos.AQ_Ubicacion['Ubi_Estado'] Of
       'H': sEst.Text := 'estado H';
       'D': sEst.Text := 'estado D';
end;

bueno el error que me da es esto,

[Error] Unit3.pas(147): Incompatible types: 'Integer' and 'Char'
[Error] Unit3.pas(148): Incompatible types: 'Integer' and 'Char'


que entiendo que estoy tratando de consultar un dato de tipo integer con un de tipo Char....

se supone que el contenido del campo es Char(1)... y que los valores pueden ser: H, D, V, T y así unos cuantos mas

si bien no es algo de gran cosa solo queria variar y aprender a usar otra forma de consultar... si utilizo los if.. me funciona bien..

espero comentarios...


Salu2