main.pas

来自「用JavaScript编写的虚拟键盘」· PAS 代码 · 共 42 行

namespace Server;

interface

uses
  System,
  RemObjects.SDK,
  RemObjects.SDK.Server;

type
  ServerMain = class
  public
    class method Main;
  end;

implementation

class method ServerMain.Main;
var
  lServerChannel: ServerChannel;
  lMessage: Message;
begin
  Console.WriteLine('RemObjects SDK for .NET - Chrome Command Line Server');

  lServerChannel := new RemObjects.SDK.Server.IpHttpServerChannel();
  lMessage := new RemObjects.SDK.SoapMessage();

  lServerChannel.Dispatchers.Add(lMessage.DefaultDispatcherName, lMessage);
        
  //ToDo: add code to configure your ServerChannel and Message and objects here, if needed

  lServerChannel.Open();
  try
    Console.WriteLine('Server is active, press Enter to stop.');
    Console.ReadLine();
  finally
    lServerChannel.Close();
  end;
end;

end.