Changeset 89 for trunk/Modules

Timestamp:

Sep 6, 2012, 8:29:27 PM (12 years ago)

Author:

chronos

Message:

• Přidáno: Balíček ModularSystem namísto vlastní implementace.
• Upraveno: Aktualizace balíčku Common.

File:

• trunk/Modules/User/UModuleUser.pas (modified) (3 diffs)

trunk/Modules/User/UModuleUser.pas

@@ -6 +6 @@
 
 uses
-  Classes, SysUtils, UModule;
+  Classes, SysUtils, UModularSystem;
 
 type
@@ -13 +13 @@
 
   TModuleUser = class(TModule)
-    constructor Create; override;
+    constructor Create(Owner: TComponent); override;
     destructor Destroy; override;
     procedure Install; override;
     procedure Uninstall; override;
-    procedure Upgrade; override;
+    procedure Update; override;
   end;
 
@@ -24 +24 @@
 { TModuleUser }
 
-constructor TModuleUser.Create;
+constructor TModuleUser.Create(Owner: TComponent);
 begin
-  inherited Create;
+  inherited;
 end;
 
 destructor TModuleUser.Destroy;
 begin
-  inherited Destroy;
+  inherited;
 end;
 
 procedure TModuleUser.Install;
 begin
-  inherited Install;
+  inherited;
 end;
 
 procedure TModuleUser.Uninstall;
 begin
-  inherited Uninstall;
+  inherited;
 end;
 
-procedure TModuleUser.Upgrade;
+procedure TModuleUser.Update;
 begin
-  inherited Upgrade;
+  inherited;
 end;