Option for window to stay on top

alexgit2k · May 30, 2021 · 4ed34dd · 4ed34dd
1 parent 28eeb7a
commit 4ed34dd
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/audioswitcher.ini b/audioswitcher.ini
@@ -6,6 +6,7 @@ lastDevice = devices1
 lastVolume = volumes1
 devicesHeadline = Devices
 volumesHeadline = Volumes
+windowOnTop = true
 
 [devices1]
 devices1Text = Webcam

diff --git a/audioswitcher.pb b/audioswitcher.pb
@@ -31,6 +31,9 @@ fontHeadline = FontID(gadgetFont)
 
 ; Window
 OpenWindowMain()
+If Config$("windowOnTop") = "true"
+  StickyWindow(WindowMain, #True)
+EndIf
 ; Set text
 SetGadgetFont(HeadlineDevices, fontHeadline)
 SetGadgetText(HeadlineDevices, Config$("devicesHeadline"))
@@ -254,8 +257,8 @@ Procedure.s findDevice(device.s, type.s)
 EndProcedure
 
 ; IDE Options = PureBasic 5.73 LTS (Windows - x86)
-; CursorPosition = 61
-; FirstLine = 21
+; CursorPosition = 33
+; FirstLine = 8
 ; Folding = -
 ; EnableXP
 ; UseIcon = icon.ico