25 lines
588 B
ObjectPascal
25 lines
588 B
ObjectPascal
|
library DataSnapIsapiServer;
|
||
|
|
|
||
|
|
uses
|
||
|
|
ActiveX,
|
||
|
|
ComObj,
|
||
|
|
WebBroker,
|
||
|
|
ISAPIThreadPool,
|
||
|
|
ISAPIApp,
|
||
|
|
DataSnapISAPIServerMain in 'DataSnapISAPIServerMain.pas' {DataSnapISAPIServerMainForm: TWebModule},
|
||
|
|
DataSnapServerData in 'DataSnapServerData.pas' {DataSnapServerDataForm: TRODataSnapModule};
|
||
|
|
|
||
|
|
{$R *.res}
|
||
|
|
|
||
|
|
exports
|
||
|
|
GetExtensionVersion,
|
||
|
|
HttpExtensionProc,
|
||
|
|
TerminateExtension;
|
||
|
|
|
||
|
|
begin
|
||
|
|
CoInitFlags := COINIT_MULTITHREADED;
|
||
|
|
Application.Initialize;
|
||
|
|
Application.CreateForm(TDataSnapISAPIServerMainForm, DataSnapISAPIServerMainForm);
|
||
|
|
Application.Run;
|
||
|
|
end.
|