Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 31-07-2007
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Poder: 21
MaMu Va por buen camino
Yo lo primero que haria es limitar al TEdit a solo numero, asi:

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if ( StrScan('0123456789',Key) <> nil ) or
      ( Key = Char(VK_BACK) ) then
   begin
     {Aqui tu tratamiento normal del evento}
   end
   else
     Key := #0;
end;

Luego definiria el ancho minimo que deseo que ingresen, asi:

Código Delphi [-]
Edit1.MaxLength:=10;

Y luego, para verificar que no este vacio, ni menor a 10, asi:

Código Delphi [-]
 if Length(Edit1.Text)<10
  then begin
     ShowMessage('Introduzca 10 numeros');
     Edit1.SetFocus;
     Exit;
 end;

// si hay 10 continuamos aqui
.....

Saludos
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Validar numeros y letras en un Edit? danytorres Varios 12 12-11-2010 21:42:27
Validar Edit solo Texto Elite237 OOP 13 28-07-2007 21:45:25
Validar Fecha en Edit eljavi Varios 4 04-03-2007 03:34:33
como se puede validar un edit para solo numeros carlos gonzalez Varios 3 30-09-2006 21:22:38
Crear un mask Edit, y validar el Campo !! jmedina Conexión con bases de datos 3 13-05-2005 07:04:23


La franja horaria es GMT +2. Ahora son las 15:45:02.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi