12.176 cursos gratis
8.742.341 alumnos
Facebook Twitter YouTube
Busca cursos gratis:

Este tutorial sí que va a servir de mucho a todos los amantes programadores de DELPHI, pues te voy a solucionar el gran problema de solo recibir números enteros en un EDIT y no solo eso sino que también nuestro EDIT será capaz de recibir solo números reales también controlando la entrada del punto una sola vez.

Vamos a hacerlos de dos formas primero vamos a controlar la entrada de números enteros usando la propiedad de EDIT en el propio DELPHI 2010, y la siguiente que es controlar los números reales lo vamos a tener que hacer programando porque ya tengo años haciéndolo así y nunca he visto que alguien lo haga sin escribir código.

Bueno entonces manos a la obra creemos nuestro nuevo proyecto en DELPHI 2010 de EMBARCADERO RAD STUDIO 2010, y arrastremos dos componentes EDIT a nuestro formulario por defecto o formulario principal, para aprender a limitar la entrada de datos numéricos a nuestros EDIT.

http://https://www.facebook.com/xander.technology.bolivia

Entonces en nuestro ejemplo el formulario que voy a usar es este:

Delphi. Formulario uno

No le tomes mucha importancia a lo estético del formulario, recuerda que solo aprenderemos a usar los EDIT para sistemas en los cuales se necesite trabajar matemáticamente.

El EDIT1 que es el de la izquierda es para que solo nos entren datos numéricos de tipo entero, el EDIT2 que es el de la derecha nos servirá solo para ingresar datos numéricos de tipo reales.

Bueno vamos con el primero el EDIT1 de la izquierda; le hacemos un solo clic y nos vamos a sus propiedades y cambiamos las siguientes propiedades:

NUMBERSONLY (TRUE) Esto es para solo entres datos numéricos.

MAXLENHTH (5) Para que solo entren cinco dígitos enteros.

Malenhth. Delphi

Listo ya hemos terminado para que nuestro EDIT1 el de la izquierda solo reciba números enteros, y el mayor que sea el 99999 por que solo le pusimos que sea 5 caracteres los máximo que entraran.

Ahora vamos por el segundo EDIT2 el de la derecha, le hacemos un solo clic y nos vamos esta vez no a sus propiedades si no que esta vez a sus eventos y en entramos con doble clic al evento EDIT1KEYPRESS y este es el código:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

 if (pos('.',(sender as TEdit).Text)=0) then

 begin

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

 end

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

 Edit1.ShowHint:=true;

end;

Codigos. Programacion en Delphi

Y listo ya está solo pruébalo y me va s agradecer por este regalo tan buscado.

Sobre el curso rýpido

Nuestras novedades en tu e-mail

Escribe tu e-mail:



MailxMail tratarý tus datos para realizar acciones promocionales (výa email y/o telýfono).
En la polýtica de privacidad conocerýs tu derechos y gestionarýs la baja.

ýQuieres ser el primero en opinar sobre Introducir solo datos numéricos Enteros y Reales a Edit en Delphi 2010?


Cursos similares

Pasar datos de un Listbox a otro en Delphi 2010
2 alumnos  
Los LISTBOX son prácticos en caso de que se tengan que hacer un sistema en el cual... [13/12/11]
Uso de Stringgrid en Delphi 2010
63 alumnos  
Hoy aprenderemos a usar un Stringgrid de Delphi 2010 , a cómo usar sus  filas y... [24/11/11]
Delphi 2010. Uso de Checkbox
0 alumnos  
Aprende sobre el elemento de interacción checkbox en Delphi 2010 el autor te expone... [29/11/11]


ýQuý es mailxmail.com?|ISSN: 1699-4914|Ayuda
Publicidad|Condiciones legales de mailxmail