Debug mode

r57zone · Aug 26, 2024 · 915211a · 915211a
1 parent f60c7a8
commit 915211a
Show file tree

Hide file tree

Showing 7 changed files with 448 additions and 30 deletions.
diff --git a/README.RU.md b/README.RU.md
@@ -14,6 +14,10 @@
 2. Измените название, параметры окна, UserAgent, ссылку и так далее, прокси, в конфигурационном файле `Config.ini`.
 3. Измените иконку, с помощью [Resource Hacker](http://www.angusj.com/resourcehacker/).
 
+## Режим отладки
+Для быстрой отладки можно включить специальный режим, в котором доступно: изменение размеров, изменение User agent, очистка всех данных. Для включения измените параметр `Debug` на `1`.
+[![](https://github.com/user-attachments/assets/cae19d08-4951-44bf-8278-2edcf076eb75)](https://github.com/user-attachments/assets/5d2eafc3-2825-48c3-bc82-718ca471549d)
+
 ## Загрузка
 >Версия для Windows 10, 11.<br>
 

diff --git a/README.md b/README.md
@@ -3,7 +3,7 @@
 ← Choose language | Выберите язык
 
 # ProtonShell
-Lightweight shell for websites, simple web applications, built on the Microsoft Edge system browser. Based on it you can make a separate window for Google Docs, ChatGPT, Twitch chat, Instagram client for PC, with js userscript or some web application in its own window.
+Lightweight shell for websites, simple web applications, built on the Microsoft Edge system browser. Based on it you can make a self window for Google Docs, ChatGPT, Twitch chat, Instagram client for PC, with js userscript or some web application in its own window.
 
 ## Screenshots
 ![](https://github.com/user-attachments/assets/902b2e58-664d-460f-abfd-37de3c8c920b)
@@ -16,6 +16,10 @@ Lightweight shell for websites, simple web applications, built on the Microsoft
 2. Change the name, window parameters, UserAgent, link and so on, proxy, in the `Config.ini` configuration file.
 3. Change the icon with [Resource Hacker](http://www.angusj.com/resourcehacker/).
 
+## Debug mode
+For fast debugging you can enable a special mode in which the following is available: resizing, changing User agent, clearing all data. To enable it, change the `Debug` parameter to `1`.
+[![](https://github.com/user-attachments/assets/c71837e8-9097-438f-8e15-93efc42b65d3)](https://github.com/user-attachments/assets/e2e88215-3e52-46dd-b24a-42eb6bfdc3e7)
+
 ## Download
 >Version for Windows 10, 11.<br>
 

diff --git a/Source/Config.ini b/Source/Config.ini
@@ -12,11 +12,13 @@ UserScript=
 SystemProxy=
 # Return to previous system proxy after closing the app (if you use proxy), 1 - on, 0 - off
 ReturnPreviousProxy=0
+# Debug menu, 1 - on, 0 - off
+Debug=0
 
 [Window]
 Title=Test App
 IconPath=
-Width=720
+Width=640
 Height=480
 SaveSize=0
 

diff --git a/Source/DevicesList.txt b/Source/DevicesList.txt
@@ -0,0 +1,15 @@
+Default (640x480)
+Galaxy S4 (1080x1920)
+Galaxy S20/S21 (1440x3200)
+Galaxy Note 10/20 (1440x3040)
+Pixel 4/5 (1080x2280)
+Pixel 6/7 (1080x2400)
+OnePlus 8/9 (1080x2400)
+iPhone 5/5S/SE (320x568)
+iPhone 6/6S/7/8 (750x1334)
+iPhone X/XS/11 Pro (1125x2436)
+iPhone 11/11 Pro Max/12/12 Pro (1284x2778)
+iPad 1/2 (768x1024)
+iPad Mini (768x1024)
+iPad Pro 11 (834x1194)
+iPad Pro 12.9 (1648x2368)
diff --git a/Source/Unit1.dfm b/Source/Unit1.dfm
@@ -14,19 +14,193 @@ object Main: TMain
   OnClose = FormClose
   OnCreate = FormCreate
   OnDestroy = FormDestroy
+  OnResize = FormResize
   TextHeight = 13
   object EdgeBrowser: TEdgeBrowser
     Left = 0
-    Top = 0
+    Top = 113
     Width = 640
-    Height = 480
+    Height = 367
     Align = alClient
     TabOrder = 0
     UserDataFolder = '%LOCALAPPDATA%\bds.exe.WebView2'
     OnCreateWebViewCompleted = EdgeBrowserCreateWebViewCompleted
     OnNavigationCompleted = EdgeBrowserNavigationCompleted
     OnNewWindowRequested = EdgeBrowserNewWindowRequested
-    ExplicitWidth = 624
-    ExplicitHeight = 476
+    ExplicitTop = 0
+    ExplicitWidth = 636
+    ExplicitHeight = 479
+  end
+  object DebugPanel: TPanel
+    Left = 0
+    Top = 0
+    Width = 640
+    Height = 113
+    Align = alTop
+    TabOrder = 1
+    Visible = False
+    object ResolutionLbl: TLabel
+      Left = 9
+      Top = 93
+      Width = 75
+      Height = 13
+      Caption = 'Resolution: 0x0'
+    end
+    object LeftBtn: TButton
+      Left = 7
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #8592
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+      TabOrder = 0
+      OnClick = LeftBtnClick
+    end
+    object RightBtn: TButton
+      Left = 37
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #8594
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+      TabOrder = 1
+      OnClick = RightBtnClick
+    end
+    object RefreshBtn: TButton
+      Left = 67
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #8635
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+      TabOrder = 2
+      OnClick = RefreshBtnClick
+    end
+    object ClearBtn: TButton
+      Left = 127
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #55357#56785#65039
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+      ParentShowHint = False
+      ShowHint = True
+      TabOrder = 4
+      OnClick = ClearBtnClick
+    end
+    object HomeBtn: TButton
+      Left = 97
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #55356#57312
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+      ParentShowHint = False
+      ShowHint = False
+      TabOrder = 3
+      OnClick = HomeBtnClick
+    end
+    object DevicesCB: TComboBox
+      Left = 8
+      Top = 38
+      Width = 212
+      Height = 21
+      Style = csDropDownList
+      ParentShowHint = False
+      ShowHint = True
+      TabOrder = 5
+      OnChange = DevicesCBChange
+    end
+    object SetDeviceBtn: TButton
+      Left = 226
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #55357#56561
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+      ParentShowHint = False
+      ShowHint = True
+      TabOrder = 6
+      OnClick = SetDeviceBtnClick
+    end
+    object RotateDeviceBtn: TButton
+      Left = 256
+      Top = 7
+      Width = 25
+      Height = 25
+      Caption = #8634
+      ParentShowHint = False
+      ShowHint = True
+      TabOrder = 7
+      OnClick = RotateDeviceBtnClick
+    end
+    object UserAgentsCB: TComboBox
+      Left = 8
+      Top = 66
+      Width = 272
+      Height = 21
+      Style = csDropDownList
+      ItemIndex = 0
+      ParentShowHint = False
+      ShowHint = True
+      TabOrder = 8
+      Text = 'Default User Agent'
+      OnChange = UserAgentsCBChange
+      Items.Strings = (
+        'Default User Agent')
+    end
+    object ZoomCB: TComboBox
+      Left = 227
+      Top = 38
+      Width = 53
+      Height = 21
+      Style = csDropDownList
+      ItemIndex = 7
+      TabOrder = 9
+      Text = '100%'
+      Items.Strings = (
+        '30%'
+        '40%'
+        '50%'
+        '60%'
+        '70%'
+        '80%'
+        '90%'
+        '100%'
+        '125%'
+        '150%'
+        '175%'
+        '200%')
+    end
   end
 end