Comprobación de MaskEdit

[*Caro*]

Holas, yo no uso el MaskEdit, pero acabo de hacer una prueba y no da ningún error al salir del MaskEdit con los datos incompletos. lKing, lo que se me ocurre para validar el MaskEdit es lo siguiente, puedes ponerlo en el evento OnExit del MaskEdit, o en el boton donde verificas los datos.

En las posiones que no se llena nada, te lo toma como vacío lo que estoy haciendo es eliminar todos esos vacios en una variable axiliar y despues preguntar por la longitud.

Código Delphi [-]
procedure TForm1.MaskEdit1Exit(Sender: TObject);
var
 Aux : String;
begin
 Aux := Trim(MaskEdit1.Text); 
 While Pos(' ', Aux) > 0) do
  Delete(Aux,Pos(' ', Aux),1);
 if Length(Aux)<10 then
  begin
   showmessage('No ha terminado de llenar ');
   MaskEdit1.SetFocus;
  end;
end;

Seguro que hay alguna forma mejor, ya nos van a corregir nuestros amigos.

Saluditos