Ver Mensaje Individual
  #15  
Antiguo 15-03-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 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:
Empezado por roman Ver Mensaje
Creo que la comprobación para habilitar/inhabilitar el botón puede hacerse únicamente usando el evento OnChange del MaskEdit
Es muy probable que estés acertado, al menos veo que resulta mucho más simple desde allí. Por otro lado tengo que destacar que me resultó muy novedoso el código con que encaraste la comprobación .

Otra opción que se me ocurre, esta vez usando el evento OnChange, es:
Código Delphi [-]
procedure TForm1.MaskEdit1Change(Sender: TObject);
begin
  btnCalculate.Enabled:= Length(StringReplace(MaskEdit1.Text, ' ', '', [rfReplaceAll])) = 11;
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita