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

* Print clickable URL with start location

Browse Source
This commit is contained in:
Michaël Van Canneyt 2024-08-07 09:40:48 +02:00
parent 1ecc880fc8
commit 22c978c33f
1 changed files with 2 additions and 0 deletions

2
packages/fcl-web/examples/simpleserver/simpleserver.pas
View File

@ -408,6 +408,8 @@ begin
if FEcho then
DoLog(etInfo,'Setting up /echo route');
Log(etInfo,'Location REST API '+IfThen(FAPISecret<>'','','NOT ')+'activated.');
Log(etInfo,'Navigate to: http'+IfThen(UseSSL,'s','')+'://localhost:'+IntToStr(Port)+'/');
end;
destructor THTTPApplication.Destroy;