![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#5
|
|||
|
|||
|
gRACIAS POR responder, ese tema ya lo solucione gracias a ustedes, ahora tengo que validar los campos,
*nombre(campo clave)(LETRAS) *capital(LETRAS) *poblacion(NUMEROS) *area(NUMEROS) *densidad(NUMEROS) YO EN VISUAL LO HACIA ASI, EN DELPHI COMO ES? Private Sub c_devuelto_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then c_devuelto2.SetFocus cadena = "0123456789" + Chr(8) 'chr(8) = delete, es decir admitimos borrar If InStr(cadena, Chr(KeyAscii)) = 0 Then KeyAscii = 0 End If End Sub MUCHAS GRACIAS Y POR FAVOR SIGANME AYUDANDOME |
|
|
|