--- sbbs/src/sbbs3/ctrl/propertiesdlgunit.cpp	2018/04/24 16:41:24	1.1
+++ sbbs/src/sbbs3/ctrl/propertiesdlgunit.cpp	2018/04/24 16:44:04	1.1.1.2
@@ -1,10 +1,10 @@
-/* $Id: propertiesdlgunit.cpp,v 1.1 2018/04/24 16:41:24 root Exp $ */
+/* $Id: propertiesdlgunit.cpp,v 1.1.1.2 2018/04/24 16:44: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 2005 Rob Swindell - http://www.synchro.net/copyright.html		*
+ * Copyright 2009 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				*
@@ -44,6 +44,7 @@
 #include "MailFormUnit.h"
 #include "ServicesFormUnit.h"
 #include "PropertiesDlgUnit.h"
+#include <mmsystem.h>		// sndPlaySound()
 //---------------------------------------------------------------------
 #pragma resource "*.dfm"
 TPropertiesDlg *PropertiesDlg;
@@ -58,6 +59,7 @@ void __fastcall TPropertiesDlg::FormShow
 	TrayIconCheckBoxClick(Sender);
     PageControl->ActivePage=SettingsTabSheet;
     SourceComboBoxChange(Sender);
+    LogLevelComboBoxChange(Sender);
 }
 //---------------------------------------------------------------------------
 
@@ -80,7 +82,7 @@ void __fastcall TPropertiesDlg::SourceCo
             ExampleEdit->Font=ClientForm->ListView->Font;
         	ExampleEdit->Color=ClientForm->ListView->Color;
             break;
-        case 2: /* Telnet Server Log */
+        case 2: /* Terminal Server Log */
             ExampleEdit->Font=TelnetForm->Log->Font;
         	ExampleEdit->Color=TelnetForm->Log->Color;
             break;
@@ -141,7 +143,7 @@ void __fastcall TPropertiesDlg::ChangeSc
             ClientForm->ListView->Font=ExampleEdit->Font;
         	ClientForm->ListView->Color=ExampleEdit->Color;
             break;
-        case 2: /* Telnet Server Log */
+        case 2: /* Terminal Server Log */
             TelnetForm->Log->Font=ExampleEdit->Font;
         	TelnetForm->Log->Color=ExampleEdit->Color;
             break;
@@ -177,4 +179,32 @@ void __fastcall TPropertiesDlg::ApplyBut
         ChangeScheme(TargetComboBox->ItemIndex);
 }
 //---------------------------------------------------------------------------
+void __fastcall TPropertiesDlg::LogLevelComboBoxChange(TObject *Sender)
+{
+    LogFontExampleEdit->Font->Assign(MainForm->LogFont[LogLevelComboBox->ItemIndex]);
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TPropertiesDlg::LogFontButtonClick(TObject *Sender)
+{
+	TFontDialog *FontDialog=new TFontDialog(this);
+
+    FontDialog->Font=LogFontExampleEdit->Font;
+    if(FontDialog->Execute()) {
+        LogFontExampleEdit->Font->Assign(FontDialog->Font);
+	    MainForm->LogFont[LogLevelComboBox->ItemIndex]->Assign(FontDialog->Font);
+    }
+    delete FontDialog;
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TPropertiesDlg::ErrorSoundButtonClick(TObject *Sender)
+{
+	OpenDialog->FileName=ErrorSoundEdit->Text;
+	if(OpenDialog->Execute()==true) {
+        ErrorSoundEdit->Text=OpenDialog->FileName;
+        sndPlaySound(OpenDialog->FileName.c_str(),SND_ASYNC);
+    }
+}
+//---------------------------------------------------------------------------