Buenas a todos.
Tengo una pequeña duda a ver si alguien me puede encender una bombilla que me alumbre.
En una tabla Firebird 1.5, tengo 35 campos numericos cuyo valor debe estar comprendido entre 0 y 5 ambos inclusive.
En el MinValue he puesto valor 0 y en el MaxValue 5, con lo que si introduzco un valor distinto a este rango me lanza un aviso de Firebird advirtiendome del error de valores.
Este comportamiento para mi es correcto aunque el mensaje que sale esta en ingles y me gustaria poder verlo en la lengua de Cervantes, es posible?
Tambien me gustaria que al dar Ok al error, se borrara el valor erroneo y mandara el foco al edit en cuestion para volver a teclear el valor.
Otra opcion que se me ocurre es esta:
Código Delphi
[-]
procedure TF_ModulDades.PuntuacionsPV11Change(Sender: TField);
begin
If PuntuacionsPV11.Value > 5 then
begin
ShowMessage ('El valor tiene que ser igual o menor que 5');
PuntuacionsPV11.Clear;
PuntuacionsPV11.FocusControl;
end;
end;
Es esto correcto o alguien tiene alguna sugerencia?
Tambien podria poner una excepcion?, si es asi como la manejaria?
Gracias a todos y saludos
Josep