Turn off SetDlgGradient() - stop

Turn off SetDlgGradient() - stop

Postby Rick Lipkin » Fri Jul 13, 2012 10:18 pm

To All

I have been working on a Picture Zoom routine ( with Uwe's help ) and have just realized that the SetDlgGradient() ( global ) function is causing my picture zoom routine to fail.

Is there a way I can STOP at run-time the SetDlgGradient() global settings for a single routine and then start it up again when I close my routine ?

Thanks
Rick Lipkin
User avatar
Rick Lipkin
 
Posts: 2665
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: Turn off SetDlgGradient() - stop

Postby Bayron » Fri Jul 13, 2012 11:08 pm

Hi Rick,

You can save the gradient in a variable when you activate it
Code: Select all  Expand view
SetDlgGradient( aDlgActual := aDlgGradient[( 1 + nRandom (3) ) ] )
 

To deactivate:
Code: Select all  Expand view
SetDlgGradient( )
 

and then set it again....
Code: Select all  Expand view
SetDlgGradient( aDlgActual )
 
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
Bayron
 
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Turn off SetDlgGradient() - stop

Postby Rick Lipkin » Sat Jul 14, 2012 2:10 pm

Bayron

Thank you .. a simple solution ..

Rick
User avatar
Rick Lipkin
 
Posts: 2665
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: Turn off SetDlgGradient() - stop

Postby Bayron » Sat Jul 14, 2012 3:38 pm

As I always say:

FiveWin, One line of code and it's done...
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
Bayron
 
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 112 guests