Validar IWEdit (IntraWeb)

[*Caro*]

Hola a todos

Quiero validar que en un IWEdit se escriban solo numeros y si presionan una letra no dejarle escribir, como lo hago en IntraWeb, ya que aqui hay menos eventos y nada de OnKeyPress.

Saluditos y muchisimas gracias por adelantado

[*Caro*]

Hola de nuevo

Despues de probar y probar, lo he conseguido, para validar se debe utilizar JavaScript y la propiedad ScriptEvent del IWEdit, les explico lo que hice por si a alguien le sirve.

Entrar a la propiedad ScriptEvent y seleccionar el evento OnKeyPress, al lado derecho colocar este codigo:

var charCode
if (navigator.appName == "Netscape") 
 charCode = event.which //Leemos la tecla que ha ingresado para NetScape
else
 charCode = event.keyCode //Leemos la tecla que ha ingresado

//Verificamos
if (charCode > 31 && (charCode < 48 || charCode > 57)) { 
 return false
}
return true

y listo, cuando uno esta escribiendo solo permite introducir números.

Saluditos

[jhonny]

Supongo que en Delphi2007 tambien puedes hacer uso del evento OnAsyncKeyPress para lograr el mismo efecto, pero con Pascal... la verdad es que no lo he probado, pero seguramente asi tambien es posible .

[*Caro*]

Hola Jhonny muchas gracias por responder, estoy utilizando Delphi 7, ahi no hay el evento OnAsyncKeyPress, por ahora lo dejare asi.

Saluditos

[jhonny]

Empezado por Caro

Hola Jhonny muchas gracias por responder, estoy utilizando Delphi 7, ahi no hay el evento OnAsyncKeyPress, por ahora lo dejare asi.

Bueno, ya veo, tal vez la versión de Intraweb que tiene el Delphi2007, haga lo mismo que haz puesto mas arriba sin que lo notemos a simple vista .