Rewrite all form files with current Lazarus (#73)

lighterowl · Dec 12, 2023 · 2a0e552 · 2a0e552
1 parent e0418a8
commit 2a0e552
Show file tree

Hide file tree

Showing 13 changed files with 1,061 additions and 7,328 deletions.
diff --git a/about.lfm b/about.lfm
@@ -499,7 +499,7 @@ inherited AboutForm: TAboutForm
         Left = 86
         Height = 15
         Top = 38
-        Width = 57
+        Width = 107
         Caption = 'Version %s, Build %s'
         ParentColor = False
       end
@@ -528,18 +528,18 @@ inherited AboutForm: TAboutForm
         Left = 86
         Height = 15
         Top = 72
-        Width = 57
+        Width = 56
         Caption = 'Version %s'
         ParentColor = False
       end
     end
     object tabLicense: TTabSheet
       Caption = 'License'
-      ClientHeight = 273
+      ClientHeight = 271
       ClientWidth = 427
       object edLicense: TMemo
         Left = 4
-        Height = 265
+        Height = 263
         Top = 4
         Width = 419
         Align = alClient

diff --git a/addlink.lfm b/addlink.lfm
@@ -46,15 +46,15 @@ inherited AddLinkForm: TAddLinkForm
     TabOrder = 0
     object txLink: TLabel
       Left = 0
-      Height = 14
+      Height = 15
       Top = 0
-      Width = 183
+      Width = 197
       Caption = 'URL of a .torrent file or a magnet link:'
       ParentColor = False
     end
     object edLink: TEdit
       Left = 0
-      Height = 21
+      Height = 23
       Top = 20
       Width = 558
       Anchors = [akTop, akLeft, akRight]

diff --git a/addtorrent.lfm b/addtorrent.lfm
@@ -117,7 +117,7 @@ inherited AddTorrentForm: TAddTorrentForm
       Height = 15
       Hint = 'for example: *.avi *.mkv'
       Top = 40
-      Width = 59
+      Width = 57
       Caption = 'Template:  '
       ParentColor = False
       ParentShowHint = False
@@ -237,12 +237,12 @@ inherited AddTorrentForm: TAddTorrentForm
       Top = 40
       Width = 467
       Anchors = [akTop, akLeft, akRight, akBottom]
-      Columns = <
+      Columns = <      
         item
           ReadOnly = True
           Title.Caption = 'File name'
           Width = 350
-        end
+        end      
         item
           ReadOnly = True
           Title.Caption = 'Size'
@@ -318,7 +318,7 @@ inherited AddTorrentForm: TAddTorrentForm
   object DiskSpaceTimer: TTimer[4]
     Enabled = False
     OnTimer = DiskSpaceTimerTimer
-    left = 44
-    top = 248
+    Left = 44
+    Top = 248
   end
 end
diff --git a/addtracker.lfm b/addtracker.lfm
@@ -46,15 +46,15 @@ inherited AddTrackerForm: TAddTrackerForm
     TabOrder = 0
     object txTrackerURL: TLabel
       Left = 0
-      Height = 14
+      Height = 15
       Top = 0
-      Width = 113
+      Width = 120
       Caption = 'Tracker announce URL:'
       ParentColor = False
     end
     object edTracker: TEdit
       Left = 0
-      Height = 21
+      Height = 23
       Top = 20
       Width = 516
       Anchors = [akTop, akLeft, akRight]

diff --git a/baseform.lfm b/baseform.lfm
@@ -3,5 +3,5 @@ object BaseForm: TBaseForm
   Height = 240
   Top = 132
   Width = 320
-  LCLVersion = '1.0.15.0'
+  LCLVersion = '2.2.6.0'
 end
diff --git a/connoptions.lfm b/connoptions.lfm
@@ -18,7 +18,7 @@ inherited ConnOptionsForm: TConnOptionsForm
   Position = poMainFormCenter
   object Page: TPageControl[0]
     Left = 8
-    Height = 329
+    Height = 283
     Top = 69
     Width = 513
     ActivePage = tabConnection
@@ -174,30 +174,30 @@ inherited ConnOptionsForm: TConnOptionsForm
       end
       object txCertFile: TLabel
         Left = 8
-        Height = 18
+        Height = 15
         Top = 245
-        Width = 105
+        Width = 91
         Caption = 'Client Certificate:'
         ParentColor = False
       end
       object edCertFile: TEdit
         Left = 180
-        Height = 32
+        Height = 23
         Top = 242
         Width = 316
         TabOrder = 10
       end
       object txCertPass: TLabel
         Left = 8
-        Height = 18
+        Height = 15
         Top = 274
-        Width = 72
+        Width = 61
         Caption = 'Private Key:'
         ParentColor = False
       end
       object edCertPass: TEdit
         Left = 180
-        Height = 32
+        Height = 23
         Top = 271
         Width = 316
         EchoMode = emPassword
@@ -213,31 +213,31 @@ inherited ConnOptionsForm: TConnOptionsForm
         Left = 8
         Height = 15
         Top = 37
-        Width = 66
+        Width = 67
         Caption = 'Proxy server:'
         ParentColor = False
       end
       object txProxyPort: TLabel
         Left = 8
         Height = 15
         Top = 65
-        Width = 57
+        Width = 58
         Caption = 'Proxy port:'
         ParentColor = False
       end
       object txProxyUserName: TLabel
         Left = 24
         Height = 15
         Top = 116
-        Width = 90
+        Width = 91
         Caption = 'Proxy user name:'
         ParentColor = False
       end
       object txProxyPassword: TLabel
         Left = 24
         Height = 15
         Top = 144
-        Width = 85
+        Width = 86
         Caption = 'Proxy password:'
         ParentColor = False
       end
@@ -413,7 +413,7 @@ inherited ConnOptionsForm: TConnOptionsForm
         Left = 18
         Height = 19
         Top = 160
-        Width = 287
+        Width = 286
         Caption = 'Activate the translation of the Transmission strings'
         TabOrder = 2
         Visible = False

diff --git a/download.lfm b/download.lfm
@@ -20,33 +20,33 @@ inherited DownloadForm: TDownloadForm
   Position = poMainFormCenter
   object txFileName: TLabel[0]
     Left = 12
-    Height = 14
+    Height = 15
     Top = 8
-    Width = 54
+    Width = 60
     Caption = 'txFileName'
     ParentColor = False
   end
   object txBytes: TLabel[1]
     Left = 12
-    Height = 14
+    Height = 15
     Top = 28
     Width = 38
     Caption = 'txBytes'
     ParentColor = False
   end
   object txPercent: TLabel[2]
-    Left = 344
-    Height = 14
+    Left = 342
+    Height = 15
     Top = 28
-    Width = 48
+    Width = 50
     Alignment = taRightJustify
     Anchors = [akTop, akRight]
     Caption = 'txPercent'
     ParentColor = False
   end
   object btCancel: TButton[3]
     Left = 160
-    Height = 23
+    Height = 25
     Top = 72
     Width = 75
     AutoSize = True
@@ -70,7 +70,7 @@ inherited DownloadForm: TDownloadForm
   object UpdateTimer: TTimer[5]
     Interval = 300
     OnTimer = UpdateTimerTimer
-    left = 36
-    top = 68
+    Left = 36
+    Top = 68
   end
 end