Ajustes gerais

Author: dliocode

src/core/DataValidator.Context.pas

@@ -307,7 +307,7 @@ procedure TDataValidatorContext<T>.AfterConstruction;
 destructor TDataValidatorContext<T>.Destroy;
 begin
   FList.Clear;
-  FList.DisposeOf;
+  FList.Free;
 
   inherited;
 end;

src/core/DataValidator.JSON.pas

@@ -96,7 +96,7 @@ constructor TDataValidatorJSON.Create(const AJSON: TJSONArray);
 destructor TDataValidatorJSON.Destroy;
 begin
   FList.Clear;
-  FList.DisposeOf;
+  FList.Free;
 
   inherited;
 end;
@@ -342,6 +342,9 @@ function TDataValidatorJSON.CheckItemValueObject(const AName: string; const AChe
       LOK := False;
       LInfo.Add(LValidatorResult.Informations as IDataValidatorInformations);
 
+      if (LValidatorItem is TDataValidatorJSONKeyIsRequired) then
+        Break;
+
       if not ACheckAll then
         Break;
     end
@@ -406,6 +409,9 @@ function TDataValidatorJSON.CheckItemValueArray(const AName: string; const AChec
         LOK := False;
         LInfo.Add(LValidatorResult.Informations as IDataValidatorInformations);
 
+        if (LValidatorItem is TDataValidatorJSONKeyIsRequired) then
+          Break;
+
         if not ACheckAll then
           Break;
       end