serverlibrary_intf.pas

用JavaScript编写的虚拟键盘

//------------------------------------------------------------------------------
// <autogenerated>
//     This Chrome source code was generated by a tool.
//     Chrome Version: 2.0.3.411
//     Runtime Version: 2.0.50727.1433
//
//     Changes to this file may cause incorrect behavior and will be lost if 
//     the code is regenerated.
// </autogenerated>
//------------------------------------------------------------------------------

{$HIDE PW12}

namespace Server;

interface

uses
    System,
    RemObjects.SDK,
    RemObjects.SDK.Types,
    System.Collections.Generic;
    
type
    IServerService = public interface(RemObjects.SDK.IROService)
        method Sum(A: System.Int32; B: System.Int32): System.Int32;
        method GetServerTime: System.DateTime;
        method HelloWorld: System.String;
    end;
    
    ServerService_Proxy = public partial class(RemObjects.SDK.Proxy, IServerService)
        protected 
            method __GetInterfaceName: System.String; override;
        public 
            constructor(aMessage: RemObjects.SDK.IMessage; aClientChannel: RemObjects.SDK.IClientChannel);
            constructor(aRemoteService: RemObjects.SDK.IRemoteService);
            method Sum(A: System.Int32; B: System.Int32): System.Int32; virtual;
            method GetServerTime: System.DateTime; virtual;
            method HelloWorld: System.String; virtual;
    end;
    
    CoServerService = public class
        public 
            class method &Create(aMessage: RemObjects.SDK.IMessage; aClientChannel: RemObjects.SDK.IClientChannel): IServerService;
            class method &Create(aRemoteService: RemObjects.SDK.IRemoteService): IServerService;
    end;
    
implementation

{ ServerService_Proxy }

method ServerService_Proxy.__GetInterfaceName: System.String;
begin
    exit('ServerService');
end;

constructor ServerService_Proxy(aMessage: RemObjects.SDK.IMessage; aClientChannel: RemObjects.SDK.IClientChannel);
begin
    inherited constructor(aMessage, aClientChannel);
end;

constructor ServerService_Proxy(aRemoteService: RemObjects.SDK.IRemoteService);
begin
    inherited constructor(aRemoteService);
end;

method ServerService_Proxy.Sum(A: System.Int32; B: System.Int32): System.Int32;
begin
    __Message.InitializeRequestMessage(__ClientChannel, 'ServerLibrary', __GetInterfaceName(), 'Sum');
    __Message.WriteInt32('A', A);
    __Message.WriteInt32('B', B);
    __Message.FinalizeMessage();
    __ClientChannel.Dispatch(__Message);
    var &Result: System.Int32 := __Message.ReadInt32('Result');
    __Message.Clear();
    exit(&Result);
end;

method ServerService_Proxy.GetServerTime: System.DateTime;
begin
    __Message.InitializeRequestMessage(__ClientChannel, 'ServerLibrary', __GetInterfaceName(), 'GetServerTime');
    __Message.FinalizeMessage();
    __ClientChannel.Dispatch(__Message);
    var &Result: System.DateTime := __Message.ReadDateTime('Result');
    __Message.Clear();
    exit(&Result);
end;

method ServerService_Proxy.HelloWorld: System.String;
begin
    __Message.InitializeRequestMessage(__ClientChannel, 'ServerLibrary', __GetInterfaceName(), 'HelloWorld');
    __Message.FinalizeMessage();
    __ClientChannel.Dispatch(__Message);
    var &Result: System.String := __Message.ReadAnsiString('Result');
    __Message.Clear();
    exit(&Result);
end;

{ CoServerService }

class method CoServerService.&Create(aMessage: RemObjects.SDK.IMessage; aClientChannel: RemObjects.SDK.IClientChannel): IServerService;
begin
    exit(new ServerService_Proxy(aMessage, aClientChannel));
end;

class method CoServerService.&Create(aRemoteService: RemObjects.SDK.IRemoteService): IServerService;
begin
    exit(new ServerService_Proxy(aRemoteService));
end;

end.