validar con un MaskEdit

[@-Soft]

hola

estoy tratando de validar un maskedit pero la condicion no funciona, a var si alguien me puede ayudar con esto:

Código Delphi [-]
if MaskEdit1.Text = '' then
begin
  raise Exception.Create('Am Sorry, primero debe llenar el campo.');
  Exit;
end;

Salu2

[marcoszorrilla]

Estoy de vacaciones y no tengo nada a mano para verificar lo que te digo, pero creo que una vez lo resolví utilizando un TapplicationEvent y controlando dicho evento, lo que si recuerdo bien es que termine abriendo el fichero pas correspondiente traduje el mensaje recompile y me quité todos los problemas.

Un Saludo.

[roman]

Empezado por @-Soft

estoy tratando de validar un maskedit pero la condicion no funciona

No explicas qué es lo que no funciona ni en donde colocas el código pero supongo que lo que sucede es que antes de llegar a tu mensaje te salta la excepción que produce el propio Delphi. Si no mla recuerdo esto es así porque el control MaskEdit valida la máscara antes del evento OnExit. La validación se realiza en un método protegido ValidateError.

Te recomiendo que leas este hilo en donde puedes ver una forma de detectar las excepciones de este control.

// Saludos

[luisdevis]

Seguramente edit1.text no es = '' sino que debe tener espacios

Debes hacer

if TRIM( Edit1.text ) = ''

[moesis]

Saludos,

También puedes intentar hacer lo siguiente:

		if Length (Trim(EditMask.Text)) <= 0 then
			Raise Exception.Create ('Error en el contenido');

Saludos.