RE: [perl-win32-gui-users] Win32-API and ghostscript API
sorry wrong list :-)
-Original Message-
From: Rogers, John
Sent: Wednesday, 20 April 2005 4:56 PM
To: Perl-Win32-Gui-Users (E-mail)
Subject: [perl-win32-gui-users] Win32-API and ghostscript API
hi,
I want to access the ghostscript API for the gsdll32.dll.
been trying this any which way cant make it work, I must be doing some thing
wrong any Ideas ?
###
use strict;
use Win32::API;
Win32::API::Struct->typedef( REVINFO => qw{
CHAR *product;
CHAR *copyright;
LONG revision;
LONG revisiondate;
});
my $rev = Win32::API::Struct->new('REVINFO');
Win32::API->new('C:\gs\gs8.15\bin\gsdll32.dll','gsapi_revision','CCNN',V) or
die "no-worky $! $^E";
print $rev->{revision};
###
Regards,
John Rogers
System Engineer
Océ-Australia Limited
Telephone: (07) 3212.8127
Facsimile: (07) 3312 8101
Mobile: 0404 812 903
Email: [EMAIL PROTECTED]
www.oce.com.au
*
Disclaimer
If this e-mail has been sent to you in error, please notify Océ-Australia
Limited immediately and delete this e-mail from your system. Any views
expressed in this e-mail are those of the individual sender and may not
necessarily reflect the views of Océ-Australia Limited.
*
Disclaimer
If this e-mail has been sent to you in error, please notify Océ-Australia
Limited immediately and delete this e-mail from your system. Any views
expressed in this e-mail are those of the individual sender and may not
necessarily reflect the views of Océ-Australia Limited.
[perl-win32-gui-users] NotifyIcon::Change supresses eve nts?
Is there anybody who can regist a event handler by using NotifyIcon::Change() method( Not by NotifyIcon's new() constructor, but by Change() )? I have tried several times, but I always fail to regist. Clicking NotifyIcon, no event occurs. Looking "GUI.pm", NotifyIcon::Change() calls NotifyIcon::Modify() of "NotifyIcon.xs". At NotifyIcon::Modify(), there are lines like below: ZeroMemory(&nid, sizeof(NOTIFYICONDATA)); nid.cbSize = sizeof(NOTIFYICONDATA); nid.hWnd = parent; ParseNotifyIconOptions(NOTXSCALL sp, mark, ax, items, 1, &nid); I'm afraid some lines is short for NotifyIcon::Modify()? Comparing with NotifyIcon::Add(), I guess these two lines are needed. nid.uCallbackMessage = WM_NOTIFYICON; SwitchBit(nid.uFlags, NIF_MESSAGE, 1); Without these lines, nid.uCallbackMessage keeps zero, and a notice of messages on NotifyIcon is suprresed forever. I suspect no event occurs when we use NotifyIcon::Change(). Thanks.
