- Original Message -
From: "Dax T. Games" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Sunday, March 17, 2002 5:44 AM
Subject: Re: Setting Mouse speed with Perl and Win32::API:
>I got it to work using the following code, thanks for the help. I need to
ask
Dax T. Games wrote:
> I got it to work using the following code, thanks for the help. I need to ask
>though where did you find the documentation on the constants below. There is more I
>need to do along these lines and it would be a great help if I new where to find this
>info.
>
> This is
, I], N) || die;
>
># I doubt you need to reference the array here, you don't have to do it
>with scalars and Win32::API
>
>my $result = $SystemParametersInfo->Call(SPI_GETMOUSE, NULL, @mArray,
>NULL);
>print "SystemParametersInfo result: $result: " .
>
Dax T. Games wrote:
> Using the following code I believe I have successfully imported the
> user32 function but I cannot make it work, I get errors.
>
>
>
> Start Code>>>
>
>
>
> use Win32::API;
>
>
>
> my $SystemParametersInfo = new Win32::API("user32",
> "SystemParame
"\n";
$mArray[1] = 10;
my $next_result = $SystemParametersInfo->Call(SPI_SETMOUSE, NULL, @mArray,
SPIF_UPDATEINIFILE);
print "SystemParametersInfo result: $result: " .
Win32::FormatMessage(Win32::GetLastError) . "\n";
HTH,
!c (dolljunkie)
----- Original Message
Using the following code I believe I have successfully imported the user32
function but I cannot make it work, I get errors.
Start
Code>>>
use Win32::API;
my $SystemParametersInfo = new Win32::API("user32", "SystemParametersInfo",
[P, P, P, P], N) || die;
@MouseSettings
