Browse Source

* Print clickable URL with start location

Michaël Van Canneyt 1 year ago
parent
commit
22c978c33f
1 changed files with 2 additions and 0 deletions
  1. 2 0
      packages/fcl-web/examples/simpleserver/simpleserver.pas

+ 2 - 0
packages/fcl-web/examples/simpleserver/simpleserver.pas

@@ -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;