[tuxdroid-svn] r5153 - software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser

[jerome <c2m...@c2...>]

Author: jerome
Date: 2009-07-23 22:54:42 +0200 (Thu, 23 Jul 2009)
New Revision: 5153

Modified:
   software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dcu
   software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.pas
Log:
* Updating graphic tick in sound toggle case.

Modified: software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dcu
===================================================================
(Binary files differ)

Modified: software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.pas
===================================================================
--- software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.pas	2009-07-23 20:47:53 UTC (rev 5152)
+++ software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.pas	2009-07-23 20:54:42 UTC (rev 5153)
@@ -312,24 +312,35 @@
       Tray.hIcon := AppIcon.Handle;
       Shell_NotifyIcon(Nim_Modify, @tray);
     end
+
   else if connection and ( not sound ) and ( not activity ) then
     begin
       ImageList1.GetIcon(4, AppIcon);
       Tray.hIcon := AppIcon.Handle;
       Shell_NotifyIcon(Nim_Modify, @tray);
     end
+
   else if connection and activity and sound then
     begin
       ImageList1.GetIcon(3, AppIcon);
       Tray.hIcon := AppIcon.Handle;
       Shell_NotifyIcon(Nim_Modify, @tray);
     end
+
   else
     begin
       ImageList1.GetIcon(1, AppIcon);
       Tray.hIcon := AppIcon.Handle;
       Shell_NotifyIcon(Nim_Modify, @tray);
     end;
+
+  if sound then
+    //Updating tick from popup menu ( sound on ).
+    Mute1.ImageIndex := -1
+  else
+    //Updating tick from popup menu ( sound off ).
+    Mute1.ImageIndex := 5;
+    
   Application.ProcessMessages;
   
 end;