Hola jlrdz, debes utilizar el evento OnGetText de tu campo (Tipo):
Código Delphi
[-]
procedure TForm1.QuerytipoGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if Sender.AsInteger = 1 then
Text := 'Días'
else
Text := 'Horas';
end;
Saluditos