module.rpc.pp 864 B

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. {
  2. This file is part of the Free Component Library
  3. Copyright (c) 2024 by Michael Van Canneyt [email protected]
  4. JSON-RPC dispatcher for webclient.
  5. See the file COPYING.FPC, included in this distribution,
  6. for details about the copyright.
  7. This program is distributed in the hope that it will be useful,
  8. but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  10. **********************************************************************}
  11. unit module.rpc;
  12. {$mode objfpc}{$H+}
  13. interface
  14. uses
  15. Classes, SysUtils, HTTPDefs, fpHTTP, fpWeb, fpjsonrpc, webjsonrpc;
  16. type
  17. { TrpcModule }
  18. TrpcModule = class(TJSONRPCModule)
  19. private
  20. public
  21. end;
  22. var
  23. rpcModule: TrpcModule;
  24. implementation
  25. {$R *.lfm}
  26. initialization
  27. RegisterHTTPModule('RPC', TrpcModule);
  28. end.