Delete /src/i-nex/version, /src/i-nex/VERSION.

Get version from file /src/VERSION = 0.3.3
Add some Debug

src/VERSION

@@ -0,0 +1 @@
+0.3.3

src/i-nex/.project

@@ -4,6 +4,7 @@ Title=i-nex
 Startup=Finfosys
 Icon=i-nex.png
 Version=0.3.3
+VersionFile=1
 Component=gb.image
 Component=gb.gtk
 Component=gb.form

src/i-nex/.settings

@@ -12,9 +12,8 @@ SearchComment=False
 SearchString=True
 
 [OpenFile]
-Active=1
 File[1]=".src/Finfosys.form"
-File[2]=".src/Finfosys.class:491.3"
+File[2]=".src/Finfosys.class:4.100"
 File[3]=".src/Global.class:92.31"
 File[4]=".src/About.form"
 File[5]=".src/About.class:29.47"
@@ -23,11 +22,12 @@ File[7]=".src/Fzaslugi.form"
 File[8]=".src/Fzaslugi.class:18.9"
 File[9]=".src/Flicencja.class:4.11"
 File[10]=".src/distrodetect.class:7.35"
-File[11]=".src/battery.module:20.16"
+File[11]=".src/battery.module:28.46"
 File[12]=".src/Brightness.form"
 File[13]=".src/Brightness.class:13.85"
 File[14]=".src/Notify.module:4.8"
-File[15]=".src/MDBus.module:14.0"
+Active=15
+File[15]=".src/MDBus.module:13.3"
 Count=15
 
 [Watches]

src/i-nex/.src/Finfosys.class

@@ -75,26 +75,27 @@ Public Sub Form_Open()
       ComboBox1.Add("Procesor11")
   Endif
 'Uruchomienie instrukcji dla poszczególnych zakładek w celu wydobycia informacji z systemu
- Debug "Dospam uptime"
+ Debug "Check Dospam uptime"
  dospam_uptime()
- Debug "System"
+ Debug "Check System"
  System()
- Debug "Bios"
+ Debug "Check Bios"
  bios()
- Debug "Kernel"
+ Debug "Check Kernels"
  kernel()
- Debug "Internet"
+ Debug "Check network"
  internet()
- Debug "Dzwiek"
+ Debug "Check sound cards"
  dzwiek()
- Debug "Grafika"
+ Debug "Check graphic card"
  grafika()
- Debug "Dysk"
+ Debug "Check drives"
  dysk()
  'END Uruchomienie instrukcji dla poszczególnych zakładek w celu wydobycia informacji z systemu
  Debug "Set Combobox to Procesor0"
  ComboBox1.Text = "Procesor0" 'Ustawienie combobox na Procesor0 / W przeciwnym wypadku nie pokaże nic
  Label25.Text = Application.version
+ Debug Application.Version
  'Okno na środku
  Me.Center
 
@@ -360,12 +361,13 @@ End
 Public Sub Button2_Click()
 
   Exec ["gnome-screenshot", "-w"]
+  Debug "Running Gnome Screenshot"
 
 End
 
 Public Sub Button1_Click()
 
-  Finfosys.Close
+  Me.Close
   Debug "God bye!"
 End
 
@@ -436,12 +438,13 @@ Public Sub battery_info()
  TextBox18.Text = battery.serial_number
  TextBox19.Text = battery.battery_type
  TextBox20.Text = battery.OEM_info
+ Debug "Get information Active Battery Done"
 
 End
 
 
 Public Sub Button3_Click()
-
+  Debug "Show About Window"
   About.Show
 
 End
@@ -461,7 +464,7 @@ End
 Public Sub Button4_Click()
 
   Desktop.Open("http://www.cpu-world.com/cgi-bin/SearchSite.pl?SEARCH=" & TextArea1.Text & "&PROCESS=Search")
-
+  Debug "Open website for more informations about your processor"
 End
 
 Public Sub Button7_Click()
@@ -489,4 +492,4 @@ Public Sub Button9_Click()
 
  Brightness.Show
  Debug "Show brightness window"
-End
+End

src/i-nex/.src/Finfosys.form

@@ -805,7 +805,7 @@
   { Button1 Button
     Move(378,498,84,21)
     Text = ("Close")
-    Picture = Picture["icon:/16/cancel"]
+    Picture = Picture["icon:/16/quit"]
   }
   { Button3 Button
     Move(330,498,21,21)

src/i-nex/.src/battery.module

@@ -20,11 +20,13 @@ Public OEM_info As String
 
 Public Sub _init()
 If battery_exist = True Then
+ Debug "Battery found " & addres_battery & ""
  _get_inf()
  _replace_n()
  Object.Call(Finfosys, "battery_info")
 Else
- Finfosys.TabStrip1[9].Visible = False 
+ Finfosys.TabStrip1[9].Visible = False
+ Debug "Battery not found in " & addres_battery & "" 
 Endif
 End