Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-11-2011
lucas05 lucas05 is offline
Miembro
 
Registrado: ago 2010
Posts: 116
Poder: 14
lucas05 Va por buen camino
Validar edits

Hola, como puedo validar letras y números en los edits. En los ejemplos que encontré ponen el código de validación en el evento OnKeyPress del edit, lo que quiero hacer es poner el código de validación en un button.
Les explico mi idea, tengo un form con edit1, edit2, edit3, edit4 los dos primeros se llenan con letras y los otros dos con números, quiero que el usuario llene los cuatro edits y luego cuando termine de llenarlos a todos presione el button Guardar y recién entonces se ejecute el código de validación. Y si se equivoco en el llenado de algún edit aparezca un mensaje de error, por ejemplo "En el edit1 debe ir solo letras".

Espero haber sido claro. Muchas Gracias.
Responder Con Cita
  #2  
Antiguo 29-11-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Les explico mi idea, tengo un form con edit1, edit2, edit3, edit4 los dos primeros se llenan con letras y los otros dos con números, quiero que el usuario llene los cuatro edits y luego cuando termine de llenarlos a todos presione el button Guardar y recién entonces se ejecute el código de validación. Y si se equivoco en el llenado de algún edit aparezca un mensaje de error, por ejemplo "En el edit1 debe ir solo letras".
Hola Lucas.

Aunque no me parece la mejor opción, podés hacerlo de este modo:
Código Delphi [-]
...
implementation

type
  TValidChar = set of Char;

function ValidarEdit(AEdit: TEdit; ValidChar: TValidChar): Boolean;
var
  i: Integer;
begin
  Result:= True;
  for i:= 1 to Length(AEdit.Text) do
    if not(UpCase(AEdit.Text[i]) in ValidChar) then Result:= False;
end;

procedure TForm1.btnGuardarClick(Sender: TObject);
begin
  if not ValidarEdit(Edit1, ['A'..'Z', 'Ñ']) then
  begin
    ShowMessage('En Edit1 deben ir solo letras');
    Edit1.SetFocus;
    Exit;
  end;
  if not ValidarEdit(Edit2, ['A'..'Z', 'Ñ']) then
  begin
    ShowMessage('En Edit2 deben ir solo letras');
    Edit2.SetFocus;
    Exit;
  end;
  if not ValidarEdit(Edit3, ['0'..'9']) then
  begin
    ShowMessage('En Edit3 deben ir solo números');
    Edit3.SetFocus;
    Exit;
  end;
  if not ValidarEdit(Edit4, ['0'..'9']) then
  begin
    ShowMessage('En Edit4 deben ir solo números');
    Edit4.SetFocus;
  end;
  ...
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #3  
Antiguo 29-11-2011
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.457
Poder: 20
newtron Va camino a la fama
Hola.

A mi modo de ver para un caso puntual puedes hacer lo que te comenta nuestro amigo ecfisa pero este es un caso bastante habitual para cualquier programa que desarrolles por lo cual yo te recomendaría en vez de usar edits usar algún componente que te controle el tipo de campo que vas a introducir. Creo que en el ftp del club hay algún control que puedes usar.

Saludos
__________________
Be water my friend.
Responder Con Cita
  #4  
Antiguo 29-11-2011
lucas05 lucas05 is offline
Miembro
 
Registrado: ago 2010
Posts: 116
Poder: 14
lucas05 Va por buen camino
Hola, gracias por la solución. Tendré en cuenta sus recomendaciones.

Saludos.
Responder Con Cita
Respuesta


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
Algun componente visual para validar datos capturados en dbedits o edits? flystar Varios 4 14-04-2010 23:20:17
filtrar edits pabloloustau Varios 4 26-03-2010 08:04:35
como validar un boton mediante los edits? soma25 Varios 2 12-05-2006 02:56:40
Validar Edits LILYBEL Internet 5 01-03-2005 19:36:57
Edits aitken Varios 7 06-05-2003 15:51:08


La franja horaria es GMT +2. Ahora son las 10:31:13.


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