lcl: fixed compile with fpc 3.3.1

(cherry picked from commit bcd4138db4)

lcl/controls.pp

@@ -68,6 +68,10 @@ const
   mrNoToAll = SysUITypes.mrNoToAll;
   mrYesToAll= SysUITypes.mrYesToAll;
   mrClose   = SysUITypes.mrClose;
+  {$IF FPC_FULLVERSION>30300}
+  mrContinue= SysUITypes.mrContinue;
+  mrTryAgain= SysUITypes.mrTryAgain;
+  {$ENDIF}
   mrLast    = SysUITypes.mrLast;
 
 function GetModalResultStr(ModalResult: TModalResult): ShortString;

lcl/dialogs.pp

@@ -808,9 +808,22 @@ const
   cLabelSpacing = 10;   // distance between icon & label
 
   DialogResult : Array[mrNone..mrLast] of Longint = (
-    -1, idButtonOK, idButtonCancel, idButtonAbort, idButtonRetry,
-    idButtonIgnore, idButtonYes,idButtonNo, idButtonAll, idButtonNoToAll,
-    idButtonYesToAll,idButtonClose);
+    -1, // mrNone
+    idButtonOK,
+    idButtonCancel,
+    idButtonAbort,
+    idButtonRetry,
+    idButtonIgnore,
+    idButtonYes,
+    idButtonNo,
+    idButtonAll,
+    idButtonNoToAll,
+    idButtonYesToAll,
+    {$IF FPC_FULLVERSION>30300}
+    idButtonContinue,
+    idButtonTryAgain,
+    {$ENDIF}
+    idButtonClose);
 
 
   DialogButtonKind : Array[idButtonOK..idButtonNoToAll] of TBitBtnKind = (

lcl/lcltype.pp

@@ -1837,6 +1837,8 @@ const
   idButtonOpen = idButtonBase + 13;
   idButtonSave = idButtonBase + 14;
   idButtonShield = idButtonBase + 15;
+  idButtonContinue = idButtonBase + 16;
+  idButtonTryAgain = idButtonBase + 17;
 
   idDialogBase = $FF;
   idDialogWarning = idDialogBase + 1;