Correct sorting of the drop-down list

This commit is contained in:
eloaders 2019-11-18 02:37:23 +01:00
parent 26c9905925
commit 6e4842e41a
3 changed files with 3 additions and 3 deletions

View File

@ -28,7 +28,7 @@ Public lsusb As String
Public ListAllDiscs As String
Public Sub _inits()
Finfosys.ComboBox5.List = Dir("/sys/bus/usb/devices/", "*[0-9]*")
Finfosys.ComboBox5.List = Dir("/sys/bus/usb/devices/", "*[0-9]*").Sort(gb.Descent)
Finfosys.ComboBox5.Index = 0
End

View File

@ -17,7 +17,7 @@
Public Logs As New Logger
Public Sub _inits()
Try Finfosys.ComboBox8.List = Dir("/sys/class/drm/", "*card[0-9]-*")
Try Finfosys.ComboBox8.List = Dir("/sys/class/drm/", "*card[0-9]-*").Sort(gb.Ascent)
End
Public Sub _check()

View File

@ -94,7 +94,7 @@ Public Sub Form_Open()
'Procesor
Logs("Check available procesors", Logger.Info)
ComboBox1.List = Dir("/sys/devices/system/cpu/", "cpu[0-9]")
ComboBox1.List = Dir("/sys/devices/system/cpu/", "cpu[0-9]").Sort(gb.Ascent)
'Locate kernels
MaxCount = 0
' Try data = Shell "ls /boot | grep 'vmlinuz*'" For Input