From 556fc76f823425568df316f88acd72f63dd06a63 Mon Sep 17 00:00:00 2001
From: rswindell <>
Date: Sun, 15 Mar 2020 09:36:21 +0000
Subject: [PATCH] Add a "Refresh" menu item to the log window popup menu. I
don't recall why I added this or what usefulness it has, but I'm gonna play
with it.
---
src/sbbs3/ctrl/MainFormUnit.cpp | 7 +++++++
src/sbbs3/ctrl/MainFormUnit.dfm | 8 ++++++--
src/sbbs3/ctrl/MainFormUnit.h | 2 ++
3 files changed, 15 insertions(+), 2 deletions(-)
diff --git a/src/sbbs3/ctrl/MainFormUnit.cpp b/src/sbbs3/ctrl/MainFormUnit.cpp
index be01e35f0c..0a48968602 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 beef6f9407..071ebb9658 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 f44b028848..d6ef2f63ba 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);
--
GitLab