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

Timestamp:

Oct 9, 2012, 2:05:24 PM (12 years ago)

Author:

chronos

Message:

 

File:

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

trunk/Modules/ZdechovNET/UModuleZdechovNET.pas

@@ -73 +73 @@
 procedure TModuleZdechovNET.Start;
 begin
+  BeforeStart;
   ModuleBase := TModuleBase(Manager.FindModuleByName('Base'));
   ModuleUser := TModuleUser(Manager.FindModuleByName('User'));
@@ -104 +105 @@
     RegisterPage(AboutPage, '');
   end;
-  inherited;
+  AfterStart;
 end;
 
 procedure TModuleZdechovNET.Stop;
 begin
-  inherited Stop;
+  BeforeStop;
   with ModuleBase, Pages do begin
     UnregisterPage(AboutPage);
@@ -140 +141 @@
   ModuleBase := nil;
   ModuleUser := nil;
+  AfterStop;
 end;