diff --git a/src/sbbs3/ctrl/MainFormUnit.cpp b/src/sbbs3/ctrl/MainFormUnit.cpp index be01e35f0ced94385712c005cbf6f3fbdcd07b43..0a489686026426dd5109fe4dacd0fcad2f36113e 100644 --- a/src/sbbs3/ctrl/MainFormUnit.cpp +++ b/src/sbbs3/ctrl/MainFormUnit.cpp @@ -3919,3 +3919,10 @@ void __fastcall TMainForm::ClearFailedLoginsPopupMenuItemClick( } //--------------------------------------------------------------------------- +void __fastcall TMainForm::RefreshLogClick(TObject *Sender) +{ + TRichEdit* Log = (TRichEdit*)LogPopupMenu->PopupComponent; + Log->Refresh(); +} +//--------------------------------------------------------------------------- + diff --git a/src/sbbs3/ctrl/MainFormUnit.dfm b/src/sbbs3/ctrl/MainFormUnit.dfm index beef6f9407236a113eabce5b8e9ad4247e260016..071ebb9658787ab1840dcce943a5efb5f39828b6 100644 --- a/src/sbbs3/ctrl/MainFormUnit.dfm +++ b/src/sbbs3/ctrl/MainFormUnit.dfm @@ -1,6 +1,6 @@ object MainForm: TMainForm - Left = 714 - Top = 385 + Left = 633 + Top = 318 Width = 793 Height = 400 Caption = 'Synchronet Control Panel' @@ -16074,5 +16074,9 @@ object MainForm: TMainForm Caption = 'Copy &All' OnClick = LogPopupCopyAllClick end + object LogRefresh: TMenuItem + Caption = 'Refresh' + OnClick = RefreshLogClick + end end end diff --git a/src/sbbs3/ctrl/MainFormUnit.h b/src/sbbs3/ctrl/MainFormUnit.h index f44b02884891ae691df7b320662bbd24820cd447..d6ef2f63ba2112c04e3365af8bc2ff8afce82da7 100644 --- a/src/sbbs3/ctrl/MainFormUnit.h +++ b/src/sbbs3/ctrl/MainFormUnit.h @@ -332,6 +332,7 @@ __published: // IDE-managed Components TMenuItem *LogPopupCopy; TMenuItem *ViewFailedLoginsPopupMenuItem; TMenuItem *ClearFailedLoginsPopupMenuItem; + TMenuItem *LogRefresh; void __fastcall FileExitMenuItemClick(TObject *Sender); void __fastcall ViewToolbarMenuItemClick(TObject *Sender); void __fastcall FormClose(TObject *Sender, TCloseAction &Action); @@ -428,6 +429,7 @@ __published: // IDE-managed Components void __fastcall LogPopupCopyAllClick(TObject *Sender); void __fastcall LogPopupCopyClick(TObject *Sender); void __fastcall ClearFailedLoginsPopupMenuItemClick(TObject *Sender); + void __fastcall RefreshLogClick(TObject *Sender); private: // User declarations public: // User declarations __fastcall TMainForm(TComponent* Owner);