Tema: Una mascara para un edit 0.0.00.000
Ver Mensaje Individual
  #5  
Antiguo 11-02-2008
[egostar] egostar is offline
Registrado
  
Registrado: feb 2006
Posts: 6.572
Reputación: 27
egostar Va camino a la fama
Hola, que tal si buscas en la ayuda la función FormatMaskText() 

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := FormatMaskText('0.0.00.000;0;*','1234567');
end;

Salud OS

Edito: O en un MaskEdit coloca esta mascara :;

Cita:
0.0.00.000;0;_
Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Última edición por egostar fecha: 11-02-2008 a las 20:08:02.
Responder Con Cita