Con MaskEdit1

[Carmelo Cash]

Gracias, pero no conseguí el efecto esperado o tal vez no me supe explicar. Quisiera conseguir que la entrada de números tenga la misma seguridad de la calculadora de windows. Ej. los nros de derecha a Izquierda, esto ya está muy bien logrado haciendo...

SysLocale.MiddleEast := True;
Edit1.BiDiMode := bdRightToLeft;

pero para limitar la entrada de números el el evento onkeypress debo escribir...

if not (key in [CHR(8),'0','1','2','3','4','5','6','7','8','9','-','+',decimalseparator]) then key := #0;

a esto tengo que agregarle el control de un solo signo decimal, y los signos + y - solo al principio.

Puedo escribirlo en el mismo codigo, pero tal vez delphi lo tenga resuelto con alguna función más bonita.