Author: remi
Date: 2009-07-31 09:52:17 +0200 (Fri, 31 Jul 2009)
New Revision: 5252
Modified:
software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dfm
software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.pas
Log:
* Updated starting behavior. If you click on the desktop shortcut "TuxBox 2.0"
while TuxBox is initializing (at Windows startup), The splash screen is showed
and Tuxbox is foreground after the initialization.
Modified:
software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dfm
===================================================================
---
software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dfm
2009-07-30 18:44:23 UTC (rev 5251)
+++
software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dfm
2009-07-31 07:52:17 UTC (rev 5252)
@@ -61,7 +61,6 @@
Width = 955
Height = 619
TabOrder = 0
- Silent = False
RegisterAsBrowser = True
RegisterAsDropTarget = False
OnDocumentComplete = EmbeddedWB1DocumentComplete
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-30 18:44:23 UTC (rev 5251)
+++
software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.pas
2009-07-31 07:52:17 UTC (rev 5252)
@@ -174,6 +174,7 @@
smartcoreReady : boolean;
balloonShowed : boolean;
splashScreenMustBeShowed : boolean;
+ startInForeground: boolean;
properties : TStringList;
reduce_balloon : boolean;
ready_balloon : boolean;
@@ -217,9 +218,12 @@
begin
//Get if the splash screen must be showed or not
splashScreenMustBeShowed := true;
+ startInForeground := false;
if ParamCount > 0 then
if ParamStr(1) = '/NSS' then
- splashScreenMustBeShowed := false;
+ splashScreenMustBeShowed := false
+ else if ParamStr(1) = 'show' then
+ startInForeground := true;
MessageSys := RegisterWindowMessage('WindowForegroundRequest');
reduce_balloon := false;
@@ -304,13 +308,9 @@
//Start the Connection checker
ConnectionChecker.Enabled := true;
- if ParamCount() > 0 then
- begin
- if ParamStr(1) = 'show' then
- begin
- ShowHide1.Click;
- end;
- end;
+ //Start in foreground if requested
+ if startInForeground then
+ ShowHide1.Click;
end;
@@ -812,6 +812,7 @@
if not splashScreenMustBeShowed then
begin
splashScreenMustBeShowed := true;
+ startInForeground := true;;
ShowSplashScreen;
end;
exit;
------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tux-droid-svn mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/tux-droid-svn
