Return to webformunit.cpp CVS log

Up to [Synchronet] / sbbs / src / sbbs3 / ctrl

Annotation of sbbs/src/sbbs3/ctrl/webformunit.cpp, revision 1.1.1.2

1.1.1.2 ! root        1: /* $Id: WebFormUnit.cpp,v 1.3 2009/01/24 22:23:49 rswindell Exp $ */
1.1       root        2: 
                      3: /****************************************************************************
                      4:  * @format.tab-size 4          (Plain Text/Source Code File Header)                    *
                      5:  * @format.use-tabs true       (see http://www.synchro.net/ptsc_hdr.html)              *
                      6:  *                                                                                                                                                     *
1.1.1.2 ! root        7:  * Copyright 2009 Rob Swindell - http://www.synchro.net/copyright.html         *
1.1       root        8:  *                                                                                                                                                     *
                      9:  * This program is free software; you can redistribute it and/or                       *
                     10:  * modify it under the terms of the GNU General Public License                         *
                     11:  * as published by the Free Software Foundation; either version 2                      *
                     12:  * of the License, or (at your option) any later version.                                      *
                     13:  * See the GNU General Public License for more details: gpl.txt or                     *
                     14:  * http://www.fsf.org/copyleft/gpl.html                                                                                *
                     15:  *                                                                                                                                                     *
                     16:  * Anonymous FTP access to the most recent released source is available at     *
                     17:  * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net     *
                     18:  *                                                                                                                                                     *
                     19:  * Anonymous CVS access to the development source and modification history     *
                     20:  * is available at cvs.synchro.net:/cvsroot/sbbs, example:                                     *
                     21:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs login                       *
                     22:  *     (just hit return, no password is necessary)                                                     *
                     23:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src                *
                     24:  *                                                                                                                                                     *
                     25:  * For Synchronet coding style and modification guidelines, see                                *
                     26:  * http://www.synchro.net/source.html                                                                          *
                     27:  *                                                                                                                                                     *
                     28:  * You are encouraged to submit any modifications (preferably in Unix diff     *
                     29:  * format) via e-mail to [email protected]                                                                      *
                     30:  *                                                                                                                                                     *
                     31:  * Note: If this box doesn't appear square, then you need to fix your tabs.    *
                     32:  ****************************************************************************/
                     33: //---------------------------------------------------------------------------
                     34: 
                     35: #include <vcl.h>
                     36: #pragma hdrstop
                     37: 
                     38: #include "WebFormUnit.h"
                     39: //---------------------------------------------------------------------------
                     40: #pragma package(smart_init)
                     41: #pragma resource "*.dfm"
                     42: TWebForm *WebForm;
                     43: //---------------------------------------------------------------------------
                     44: __fastcall TWebForm::TWebForm(TComponent* Owner)
                     45:     : TForm(Owner)
                     46: {
                     47:        MainForm=(TMainForm*)Application->MainForm;
                     48: }
                     49: //---------------------------------------------------------------------------
1.1.1.2 ! root       50: 
        !            51: 
        !            52: void __fastcall TWebForm::LogLevelUpDownChangingEx(TObject *Sender,
        !            53:       bool &AllowChange, short NewValue, TUpDownDirection Direction)
        !            54: {
        !            55:     if(NewValue < 0 || NewValue > LOG_DEBUG)
        !            56:         AllowChange = false;
        !            57:     else {
        !            58:         MainForm->web_startup.log_level = NewValue;
        !            59:         LogLevelText->Caption = LogLevelDesc[NewValue];
        !            60:         MainForm->SaveIniSettings(Sender);
        !            61:     }
        !            62: }
        !            63: //---------------------------------------------------------------------------
        !            64: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.