TMaskedit, con posibles excepciones en el formato

[grotero76]

Hola a todos,

finalmente he dejado la máscara de la siguiente forma:

!+34 99.999.99.99ccc;1;_

De esta manera con las 'c' en la máscara consigo tener 3 caracteres opcionales al final del teléfono.
Mi problema ahora es que al obtener el dato de base de datos y visualizarlo en la máscara se visualiza bien, pero no me deja editar esos 3 caracteres opcionales. Lo que hago es lo siguiente:

MaskEdit1.EditText:=Telefono

siendo Telefono una variable que contiene por ejemplo: '+34 98.511.47.58'

El texto lo captura bien, pero no me deja editar más allá del 58, es decir, es como si los 3 caracteres opcionales no existieran.....

¿Estoy haciendo algo mal?...

Un saludo y gracias.

[jachguate]

Probá con esto:

Código Delphi [-]
if length(Telefono) = length('+34 99.999.99.99') then
  MaskEdit1.EditText := Telefono + '   '
else
  MaskEdit1.EditText := Telefono;

Hasta luego.

[grotero76]

Gracias por tu respuesta tan rápida,

me pasa una cosa muy extraña, al obtener el valor de base de datos con

 MaskEdit1.EditText:=Telefono

es como si perdiese la máscara, es decir, se comporta como un Edit normal, no sigue el patrón que yo le digo en la máscara, puedo borrar caracteres e insertarlos como yo quiera, sin seguir la máscara indicada en el control. Sin embargo si no inicializo el maskedit a ningún valor sí que muestra bien la máscara y la sigue perfectamente....

No sé si me he explicado bien. ¿Existe alguna propiedad en el MaskEdit que se me escape?, ¿al hacer el EditText es posible que pierda la máscara?....

Muchas gracias de nuevo.

[grotero76]

Ya encontré el problema,

efectivamente al obtener el texto de la base de datos hay que completar dicho texto con espacios en blanco hasta completar el número de caracteres totales de la máscara haciendo algo parecido a:

MaskEdit1.Text := TextodeBD + Blancos

siendo "Blancos" un texto que contiene tantos espacios en blanco como caracteres le faltan al texto de la base de datos hasta completar el número de caracteres totales de la máscara.

Gracias a todos por vuestra colaboración.

Un saludo.