Club Builder

[Diego F]

Hola

Tengo un TEdit, con el siguiente codigo

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
LONG dwStyle = GetWindowLong(Edit1->Handle, GWL_STYLE);
SetWindowLong(Edit1->Handle, GWL_STYLE, dwStyle | ES_NUMBER);
}

con esto me aseguro de que los datos que le digiten sean solo numeros, pero ahora tengo un problema y es que cuando utilizan el metodo de copiar y pegar me pega texto en este campo.

Alguien sabe como hago para que cuando quieran pegar algo del portapapeles al Edit no lo deje pegar a menos que sean numeros.

Gracias

[Roid]

Prueba con el evento OnChange y evalua lo q tenga el TEdit

Un saludo.

[Marky]

¿Porqué no usas un TMaskEdit? De esta forma, y según la máscara que introduzcas, sólo se permitirá la entrada de un tipo de datos. De esta forma evitarás que puedan "pegar" dentro de él.