Path: usenet.cise.ufl.edu!newsfeeds.nerdc.ufl.edu!news.magicnet.net!news.maxwell.syr.edu!nntprelay.mathworks.com!news.mathworks.com!uunet!in4.uu.net!news.neta.com!not-for-mail
From:
[email protected] (Brian D.)
Newsgroups: comp.lang.perl.announce,comp.lang.perl.modules
Subject: Announce: Win32-Const 0.011, values for all Win32 constants
Followup-To: comp.lang.perl.modules
Date: 16 Oct 1998 16:23:27 GMT
Organization: Apple Spider
Lines: 37
Approved:
[email protected] (comp.lang.perl.announce)
Message-ID: <
[email protected]>
NNTP-Posting-Host: gadget.cscaper.com
X-Trace: news.neta.com 908555007 19733 206.67.186.3 (16 Oct 1998 16:23:27 GMT)
X-Complaints-To:
[email protected]
NNTP-Posting-Date: 16 Oct 1998 16:23:27 GMT
X-Disclaimer: The "Approved" header verifies header information for article transmission and does not imply approval of content.
Xref: usenet.cise.ufl.edu comp.lang.perl.announce:159 comp.lang.perl.modules:4970
Win32::Const module
contains all the Win32 constants, such as WM_CLOSE, SW_SHOWMAXIMIZED, etc
Available at:
CPAN/modules/by-module/Win32API/
SYNOPSIS:
#
# Access value of WM_CLOSE without importing it
#
use Win32API::Const;
print "WM_CLOSE = ", Win32API::Const::WM_CLOSE(), "\n";
#
# Import and access values of WM_CLOSE and HELP_CONTENTS
#
use Win32API::Const qw(WM_CLOSE HELP_CONTENTS);
print "WM_CLOSE = ", WM_CLOSE(), "\n";
print "HELP_CONTENTS = ", HELP_CONTENTS(), "\n";
#
# Import WM_CLOSE, along with all constants whose names start
# with WS_ or SE_
#
use Win32API::Const qw(:WS_ WM_CLOSE :SE_);
print "WM_CLOSE = ", WM_CLOSE(), "\n";
print "WS_MAXIMIZE = ", WS_MAXIMIZE(), "\n";
print "WS_MINIMIZE = ", WS_MINIMIZE(), "\n";
print "WS_OVERLAPPED = ", WS_OVERLAPPED(), "\n";
print "SE_SHUTDOWN_NAME = ", SE_SHUTDOWN_NAME(), "\n";
I appreciate any feedback, suggestions, etc.
thanks,
brian
