source: cprs/branches/GUI-config/BDK32/Source/SharedRPCBrokerReg.pas@ 711

Last change on this file since 711 was 476, checked in by Kevin Toppenberg, 16 years ago

New WorldVistA Config Utility

File size: 1.0 KB
RevLine 
[476]1{ **************************************************************
2 Package: XWB - Kernel RPCBroker
3 Date Created: Sept 18, 1997 (Version 1.1)
4 Site Name: Oakland, OI Field Office, Dept of Veteran Affairs
5 Developers: Danila Manapsal, Don Craven, Joel Ivey
6 Description: Registers TSharedRPCBroker.
7 Current Release: Version 1.1 Patch 40 (January 7, 2005))
8*************************************************************** }
9
10
11unit SharedRPCBrokerReg;
12
13{$I IISBase.inc}
14
15interface
16
17procedure Register;
18
19implementation
20
21uses Classes,
22 {$IFDEF D6_OR_HIGHER}
23 DesignIntf, DesignEditors, DesignMenus,
24 {$ELSE}
25 DsgnIntf,
26 {$ENDIF}
27 //kt mod 6/29/07 Remove line --> ExptIntf, //Delphi units
28{$IFDEF D5_OR_HIGHER}
29 RPCSharedBrokerSessionMgr1_TLB, //Broker units
30{$ENDIF}
31 SharedRPCBroker;
32
33
34procedure Register;
35begin
36
37{$IFDEF D5_OR_HIGHER}
38 RegisterComponents('Kernel',[TSharedRPCBroker, TSharedBroker]);
39{$ELSE}
40 RegisterComponents('Kernel',[TSharedRPCBroker]);
41{$ENDIF}
42
43end;
44
45end.
46
Note: See TracBrowser for help on using the repository browser.