Skip to content

Commit af62080

Browse files
committed
Update all units affected by split of UClassHelpers
All units that referenced the now-removed UClassHelpers unit were modified to use one or more of the new, rafactored ClassHelpers.xxx units instead.
1 parent 258a196 commit af62080

9 files changed

+27
-17
lines changed

Src/FmBase.pas

+3-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2005-2021, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2005-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Implements a form that provides the ancestor of all forms in the application.
99
* Provides default names for form window classes along with various operations
@@ -136,7 +136,8 @@ implementation
136136
// Delphi
137137
SysUtils, Windows, Menus,
138138
// Project
139-
UAppInfo, UBaseObjects, UClassHelpers, UFontHelper, UKeysHelper, UMenus,
139+
ClassHelpers.UControls,
140+
UAppInfo, UBaseObjects, UFontHelper, UKeysHelper, UMenus,
140141
UNulFormAligner, UStrUtils;
141142

142143
{$R *.dfm}

Src/FmCompilersDlg.FrSearchDirs.pas

+5-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2011-2021, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2011-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Implements a frame used to edit lists of search directories used for a
99
* compiler being edited in TCompilersDlg.
@@ -109,7 +109,10 @@ implementation
109109
// Delphi
110110
SysUtils, Windows, Graphics,
111111
// Project
112-
UBrowseForFolderDlg, UClassHelpers, UCtrlArranger, UStrUtils;
112+
ClassHelpers.UActions,
113+
ClassHelpers.UControls,
114+
ClassHelpers.UGraphics,
115+
UBrowseForFolderDlg, UCtrlArranger, UStrUtils;
113116

114117
{$R *.dfm}
115118

Src/FmMain.pas

+4-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2005-2023, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2005-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Application's main form. Handles the program's main window display and user
99
* interaction.
@@ -583,9 +583,11 @@ implementation
583583
// Delphi
584584
Windows, Graphics,
585585
// Project
586+
ClassHelpers.UControls,
587+
ClassHelpers.UGraphics,
586588
DB.UCategory, DB.UMain, DB.USnippet, FmSplash, FmTrappedBugReportDlg,
587589
FmWaitDlg, IntfFrameMgrs, UActionFactory, UAppInfo,
588-
UClassHelpers, UCodeShareMgr, UCommandBars, UConsts, UCopyInfoMgr,
590+
UCodeShareMgr, UCommandBars, UConsts, UCopyInfoMgr,
589591
UCopySourceMgr, UDatabaseLoader, UDatabaseLoaderUI, UDetailTabAction,
590592
UEditSnippetAction, UExceptions, UHelpMgr, UHistoryMenus, UKeysHelper,
591593
UMessageBox, UNotifier, UNulDropTarget, UPrintMgr, UQuery, USaveSnippetMgr,

Src/FmPrintDlg.pas

+3-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2007-2023, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2007-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Implements a print dialogue box.
99
}
@@ -76,7 +76,8 @@ implementation
7676
// Delphi
7777
Printers, Graphics,
7878
// Project
79-
FmPreferencesDlg, FrPrintingPrefs, UClassHelpers, UConsts, UMessageBox,
79+
ClassHelpers.UGraphics,
80+
FmPreferencesDlg, FrPrintingPrefs, UConsts, UMessageBox,
8081
UPageSetupDlgMgr, UPrintInfo, UStructs, UStrUtils;
8182

8283

Src/FmSplash.pas

+3-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2007-2023, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2007-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Implements the program's splash screen.
99
}
@@ -68,7 +68,8 @@ implementation
6868
// Delphi
6969
Windows, Graphics, GIFImg,
7070
// Project
71-
UAppInfo, UClassHelpers, UColours, UStructs, UWindowSettings;
71+
ClassHelpers.UGraphics,
72+
UAppInfo, UColours, UStructs, UWindowSettings;
7273

7374

7475
{$R *.dfm}

Src/FrSnippetLayoutPrefs.pas

+4-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2012-2021, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2012-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Implements a frame that allows user to customise appearance of different
99
* kinds of snippets in main display.
@@ -84,7 +84,9 @@ implementation
8484
// Delphi
8585
Windows, Graphics,
8686
// Project
87-
FmPreferencesDlg, UClassHelpers, UCtrlArranger;
87+
ClassHelpers.UControls,
88+
ClassHelpers.UGraphics,
89+
FmPreferencesDlg, UCtrlArranger;
8890

8991
{$R *.dfm}
9092

Src/UGIFImageList.pas

+2-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2008-2021, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2008-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Image list descendant that enables representations of GIF images loaded from
99
* HTML resource to be added. Resource names are mapped to image indices.
@@ -70,7 +70,7 @@ implementation
7070

7171
uses
7272
// Delphi
73-
GIFImg, UClassHelpers,
73+
GIFImg, ClassHelpers.UGraphics,
7474
// Project
7575
UComparers;
7676

Src/ULEDImageList.pas

+2-2
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2009-2021, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2009-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Defines a custom image list that provides a list of LED images. Image list is
99
* automatically loaded from resources when class is instantiated.
@@ -55,7 +55,7 @@ implementation
5555

5656
uses
5757
// Project
58-
UClassHelpers;
58+
ClassHelpers.UGraphics;
5959

6060

6161
{

Src/USnipKindListAdapter.pas

+1-1
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
* v. 2.0. If a copy of the MPL was not distributed with this file, You can
44
* obtain one at https://mozilla.org/MPL/2.0/
55
*
6-
* Copyright (C) 2009-2021, Peter Johnson (gravatar.com/delphidabbler).
6+
* Copyright (C) 2009-2024, Peter Johnson (gravatar.com/delphidabbler).
77
*
88
* Implements a class that adapts a list of snippet kinds by providing an
99
* alternative interface to the list, sorted by the name of the snippet kind.

0 commit comments

Comments
 (0)