get rid of BaseForm

lighterowl · Aug 16, 2024 · 1ef0f6b · 1ef0f6b
1 parent 7bca8fa
commit 1ef0f6b
Show file tree

Hide file tree

Showing 16 changed files with 33 additions and 338 deletions.
diff --git a/about.pas b/about.pas
@@ -36,7 +36,7 @@
 interface
 
 uses
-  BaseForm, Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics,
+  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics,
   Dialogs, StdCtrls, ComCtrls, ExtCtrls, ButtonPanel, lclversion, BuildInfo,
   ssl_openssl3, ssl_openssl3_lib, fpjson;
 
@@ -52,7 +52,7 @@ interface
 
   { TAboutForm }
 
-  TAboutForm = class(TBaseForm)
+  TAboutForm = class(TForm)
     Bevel1: TBevel;
     Buttons: TButtonPanel;
     edLicense: TMemo;

diff --git a/addlink.pas b/addlink.pas
@@ -37,7 +37,7 @@
 interface
 
 uses
-  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls, ButtonPanel, ExtCtrls, BaseForm;
+  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls, ButtonPanel, ExtCtrls;
 
 resourcestring
   SNoLink = 'No link was specified.';
@@ -46,7 +46,7 @@ interface
 
   { TAddLinkForm }
 
-  TAddLinkForm = class(TBaseForm)
+  TAddLinkForm = class(TForm)
     Buttons: TButtonPanel;
     edLink: TEdit;
     Panel1: TPanel;

diff --git a/addtorrent.pas b/addtorrent.pas
@@ -38,7 +38,7 @@ interface
 
 uses
   Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
-  StdCtrls, Spin, VarGrid, Grids, ButtonPanel, ExtCtrls, Buttons, BaseForm,
+  StdCtrls, Spin, VarGrid, Grids, ButtonPanel, ExtCtrls, Buttons,
   varlist, fpjson, StrUtils, DateUtils, LazUTF8;
 
 resourcestring
@@ -51,7 +51,7 @@   TFilesTree = class;
 
   { TAddTorrentForm }
 
-  TAddTorrentForm = class(TBaseForm)
+  TAddTorrentForm = class(TForm)
     DelButton: TBitBtn;
     btSelectAll: TButton;
     btSelectNone: TButton;

diff --git a/addtracker.pas b/addtracker.pas
@@ -35,7 +35,7 @@
 interface
 
 uses
-  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, ButtonPanel, StdCtrls, ExtCtrls, BaseForm;
+  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, ButtonPanel, StdCtrls, ExtCtrls;
 
 resourcestring
   STrackerProps = 'Tracker properties';
@@ -45,7 +45,7 @@ interface
 
   { TAddTrackerForm }
 
-  TAddTrackerForm = class(TBaseForm)
+  TAddTrackerForm = class(TForm)
     Buttons: TButtonPanel;
     edTracker: TEdit;
     Panel1: TPanel;

diff --git a/baseform.lfm b/baseform.lfm
diff --git a/baseform.pas b/baseform.pas
diff --git a/colsetup.pas b/colsetup.pas
@@ -36,13 +36,13 @@
 interface
 
 uses
-  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, ComCtrls, CheckLst, StdCtrls, ButtonPanel, ExtCtrls, VarGrid, BaseForm;
+  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, ComCtrls, CheckLst, StdCtrls, ButtonPanel, ExtCtrls, VarGrid;
 
 type
 
   { TColSetupForm }
 
-  TColSetupForm = class(TBaseForm)
+  TColSetupForm = class(TForm)
     btDown: TButton;
     btUp: TButton;
     Buttons: TButtonPanel;

diff --git a/connoptions.pas b/connoptions.pas
@@ -35,7 +35,7 @@
 interface
 
 uses
-  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls, Spin, ComCtrls, Buttons, ButtonPanel, ExtCtrls, BaseForm, ResTranslator;
+  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls, Spin, ComCtrls, Buttons, ButtonPanel, ExtCtrls, ResTranslator;
 
 const
   DefSpeeds = '0,10,25,50,100,250,500,750,1000,2500,5000,7000';
@@ -50,7 +50,7 @@ interface
 
   { TConnOptionsForm }
 
-  TConnOptionsForm = class(TBaseForm)
+  TConnOptionsForm = class(TForm)
     btNew: TButton;
     btDel: TButton;
     btRename: TButton;