Changeset 105 for trunk/Packages/ModularSystem/Demo/UModuleBase.pas

Timestamp:

Oct 9, 2012, 1:58:45 PM (12 years ago)

Author:

chronos

Message:

• Přidáno: Hlavní modul Base, který slouží jako základní rozhraní k aplikaci pro ostatní moduly. Modul System zajistí udržování seznamu instalovaných modulů v perzistentním úložišti v databázi.
• Upraveno: Správce modulů ModuleManager je nyní použit pro každé komunikační spojení zvlášť.

Location:

trunk/Packages/ModularSystem/Demo

Files:

• . (modified) (1 prop)
• UModuleBase.pas (modified) (2 diffs)

trunk/Packages/ModularSystem/Demo/UModuleBase.pas

@@ -10 +10 @@
 type
   TModuleBase = class(TModule)
-    constructor Create; override;
+    constructor Create(AOwner: TComponent); override;
     destructor Destroy; override;
   end;
@@ -19 +19 @@
 { TModuleUser }
 
-constructor TModuleBase.Create;
+constructor TModuleBase.Create(AOwner: TComponent);
 begin
 inherited;
-  Name := 'Base';
+  Identification := 'Base';
   Title := 'Base';
   Version := '1.0';