View Single Post
Old 18th August 2003, 23:35   #3
Joel
Debian user
(Forum King)
 
Joel's Avatar
 
Join Date: Jan 2003
Location: Arch land
Posts: 4,917
For example:
code:

Declare Function GetSystemMetrics Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long


It's a Visual Basic 6 typical API declaration.
In system words:
code:

System::Call 'user32::GetSystemMetrics(i 43) i .r0'


43 will detect the number of buttons in your mouse...
code:

OutFile "NumberMouseButtons.exe"
Name "Number of Mouse Buttons"
Caption "Number of Mouse Buttons"
XPStyle "on"

Function ".onInit"
System::Call 'user32::GetSystemMetrics(i 43) i .r0'
Messagebox MB_OK "$0"
Quit
FunctionEnd

Section "-boo"
;
SectionEnd



* PC: Intel Core 2 DUO E6550 @ 2.33 GHz with 2 GB RAM: Archlinux-i686 with MATE.
* Laptop: Intel Core 2 DUO T6600 @ 2.20 GHz with 4 GB RAM: Archlinux-x86-64 with MATE.
Joel is offline   Reply With Quote