LazUtils: Masks: move TMaskFailCause type inside the TMaskBase class. It is not needed outside.

components/lazutils/masks.pas

@@ -45,13 +45,6 @@ type
     property Code: TMaskExceptionCode read FCode;
   end;
 
-  TMaskFailCause = (
-    mfcSuccess,
-    mfcMatchStringExhausted,
-    mfcMaskExhausted,
-    mfcMaskNotMatch,
-    mfcUnexpectedEnd
-  );
 
   TMaskOpCode=(mocAnyChar,          //treat ? as a wildcard to match exactly one char
                mocAnyCharOrNone,    //treat [?] to match any char or the absence of a char
@@ -178,6 +171,13 @@ type
       CharsGroupBegin=10,
       CharsGroupEnd=11
     );
+    TMaskFailCause = (
+      mfcSuccess,
+      mfcMatchStringExhausted,
+      mfcMaskExhausted,
+      mfcMaskNotMatch,
+      mfcUnexpectedEnd
+    );
     const GROW_BY=100;
     procedure Add(aLength: integer; aData: PBYTE);
     procedure Add(aValue: integer);