--- sbbs/sbbs3/ctrl/aboutboxformunit.cpp	2018/04/24 16:39:34	1.1
+++ sbbs/sbbs3/ctrl/aboutboxformunit.cpp	2018/04/24 16:41:04	1.1.1.2
@@ -1,12 +1,12 @@
 /* Synchronet Control Panel (GUI Borland C++ Builder Project for Win32) */
 
-/* $Id: aboutboxformunit.cpp,v 1.1 2018/04/24 16:39:34 root Exp $ */
+/* $Id: aboutboxformunit.cpp,v 1.1.1.2 2018/04/24 16:41:04 root Exp $ */
 
 /****************************************************************************
  * @format.tab-size 4		(Plain Text/Source Code File Header)			*
  * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
  *																			*
- * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html		*
+ * Copyright 2004 Rob Swindell - http://www.synchro.net/copyright.html		*
  *																			*
  * This program is free software; you can redistribute it and/or			*
  * modify it under the terms of the GNU General Public License				*
@@ -39,9 +39,10 @@
 
 #include "AboutBoxFormUnit.h"
 #include "emulvt.hpp"
-#include "bbs_thrd.h" 	// bbs_startup_t
 #include "mailsrvr.h"
 #include "ftpsrvr.h"
+#include "websrvr.h"
+#include "services.h"
 
 //---------------------------------------------------------------------------
 #pragma package(smart_init)
@@ -106,15 +107,25 @@ void __fastcall TAboutBoxForm::FormShow(
     Memo->Lines->Add(bbs_ver());
     Memo->Lines->Add(mail_ver());
     Memo->Lines->Add(ftp_ver());
+    Memo->Lines->Add(web_ver());    
+    Memo->Lines->Add(services_ver());
     Memo->Lines->Add(ver);
-#if 0
-    Memo->Lines->Add("EmulVT ANSI Terminal Emulation v2.15 "
-        "(c) 1996-2000 François Piette");
-#else
-    Memo->Lines->Add("Synchronet Local Spy ANSI Terminal Emulation"+CopyRight);
-#endif
-
+    Memo->Lines->Add("Synchronet Local Spy ANSI Terminal Emulation"
+        + CopyRight);
+    Memo->Lines->Add(AnsiString(js_ver())
+        + " (c) 1998 Netscape Communications Corp.");
+}
+//---------------------------------------------------------------------------
+void __fastcall TAboutBoxForm::WebPageLabelClick(TObject *Sender)
+{
+    ShellExecute(Handle, "open", ((TLabel*)Sender)->Hint.c_str(),
+        NULL,NULL,SW_SHOWDEFAULT);
+}
+//---------------------------------------------------------------------------
+void __fastcall TAboutBoxForm::LogoClick(TObject *Sender)
+{
+    ShellExecute(Handle, "open", "http://www.synchro.net",
+        NULL,NULL,SW_SHOWDEFAULT);
 }
 //---------------------------------------------------------------------------
-