Ver Mensaje Individual
  #10  
Antiguo 03-06-2007
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Reputación: 21
AzidRain Va camino a la fama
Tienes razón Román, me confundí con el equivalente de MaskEdit de DevExpress que viene mas completo...

Contestando a nuestra amiga:

Pon esto en el onKeyPress del Edit

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  // Si la tecla NO es una V o E y es el primer caracter...lo eliminamos
   If ((Key<>'E') and (key<>'V')) and (Length(Edit1.Text)=0) Then
     key:=chr(00);
   //Aqui pon la validacion para los numeros...me dio flojera poner todo el 
código...jeje

end;

Solo permite E como primer caracter y V como segundo, los demas pueden ser cualesquiera
__________________
AKA "El animalito" ||Cordobés a mucha honra||
Responder Con Cita