paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 03:49:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Some extra published properties. Fix issue #39994

Browse Source
This commit is contained in:
Michaël Van Canneyt 2022-11-13 23:42:20 +01:00
parent 3b43bd027c
commit 9145565895
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/fcl-web/src/base/fphttpserver.pp
View File

@ -456,6 +456,7 @@ Type
TFPHttpServer = Class(TFPCustomHttpServer) TFPHttpServer = Class(TFPCustomHttpServer)
Published Published
Property Address;
Property Active; Property Active;
Property Port; Property Port;
Property QueueSize; Property QueueSize;
@ -469,6 +470,8 @@ Type
Property KeepConnections; Property KeepConnections;
Property KeepConnectionIdleTimeout; Property KeepConnectionIdleTimeout;
Property KeepConnectionTimeout; Property KeepConnectionTimeout;
Property OnKeepConnectionIdle;
Property OnUnexpectedError;
end; end;
EHTTPServer = Class(EHTTP); EHTTPServer = Class(EHTTP);