Hola vicentnew, puedes contar la cantidad de registros que te devuelve, por ejemplo utilizar recordcount (esto no siempre funciona) o de la forma que quieras.
Código Delphi
[-]
if tabla.RecordCount>1 then
begin
uno.TabVisible:= True;
dos.TabVisible:= True;
end
else
case tabla.FieldByName('cod').AsInteger of
.........................................
.........................................
Saluditos