28 lines
521 B
ObjectPascal
28 lines
521 B
ObjectPascal
|
unit DataSnapISAPIServerMain;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
SysUtils, Classes, HTTPApp, uROServer,
|
||
|
|
uROWebBrokerServer, uROSOAPMessage, uROClient, uROBINMessage;
|
||
|
|
|
||
|
|
type
|
||
|
|
TDataSnapISAPIServerMainForm = class(TWebModule)
|
||
|
|
msg_BIN: TROBINMessage;
|
||
|
|
mgs_SOAP: TROSOAPMessage;
|
||
|
|
ROWebBrokerServer: TROWebBrokerServer;
|
||
|
|
private
|
||
|
|
{ Private declarations }
|
||
|
|
public
|
||
|
|
{ Public declarations }
|
||
|
|
end;
|
||
|
|
|
||
|
|
var
|
||
|
|
DataSnapISAPIServerMainForm: TDataSnapISAPIServerMainForm;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
{$R *.dfm}
|
||
|
|
|
||
|
|
end.
|