Changeset 132 for trunk/Modules/ZdechovNET/UModuleZdechovNET.pas

Timestamp:

Mar 18, 2022, 3:47:27 PM (3 years ago)

Author:

chronos

Message:

• Modified: Code cleanup.

File:

• trunk/Modules/ZdechovNET/UModuleZdechovNET.pas (modified) (6 diffs)

trunk/Modules/ZdechovNET/UModuleZdechovNET.pas

@@ -6 +6 @@
 
 uses
-  Classes, SysUtils, UModularSystem, SpecializedDictionary, UWebPage,
+  Classes, SysUtils, UModularSystem, UWebPage,
   UWebSession, DateUtils, UModuleBase, UModuleUser, UIPTVPage,
   UInternetPage, UHostingPage, UHistoryPage, UDocumentsPage, UVoIPPage,
@@ -69 +69 @@
 destructor TModuleZdechovNET.Destroy;
 begin
-  inherited Destroy;
+  inherited;
 end;
 
@@ -167 +167 @@
 var
   DbRows: TDbRows;
-  Data: TDictionaryStringString;
 begin
   try
     DbRows := TDbRows.Create;
-    Data := TDictionaryStringString.Create;
 
     Core.CommonDatabase.Query(DbRows,
@@ -235 +233 @@
 
   finally
-    Data.Free;
     DbRows.Free;
   end;
 
-  inherited Install;
+  inherited;
 end;
 
@@ -246 +243 @@
   DbRows: TDbRows;
 begin
-  inherited Uninstall;
+  inherited;
   ModuleBase.GeneratePage := nil;
   try
@@ -377 +374 @@
 end;
 
-
 end.