tedit en vez de maskedit

[anubis]

Otro problema, necesitaba controlar lo que meto en un tedit, mas que nada numeros, si uso un tedit y le pongo esto:


if not(key in ['0'..'9', '.', ',', #8, #9]) then
key:=#0;


tengo el problema que el enter no me funciona si le pongo #13 y tampoco se como controlar el numero de caracteres que introduzco, si quiero que solo sean 2, 3, etc.....
el maskedit esta bien pero es mas lioso para el usuario porque le salen rayitas o lo que quieras, pero no me acaba de gustar.

alguna solucion?

gracias

[roman]

El número de caracteres lo puedes controlar con la propiedad MaxLength del TEdit, y ara que te acepte el #13 pues basta que lo añadas al conjunto:


if not(key in ['0'..'9', '.', ',', #8, #9, #13]) then
key:=#0;


Recuerda, sin embargo, que esto no impedirá que alguien pegue desde el portapapeles, texto que no corresponda al formato.

// Saludos

[anubis]

gracias, a ver con el maxlength.....

[ixMike]

esto no impedirá que alguien pegue desde el portapapeles texto que no corresponda al formato.

Bueno, eso ya se resolvió aquí (http://www.clubdelphi.com/foros/showthread.php?t=27862).

[Caral]

Hola
Para evitar esto, uso un componete intedit y floatedit, con estos no admiten texto.
Componente (Numedit), contiene los dos.
Saludos