【delphi开源代码栏目提醒】:以下是网学会员为您推荐的delphi开源代码-EngineProvider.pas，希望本篇文章对您学习有所帮助。

    Unit EngineProvider;
    
    interface
    
    uses Types, XSBuiltIns;
    type
    
      SQLDataSoapPortType = interface(IInvokable)
        ['{385EE7AF-630F-4931-B35A-639A10717484}']
        function ProcessSRL(const SRLFile: WideString; const RequestName: WideString; const key: WideString): WideString;  stdcall;
        function ProcessSRL2(const SRLFile: WideString; const RequestName: WideString; const key1: WideString; const key2: WideString): WideString;  stdcall;
        function ProcessSQL(const DataSource: WideString; const SQLStatement: WideString; const UserName: WideString; const Password: WideString): WideString;  stdcall;
      end;
    
    
    implementation
    
    uses InvokeRegistry;
    
    initialization
      InvRegistry.RegisterInterface(TypeInfo(SQLDataSoapPortType), 'http://www.SoapClient.com/xml/SQLDataSoap.xsd', 'UTF-8');
    
    end.
    

上一篇：encrypt.pas
下一篇：还记得，那年的风车吗?