--- sbbs/src/sbbs3/ctrl/webformunit.cpp 2018/04/24 16:41:24 1.1 +++ sbbs/src/sbbs3/ctrl/webformunit.cpp 2018/04/24 16:44:16 1.1.1.2 @@ -1,10 +1,10 @@ -/* $Id: webformunit.cpp,v 1.1 2018/04/24 16:41:24 root Exp $ */ +/* $Id: webformunit.cpp,v 1.1.1.2 2018/04/24 16:44:16 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 2004 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 * @@ -47,3 +47,18 @@ __fastcall TWebForm::TWebForm(TComponent MainForm=(TMainForm*)Application->MainForm; } //--------------------------------------------------------------------------- + + +void __fastcall TWebForm::LogLevelUpDownChangingEx(TObject *Sender, + bool &AllowChange, short NewValue, TUpDownDirection Direction) +{ + if(NewValue < 0 || NewValue > LOG_DEBUG) + AllowChange = false; + else { + MainForm->web_startup.log_level = NewValue; + LogLevelText->Caption = LogLevelDesc[NewValue]; + MainForm->SaveIniSettings(Sender); + } +} +//--------------------------------------------------------------------------- +