From 8501fce48c1f5d76cdf16fbbc13b51dd5c2fd434 Mon Sep 17 00:00:00 2001
From: rswindell <>
Date: Thu, 21 Feb 2008 05:55:44 +0000
Subject: [PATCH] Add missing LogColor keys and [WebForm] section to export
 settings.

---
 src/sbbs3/ctrl/MainFormUnit.cpp | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/src/sbbs3/ctrl/MainFormUnit.cpp b/src/sbbs3/ctrl/MainFormUnit.cpp
index 164b6f4934..54dbb5e5f7 100644
--- a/src/sbbs3/ctrl/MainFormUnit.cpp
+++ b/src/sbbs3/ctrl/MainFormUnit.cpp
@@ -6,7 +6,7 @@
  * @format.tab-size 4		(Plain Text/Source Code File Header)			*
  * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
  *																			*
- * Copyright 2007 Rob Swindell - http://www.synchro.net/copyright.html		*
+ * Copyright 2008 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				*
@@ -2735,18 +2735,27 @@ void __fastcall TMainForm::ExportSettings(TObject* Sender)
 
     ExportFormSettings(IniFile,section = "TelnetForm",TelnetForm);
     ExportFont(IniFile,section,"LogFont",TelnetForm->Log->Font);
+    IniFile->WriteString(section,"LogColor",ColorToString(TelnetForm->Log->Color));
 
     ExportFormSettings(IniFile,section = "EventsForm",EventsForm);
     ExportFont(IniFile,section,"LogFont",EventsForm->Log->Font);
+    IniFile->WriteString(section,"LogColor",ColorToString(EventsForm->Log->Color));
 
     ExportFormSettings(IniFile,section = "ServicesForm",ServicesForm);
     ExportFont(IniFile,section,"LogFont",ServicesForm->Log->Font);
+    IniFile->WriteString(section,"LogColor",ColorToString(ServicesForm->Log->Color));
 
     ExportFormSettings(IniFile,section = "FtpForm",FtpForm);
     ExportFont(IniFile,section,"LogFont",FtpForm->Log->Font);
+    IniFile->WriteString(section,"LogColor",ColorToString(FtpForm->Log->Color));
 
     ExportFormSettings(IniFile,section = "MailForm",MailForm);
     ExportFont(IniFile,section,"LogFont",MailForm->Log->Font);
+    IniFile->WriteString(section,"LogColor",ColorToString(MailForm->Log->Color));
+
+    ExportFormSettings(IniFile,section = "WebForm",WebForm);
+    ExportFont(IniFile,section,"LogFont",WebForm->Log->Font);
+    IniFile->WriteString(section,"LogColor",ColorToString(WebForm->Log->Color));
 
     section = "SpyTerminal";
 	IniFile->WriteInteger(section, "Width"
-- 
GitLab