v0.1 + sing-box-1.13.3

Author: AKotov-dev

naivegui/backup/naivegui.lps

@@ -53,8 +53,7 @@
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="Unit1"/>
         <IsVisibleTab Value="True"/>
-        <TopLine Value="315"/>
-        <CursorPos X="30" Y="334"/>
+        <CursorPos X="14"/>
         <UsageCount Value="33"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>

naivegui/backup/unit1.lfm

@@ -574,6 +574,8 @@ object MainForm: TMainForm
     ParentShowHint = False
     ShowHint = True
     OnClick = Label2Click
+    OnMouseEnter = Label2MouseEnter
+    OnMouseLeave = Label2MouseLeave
   end
   object IniPropStorage1: TIniPropStorage
     StoredValues = <>

naivegui/backup/unit1.pas

@@ -41,6 +41,8 @@   TMainForm = class(TForm)
     procedure FormCreate(Sender: TObject);
     procedure FormShow(Sender: TObject);
     procedure Label2Click(Sender: TObject);
+    procedure Label2MouseEnter(Sender: TObject);
+    procedure Label2MouseLeave(Sender: TObject);
     procedure SpeedButton3Click(Sender: TObject);
     procedure StartBtnClick(Sender: TObject);
     procedure StopBtnClick(Sender: TObject);
@@ -322,6 +324,16 @@ procedure TMainForm.Label2Click(Sender: TObject);
   OpenURL('https://' + DomainEdit.Text);
 end;
 
+procedure TMainForm.Label2MouseEnter(Sender: TObject);
+begin
+  Label2.Font.Color := clRed;  //подсветка при наведении
+end;
+
+procedure TMainForm.Label2MouseLeave(Sender: TObject);
+begin
+  Label2.Font.Color := clBlue;  //подсветка при наведении
+end;
+
 //Создаём конфиги Клиента и Сервера
 procedure TMainForm.SpeedButton3Click(Sender: TObject);
 begin

naivegui/lib/x86_64-linux/naivegui.or

@@ -1,10 +1,10 @@
 object MainForm: TMainForm
   Left = 299
-  Height = 623
-  Top = 131
+  Height = 627
+  Top = 127
   Width = 822
   Caption = 'NaiveGUI'
-  ClientHeight = 623
+  ClientHeight = 627
   ClientWidth = 822
   SessionProperties = 'Height;Width;Top;Left'
   LCLVersion = '4.4.0.0'
@@ -351,7 +351,7 @@ object MainForm: TMainForm
     AnchorSideBottom.Side = asrBottom
     Left = 0
     Height = 20
-    Top = 603
+    Top = 607
     Width = 822
     Align = alBottom
     Caption = 'License: GPLv3   Author: alex_q_2000 (C) 2026   https://github.com/AKotov-dev/NaiveGUI'
@@ -399,11 +399,19 @@ object MainForm: TMainForm
     Caption = 'Bypass'
   end
   object LogMemo: TMemo
+    AnchorSideLeft.Control = Owner
+    AnchorSideTop.Control = BypassBox
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = Owner
+    AnchorSideRight.Side = asrBottom
+    AnchorSideBottom.Control = StaticText1
     Left = 0
-    Height = 378
-    Top = 225
+    Height = 386
+    Top = 221
     Width = 822
     Align = alBottom
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    BorderSpacing.Top = 15
     Font.Height = -13
     Font.Name = 'Liberation Mono'
     ParentFont = False

naivegui/lib/x86_64-linux/unit1.lfm

@@ -1,10 +1,10 @@
 object MainForm: TMainForm
   Left = 299
-  Height = 623
-  Top = 131
+  Height = 627
+  Top = 127
   Width = 822
   Caption = 'NaiveGUI'
-  ClientHeight = 623
+  ClientHeight = 627
   ClientWidth = 822
   SessionProperties = 'Height;Width;Top;Left'
   LCLVersion = '4.4.0.0'
@@ -351,7 +351,7 @@ object MainForm: TMainForm
     AnchorSideBottom.Side = asrBottom
     Left = 0
     Height = 20
-    Top = 603
+    Top = 607
     Width = 822
     Align = alBottom
     Caption = 'License: GPLv3   Author: alex_q_2000 (C) 2026   https://github.com/AKotov-dev/NaiveGUI'
@@ -399,11 +399,19 @@ object MainForm: TMainForm
     Caption = 'Bypass'
   end
   object LogMemo: TMemo
+    AnchorSideLeft.Control = Owner
+    AnchorSideTop.Control = BypassBox
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = Owner
+    AnchorSideRight.Side = asrBottom
+    AnchorSideBottom.Control = StaticText1
     Left = 0
-    Height = 378
-    Top = 225
+    Height = 386
+    Top = 221
     Width = 822
     Align = alBottom
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    BorderSpacing.Top = 15
     Font.Height = -13
     Font.Name = 'Liberation Mono'
     ParentFont = False