Browse Source

Compilation Fix: remove implementation statics

Herman Schoenfeld 6 years ago
parent
commit
baee5c32ee
1 changed files with 2 additions and 4 deletions
  1. 2 4
      src/core/USettings.pas

+ 2 - 4
src/core/USettings.pas

@@ -155,20 +155,18 @@ begin
 end;
 end;
 
 
 class function TSettings.GetAllowDownloadNewCheckpointIfOlderThan: Boolean;
 class function TSettings.GetAllowDownloadNewCheckpointIfOlderThan: Boolean;
-  static;
 begin
 begin
   CheckLoaded;
   CheckLoaded;
   Result := FAppParams.ParamByName[CT_PARAM_AllowDownloadNewCheckpointIfOlderThan].GetAsBoolean(False);
   Result := FAppParams.ParamByName[CT_PARAM_AllowDownloadNewCheckpointIfOlderThan].GetAsBoolean(False);
 end;
 end;
 
 
 class function TSettings.GetMinFutureBlocksToDownloadNewSafebox: Integer;
 class function TSettings.GetMinFutureBlocksToDownloadNewSafebox: Integer;
-  static;
 begin
 begin
   CheckLoaded;
   CheckLoaded;
   Result := FAppParams.ParamByName[CT_PARAM_MinFutureBlocksToDownloadNewSafebox].GetAsInteger(0);
   Result := FAppParams.ParamByName[CT_PARAM_MinFutureBlocksToDownloadNewSafebox].GetAsInteger(0);
 end;
 end;
 
 
-class procedure TSettings.SetAllowDownloadNewCheckpointIfOlderThan(ABool: Boolean); static;
+class procedure TSettings.SetAllowDownloadNewCheckpointIfOlderThan(ABool: Boolean);
 begin
 begin
   CheckLoaded;
   CheckLoaded;
   FAppParams.ParamByName[CT_PARAM_AllowDownloadNewCheckpointIfOlderThan].SetAsBoolean(ABool);
   FAppParams.ParamByName[CT_PARAM_AllowDownloadNewCheckpointIfOlderThan].SetAsBoolean(ABool);
@@ -186,7 +184,7 @@ begin
   Result := FAppParams.ParamByName[CT_PARAM_JSONRPCEnabled].GetAsBoolean(false);
   Result := FAppParams.ParamByName[CT_PARAM_JSONRPCEnabled].GetAsBoolean(false);
 end;
 end;
 
 
-class procedure TSettings.SetMinFutureBlocksToDownloadNewSafebox(AInt: Integer); static;
+class procedure TSettings.SetMinFutureBlocksToDownloadNewSafebox(AInt: Integer);
 begin
 begin
   CheckLoaded;
   CheckLoaded;
   FAppParams.ParamByName[CT_PARAM_MinFutureBlocksToDownloadNewSafebox].SetAsInteger(AInt);
   FAppParams.ParamByName[CT_PARAM_MinFutureBlocksToDownloadNewSafebox].SetAsInteger(AInt);