CAImport.pas 708 B

1234567891011121314151617181920212223242526272829303132333435363738
  1. unit CAImport;
  2. interface
  3. uses
  4. InterfaceCA;
  5. function GetCAConfig: ICAConfig;
  6. function GetCAClient: ICAClient;
  7. const
  8. CACONFIG_BEANNAME: string = 'caconfig';
  9. CACLIENT_BEANNAME: string = 'caclient';
  10. // CATESTCLIENT_BEANNAME: string = 'catestclient';
  11. implementation
  12. uses
  13. mybean.tools.beanFactory;
  14. function GetCAConfig: ICAConfig;
  15. begin
  16. Result := (TMyBeanFactoryTools.getBean(CACONFIG_BEANNAME) as ICAConfig);
  17. end;
  18. function GetCAClient: ICAClient;
  19. begin
  20. Result := (TMyBeanFactoryTools.getBean(CACLIENT_BEANNAME) as ICAClient);
  21. end;
  22. // function GetCAClient: ICAClient;
  23. // begin
  24. // Result := (TMyBeanFactoryTools.getBean(CACLIENT_BEANNAME) as ICAClient);
  25. // end;
  26. end.