Changeset 23 for trunk/Modules

Timestamp:

Nov 16, 2012, 1:26:29 PM (12 years ago)

Author:

chronos

Message:

• Přidáno: Rozpracovaná třídy pro komunikaci s přístupovým terminálem BF-630. Přiložen popis protokolu.

Location:

trunk/Modules/ChiyuAccessControlers

Files:

• ComProtocol-630.pdf (added)
• UModuleChiyuAccessControlers.pas (modified) (4 diffs)
• UTerminalBF630.pas (added)
• UsersManual-630.pdf (added)

trunk/Modules/ChiyuAccessControlers/UModuleChiyuAccessControlers.pas

@@ -6 +6 @@
 
 uses
-  Classes, SysUtils, FileUtil, UModularSystem, UAccessControler;
+  Classes, SysUtils, FileUtil, UModularSystem, UAccessControler, UTerminalBF630;
 
 type
@@ -14 +14 @@
   public
     { public declarations }
-  end;
-
-  TAccessControlerBF630 = class(TAccessControler)
-
   end;
 
@@ -28 +24 @@
     procedure DoStop; override;
   public
+    TerminalBF630: TTerminalBF630;
     constructor Create(Owner: TComponent); override;
     destructor Destroy; override;
@@ -47 +44 @@
 begin
   inherited DoStart;
+  TerminalBF630 := TTerminalBF630.Create;
 end;
 
 procedure TModuleChiyuAccessControlers.DoStop;
 begin
+  FreeAndNil(TerminalBF630);
   inherited DoStop;
 end;