The acceleration detecting graphics card.

I-Nex/i-nex/.src/FGraphic.module

@@ -17,22 +17,7 @@
 
 Public Logs As New Logger
 Public Sub _inits()
-  Dim Interfaces_X As String
-  Dim Avail_Interfaces As Integer 
-  Dim Max_Interfaces As Integer
-  Dim all_interfaces As String
-
-  Logs("Add Interfaces to ComboBox", Logger.Info)
-  Shell "ls /sys/class/drm/ | grep \"card[0-9]\" | wc -l" Wait To all_interfaces
-  Max_Interfaces = Val(all_interfaces)
-  For Avail_Interfaces = 1 To Max_Interfaces
-   Shell "ls /sys/class/drm/ | grep \"card[0-9]\" | sed -n '" & Avail_Interfaces & "p'" Wait To Interfaces_X
-   Interfaces_X = Replace(Interfaces_X, "\n", "")
-   If Interfaces_X Like "*-*" Then
-   Finfosys.ComboBox8.Add(Interfaces_X)
-   Endif
-  Next
-
+   Finfosys.ComboBox8.List = Dir("/sys/class/drm/", "*card[0-9]-*")
 End
 
 Public Sub _check()