diff --git a/lcl/maskedit.pp b/lcl/maskedit.pp
index 06af0e674a..f23d385316 100644
--- a/lcl/maskedit.pp
+++ b/lcl/maskedit.pp
@@ -521,10 +521,8 @@ end;
 
 procedure TCustomMaskEdit.ClearInternalMask(out AMask: TInternalMask; out ALengthIndicator: Integer);
 begin
-  {$PUSH}{$HINTS OFF}
-  FillChar(AMask, SizeOf(TInternalMask), 0);
+  AMask := Default(TInternalMask);
   ALengthIndicator := 0;
-  {$POP}
 end;