Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Window contents while dragging / resizing
Message
From
07/02/2014 05:11:10
 
 
To
07/02/2014 03:35:35
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Miscellaneous
Thread ID:
01593391
Message ID:
01593607
Views:
31
>Jos, for point one - you need to pass NRESULT by reference, ie @NRESULT

Indeed - was the error in the code :)
Thanks


>
>CLEAR
>
>DECLARE INTEGER SystemParametersInfo IN USER32.DLL ;
>  INTEGER uAction   , ;
>  INTEGER uParam    , ;
>  integer @lpvParam , ;
>  INTEGER fuWinIni
>
>#DEFINE SPI_GETDRAGFULLWINDOWS 38
>#DEFINE SPI_SETDRAGFULLWINDOWS 37
>#DEFINE SPIF_SENDWININICHANGE 2
>
>NRESULT = 0
>IF SYSTEMPARAMETERSINFO( SPI_GETDRAGFULLWINDOWS , 0 , @NRESULT , 0 ) <> 0
>
>  ? "Call succeeded. NRESULT = " , NRESULT 
>  
>  ? "Full Windows Drag is " + IIF( NRESULT = 0 , "OFF" , "ON" )
>
>ELSE
>
>  ? "Call failed."
>
>ENDIF
>
In the End, we will remember not the words of our enemies, but the silence of our friends - Martin Luther King, Jr.
Previous
Reply
Map
View

Click here to load this message in the networking platform