is:
http://img192.imageshack.us/img192/3226/win32guiopengl.jpg
regards
peter
--
Download Intel® Parallel Studio Eval
Try the new software tools for yourself. Speed compiling, find bugs
proactively, and fine-
r the other ppm
providers sites ,and this is much more convenient to install for the most
windows users.
regards
peter
#!perl -w
use strict;
use warnings;
use Win32::GUI qw(WS_CLIPCHILDREN);
use Win32::GUI::OpenGLFrame qw(w32gSwapBuffers);
use OpenGL qw(:all);
my $spin = 0.0;
my $xrot = 0;
my $yro
Hi
here is an example using the new Win32-GUI-OpenGLFrame , it is displaying
either a rotating triangle or a rotating cube when you click an appropriate
button.
yes thanks , i am sure this addition will be used heavily when the people
know about it.
here is the downloadable example:
http://rapidsha
Hi
Win32-GUI-OpenGLFrame is an important adition to the win32::GUI, which will
be recognized over the years.
i have installed it using vc6++ without problems on win32gui v1.06 -
activeperl 510 - winxp
i will try it and post my findings.
peter
Hi
thanks kevin for the solutions, it is working perfectly.
i have attached an example based on your second example, with a main window
which have two buttons to display either a Triangle or a cube on a child
window,
the downloadable code from here:
http://rapidshare.com/files/254608681/win32g
text in the textbox, why is this behaviour, and how i can restore the
triangle rotating after clicking the button.
2- is it possible to make the opengl window smaller than the win32gui window
!!
best wishes
peter
--
Enter the
/254072142/triangle.rar
peter
use strict;
use warnings;
#these constants are needed for SetPixelFormat() but aren't defined in
Win32::GUI
use constant {
PFD_TYPE_RGBA => 0,
PFD_DOUBLEBUFFER => 0x0001,
PFD_DRAW_TO_WINDOW => 0x0004,
PFD_SUPPORT_OPENGL => 0x0020,
hihow can we enable the mouse right click on the Win32::GUI::RichEdit control, it is not enabled by default. i refer also to the same question 2 years ago by Octavian Rasnita: in:http://www.mail-archive.com/perl-win32-gui-users@lists.sourceforge.net/msg04870.htmlwith no success.i have tried $Contro
is working fine also with perl 32bit on a windows xp 64 bit
regards
Robert May <[EMAIL PROTECTED]> wrote:
On 12/02/2008, peter wrote:
> hi
> the new win32GUI 1.06 is fine and working well, i have tried it on windows
> xp 32bit and vista 32 bit, with perl 5.10.1002
Thank you
hi
the new win32GUI 1.06 is fine and working well, i have tried it on windows xp
32bit and vista 32 bit, with perl 5.10.1002
today i have installed windows xp 64-bit on a different primary partition in my
hard disk, then have installed the activePerl 5.10.1002 64-bit, when i tried to
install win
hi
a great gift in this new year, especially the supporting of activePerl 5.10
wich have many new additions
to the language of wisdom.
i am in the process of experimenting many old examples using perl 5.10 with
win32-gui 1.06
happy new win32-GUI
george
-
"STILL_ACTIVE" is not exported by the Win32::Process module
Jason Plum,
I got the above msg when trying your spawn_child example. What am I doing
wrong? I searched for win32::Process in ppm, didn't find it.
Thanks,
Peter Buck
Works fine for me.
Perl v5.8.3
Win-GUI 0.0.558
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]
> Behalf Of
> Arthur Schwarz
> Sent: Monday, August 28, 2006 2:20 PM
> To: perl-win32-gui-users@lists.sourceforge.net
> Subject: [perl-win32-gui-users] Event subrouti
> By disabled I mean literally the grayed out condition allowing the user to
see (and
> scroll through) the list but preventing the user from checking/unchecking
any
> checkboxes. If I set disabled => 1, in AddListView the control is
definately
> disabled ... but it doesn't allow the user to s
>
> I want to make an auto focus on a listview or a textfield when i make
> it appears. Like that, the user don t have to click on it to make
> mouse scrolling.
>
$widget->SetFocus();
>
> ps: sorry for my poor english, i'm french student learning english :D
>
No problem. There are a lot of
> is there a way to make a MessageBox the top most dialog while looking for
> some win32 window ?
When you construct $MainWin you can use:
-topmost => 1,
Or if you just want to bring it to the foreground at somepoint you can also
use:
$MainWin->SetForegroundWindow();
> You are the man! That worked! Now, can someone further
> explain what an
> Iconic window is? I would have never had thought that Iconic meant
> minimized and if I did, I could have found this solution by googling
> Iconic I'm sure.
Why, iconic is minimized of course!
I must've posted a sim
>
> if ($DOS = minimized) { Win32::GUI::Hide($DOS); }
>
Try
if ($DOS->IsIconic) { Win32::GUI::Hide($DOS); }
Resolved!
> >>Error: no suitable installation target found for package Win32-GUI.
> >
> > I've done some more poking around and it seems that this
> error is usually
> > when a package was made with an older version of perl (can
> anyone confirm?).
>
> Well, I seem to have the opinion that it
> Error: no suitable installation target found for package Win32-GUI.
I've done some more poking around and it seems that this error is usually
when a package was made with an older version of perl (can anyone confirm?).
So, I uninstalled the version of perl that is on that machine (5.8.7) and
re
> There have been lots of changes and fixes since 0.0.558, but I'm
> surprised
> it breaks your code. Can you give examples?
It gives and error for this line:
$Window->Editor->SendMessage(1093, 0, 1);
Now, it has been a couple years since I wrote this and I honestly don't
recall why this is the
It's been a while since I've installed Win32::GUI. When I download the
latest version it installed fine but there's errors with my code, which was
written when 0.0.558 was the latest. I have a copy of the ppd, etc, for
0.0.558 but I can't seem to install it.
It would appear that there are also c
>
> You absolutely right. It was stupid mistake. But! Timer do not work as
> before though I declared $mw as our (not my) (Steve Lloyd advice) and
> corrected event handler. It's like that handler not executed at all.
> I have Win32-GUI 1.02, perl 5.8.6 and Windows98SE
>
I don't think my or our
> Здравствуйте, perl-win32-gui-users,
> I wrote simple script with timer. It's supposed that timer
> hides/shows main window but window is always visible. What's the
> matter?
Your if() logic in CheckDir_Timer sub. If you look closely, you will see
that the window gets hidden and then shown
> I am new to Win32::GUI.
> I would like to open a simple, plain, main window, with only label
> objects on it, let say, and intercept a mouse click anywhere on the
> client area, so
> that, depending on where the click happens
> (Win32::GUI::GetCursorPos()), different actions can be taken.
> Any recommendation about Win32::GUI documentation? I red attached with the
module,
> but it is not covering everything very much.
Jeb created a website/project for the documentation. Not sure how complete
it is, but I'm sure it's a good place to start:
http://jeb.ca/perl/win32-gui-docs/index.
I would change it to:
$my_but->Enable();
$my_but->Disable();
instead of trying to change the -disabled parameter of the button itself.
> -Original Message-
> From: Vassiliy Truskov [mailto:[EMAIL PROTECTED]
> Sent: Friday, December 03, 2004 3:55 PM
> To: perl-win32-gui-users@lists.sou
> I'm making good version on my project, but not being able to
> tab between
> fields makes it kind of useless... Another one I just
> noticed, is there a
> way to set the focus to a field?
>
$Window->widgetname->SetFocus();
my $icon = new Win32::GUI::Icon("Icon.ico");
my $ni = $Window->AddNotifyIcon(
-icon => $icon,
-id => 1,
-name => ni,
-tip => "Mouseover shows this",
);
-Original Message-
From: Eric Hansen [mailto:[EMAIL PROTECTED]
Sent: Wednesday, July 28, 2004 4:45 PM
To: perl-win32-gui-users
>
> There are lots of ways to do this. In my case, I have over a thousand
controls (sounds a lot, but
> when you add up all the labels, group boxes etc!), so maintaining a perl
hash becomes problematic -
> ideally, the translations should be in a separate file or database, so
they can be worked on
If the text were to always be the same, I would say yes it would be a useful
function. But if the text would usually be customized (which I would
expect), then it might be easier to just use a hash of hashes:
$text{'English'}{'Window'}='My Window';
$text{'Spanish'}{'Window'}='Mi Ventana';
$text{'
would this work?
if ($TextField->GotFocus())
{
...
}
-Original Message-
From: Frazier, Joe Jr [mailto:[EMAIL PROTECTED]
Sent: Monday, May 10, 2004 10:50 AM
To: Win32GUI
Subject: [perl-win32-gui-users] Is there anyway to capture a click event for
a TextField control
I have an app wh
Yes, add the following to your Window:
-topmost => 1,
> -Original Message-
> From: marc iton [mailto:[EMAIL PROTECTED]
> Sent: Monday, May 10, 2004 6:18 AM
> To: Perl-Win32-GUI-Users@lists.sourceforge.net
> Subject: [perl-win32-gui-users] Always on top ...
>
>
> Hi,
> there is a way
You can also get rid of it with:
$ni->DESTROY;
(assuming $ni is the current NotifyIcon)
> -Original Message-
> From: Sherif Mohamed [mailto:[EMAIL PROTECTED]
> Sent: Thursday, April 15, 2004 6:08 AM
> To: perl-win32-gui-users@lists.sourceforge.net
> Subject: [perl-win32-gui-users] Work
em &2" => "submenu2",
" >> Sub Item &3" => "submenu3",
" >> Sub Item &4" => "submenu4",
);
-Original Message-
From: Jez White [mailto:[EMAIL PROTECTED]
Sent: Friday, February 27, 2004 12:07 PM
To: Jez Whi
I've done something like this with a NotifyIcon (see below). I'm guessing
you could probably do the same with a regular menu.
sub ni_click
{
if ($Window->IsVisible)
{
if ($Window->IsIconic)
{
$menu = new Win32::GUI::Menu(
I have been using perl2exe for quite some time and I'm quite sure that it does
the trick in the way that you describe for PAR.
Cheers,
Peter
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Stephen Pick
Sent: Thursday, 19 February, 2004 11:02
To: Jez
If you simply Hide() a window instead of reconstructing it each time, it
should always keep the last position. Also should take less memory. That
said, this little script should give you the info you're looking for.
You should be able to search the mailing list on activestate.com
-Pete
use Win32
> Hmm. I don't recall a 0.0.580 release. I thought they jumped from
> 0.0.558 to 0.0.665.
D'oh. Yeah, I meant 558.
> If you meant 0.0.558, should we also assume that changing versions of
> Win32::GUI was all you changed? That the script is still
> using OEM (old
> event model)?
Um, I g
I had a script whose NotifyIcon worked fine under version 0.0.580 of
Win32::GUI that no longer works since I upgraded to 0.0.670. It gets the
event and shows the appropriate menu when you click on the NI but does not
get anything when you click on one of the items on the menu.
Also, getting Doc Wa
You want to add the buttons to the tab, not a child window. So remove all
the child window "stuff" and change
$childwin->AddButton
to
$win->Tab->AddButton
and now $win will remain in focus.
-Original Message-
From: Jez White [mailto:[EMAIL PROTECTED]
Sent: Friday, January 16
You can do this a number of ways. In order to allow a user to close the Icon
and thus the app, you need to call Win32::GUI::Dialog, right. You can each
launch the code to run in the background two ways:
1- have a button or something else on the Window to start it, or
2- use the Timer method to get
Jez,
you're almost there!!! Change these lines:
$rebar->InsertBand (-text => 'one' , -image => 0);
$rebar->InsertBand (-text => 'two' , -image => 1);
$rebar->InsertBand (-text => 'thee', -image => 2);
to
$rebar->InsertBand (-text => 'one' , -image => $IMG_ONE);
$rebar->InsertBand (-text =>
I don't have a lot of feedback other than:
1- I like the OO idea. I do think it is worthwhile if you've got the time
and energy :-) I particularly think it is a good idea because, as you put
it, you won't be able to clobber other windows and you can keep better
control over where an event came fro
sts.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
Hi,
only to by curious - did you turn on "Allow service to interact with
desktop" by the Service Control Manager or by Windows API. If not,
messages and GUI components will not show up on the "User Desktop".
Peter NESWAL
uk.com/CreateGui
> >
> > Respectfully,
> >
> > Sergy Stouk.
-
Hi there!
I was curious too, and I couldn't get it to work either.
But your first error is that you havn't read this:
http://www.stouk.com/CreateGui/Training1.htm
Your are to copy the Gui.xml from the first example folder.
But as I said even after doing that it didn't work for me.
No errors, no nothing...
/Peter Janson
However, if you are just looking to run an app in the background like a
service, you do not need to make it a gui (probably not the most efficient
solution). In that case, check out Win32::Daemon
-Pete
-Original Message-
From: Peter Eisengrein
Sent: Monday, December 01, 2003 8:02 AM
To
When you create the child window, add this arg:
-parent => $Window,
Yes, you can hide the parent and leave the child showing...
-Pete
-Original Message-
From: Chris [mailto:[EMAIL PROTECTED]
Sent: Saturday, November 29, 2003 5:10 PM
To: perl-win32-gui-users@lists.sourceforge.ne
Hi!
Is there a way to whrite graphics in "fullscreen" mode?
One could always place the window at -xx, -xx and make the window a trifle
bigger than the actual screen resolution, but that solution feels "dirty".
Is there a better way?
/Peter Janson
continually then at
some point you will run out of memory.
>From: Peter Eisengrein <[EMAIL PROTECTED]>
>To: "'Cruickshanks, Darin'" <[EMAIL PROTECTED]>,
>perl-win32-gui-users@lists.sourceforge.net
>Subject: RE: [perl-win32-gui-users] Destroying a window
>Dat
One quick and dirty way to do it would be undef($Window); but that may cause
other problems if you have other widgets that reference the window. For
example, if you have a Timer that updates a clock on $Window every second,
you will begin to get errors every second. So, unless you *really* want to
I don't think this will work, but maybe $checkbox->Hide() ?
If not, you could create a blank Label to "cover" it.
-Pete
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]
Sent: Monday, October 20, 2003 1:42 PM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [pe
Maybe something in a _Click event that triggers the memory flush? Just
guessing...
-Original Message-
From: carollyne courtney [mailto:[EMAIL PROTECTED]
Sent: Thursday, October 02, 2003 7:37 AM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] Memory usage
Th
Not sure about your first question, but to enable/disable a menu item use:
$filemenu->{'Open'}->Enabled(0); # disable
$filemenu->{'Open'}->Enabled(1); # enable
-Original Message-
From: Erik Shön [mailto:[EMAIL PROTECTED]
Sent: Thursday, August 14, 2003 4:07 PM
To: perl-win32-gui-users@
Let's start with a basic question: What type of widget is $main->MECH$x ?
Does this work part way and then crash or does it crash on the first
attempt?
-Original Message-
From: Chris [mailto:[EMAIL PROTECTED]
Sent: Saturday, July 26, 2003 8:22 AM
To: perl-win32-gui-users@lists.sourceforge
What is the value of $pt12 and what happens if you put it in double quotes?
-Original Message-
From: Dennis Putnam [mailto:[EMAIL PROTECTED]
Sent: Wednesday, July 16, 2003 3:11 PM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] AddTextfield error
I have the
Note sure why it stops when minimized, I assume it is a scope issue and is
supposed to happen. Nevertheless, change your for() loop to a _Timer event
and it [1] should work, [2] be more Windows-y, and [3] allow you to do other
things with the window in between counts (whereas sleep will only sleep)
y 07, 2003 7:27 PM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] Can i have some examples?
(i got the window to show now, thanks to Peter Eisengrein) and now I'm
trying to get a menubar (the standard File, Edit, etc.) and i cant figure
out how to use Menu or
So far so good. What you neglected to do was tell it to show the window.
When you create the window it is hidden by default.
Try adding $window->Show();
-Pete
-Original Message-
From: Bored is me [mailto:[EMAIL PROTECTED]
Sent: Tuesday, May 06, 2003 3:56 PM
To: perl-win32-gui-users@lis
There may be a better way, but here are two possible ways:
### THIS WILL BRING UP THE SAME PRINT WINDOW AS USED BY WEB BROWSER
$dll = "$ENV{'WINDIR'}/System32/mshtml.dll";
system("rundll32.exe $dll,PrintHTML $file");
-OR-
### THIS MAY OR MAY NOT GIVE THE BEST RESULTS
sys
I don't believe destroying the window will regain the memory, so a simple
Hide() may suffice. Generally what I'll do when I want to permanently get
rid of it, though, is to localize the building of that window and all
associated $vars within a subroutine. Then, Hide() the window before you
return.
Take a look at where you put your Win32::GUI::Dialog(); line. I believe it
will remain an hourglass until you give the control over to the user input.
-Original Message-
From: Cruickshanks, Darin [mailto:[EMAIL PROTECTED]
Sent: Tuesday, April 15, 2003 5:10 AM
To: Perl-Win32-Gui-Users
Subj
You've set up the _Timer properly. Perhaps you can share some more code?
Also, you never finished your DialogBox question.
-Original Message-
From: Christian Kappler [mailto:[EMAIL PROTECTED]
Sent: Friday, April 11, 2003 4:58 AM
To: Perl-Win32-GUI Mailinglist
Subject: [perl-win32-gui-us
rc [mailto:[EMAIL PROTECTED]
Sent: Monday, April 07, 2003 12:23 PM
To: Peter Eisengrein; perl-win32-gui-users
Subject: Re: [perl-win32-gui-users] How "reset" a windows ?
I 'va somethink like this :
$add_ok=0;
if ($nbr_imp<450){$add_ok=1}
$Win_select_srv-&g
It you just want to hide button it is as easy as $Button->Hide(); If this is
not what you mean, please ask again and show some code.
-Original Message-
From: NAHUM Marc [mailto:[EMAIL PROTECTED]
Sent: Monday, April 07, 2003 6:31 AM
To: perl-win32-gui-users
Subject: [perl-win32-gui-users] H
Try adding WS_VSCROLL to the -style on your Listview. Not sure if that will
work or not.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]
Sent: Friday, March 21, 2003 1:39 PM
To: Peter Eisengrein
Cc: 'perl-win32-gui-users@lists.sourceforge.net'
Subject: RE: [
Found it. Put this at the top of your ScanButton_Click sub to clear the
listview each time.
$MainWin->ListView->Clear();
-Original Message-
From: Peter Eisengrein
Sent: Thursday, March 20, 2003 4:55 PM
To: '[EMAIL PROTECTED]';
perl-win32-gui-users@lists.sourceforge
Not sure about refreshing the listview. But to get some more control between
events you can try adding
$MainWin->Update();
$MainWin->DoEvents();
into sub ScanButton_Click. I tried it just above your InvalidateRect line
and it seemed to work pretty well. You should definitely add
How about setting -topmost => 1 ?
-Original Message-
From: Dave Crawford [mailto:[EMAIL PROTECTED]
Sent: Friday, March 14, 2003 11:27 AM
To: Win32GUI; [EMAIL PROTECTED]
Subject: Re: [perl-win32-gui-users] Moving a DialogBox to the forground
Thanks for the tip but still no joy. I replaced
text => "Hello, world");
$main->Show();
Win32::GUI::Dialog();
sub Main_Terminate {
-1;
}
-
Looks simple enough, but causes DrWatson to kill perl.exe.
AddLabel seems to be the culprit.
Does anyone have a solution, or should I just refran from using AddLabel?
/Peter
Thanks for the tip. Still not quite what I'm after. I currently use WRQ's
Reflections to connect and log the info. I wrote a server that runs on that
machine to hand off the data in the log file to other systems. However, this
requires someone to manually change the log file each day and, well, sim
Before I go and re-invent the wheel I figured I'd ask if anyone has a simple
script to connect to a PC's COM port, listen, and log to a file whatever
data it receives. Anyone have anything like that they'd be willing to share?
TIA,
Pete
when you create your DialogBox, use option:
-topmost => 1,
-Original Message-
From: Steven Swenson [mailto:[EMAIL PROTECTED]
Sent: Monday, February 03, 2003 7:39 PM
To: Win32GUI
Subject: [perl-win32-gui-users] Topmost Windows?
How does one get a window to sit on top?
I tried the foll
Is there a file extension currently in use for Win32::GUI scripts? If so,
what? If not, should there be? I know it would make it easier (for me :) to
list just those scripts if they used a different extension than the standard
.pl . It would also make it easier to know when to use perl and when to
Does it do anything else besides use the timers to trigger events? I'm
wondering if it gets hung up somewhere else in the code that you can maybe
add a DoEvents() or Update()
-Original Message-
From: Jonathan Southwick [mailto:[EMAIL PROTECTED]
Sent: Thursday, January 16, 2003 12:28 PM
To:
is in development and will be out soon."
What is "soon"? Is there any development?
Sincerely
Peter
(I use Win32::GUI 0.0.665 with Win98, Activestate Perl 5.6.1 build 633.)
The script below outputs the correct $number (hash key) but for some reason
it also outputs the value. What gives?
-Pete
###
use strict;
my %countother;
print "File: ";
chomp(my $file=);
open(FILE,$file) || die "can't open file : $!\n";
foreach ()
{
chomp
Not sure of the exact syntax but it would be something like:
if ($Window->GetFocus())
{
&do_something;
}
> -Original Message-
> From: Jonathan Southwick [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, November 13, 2002 11:45
> To: perl-win32-gui-users@lists.sourceforge.net
> Subjec
How can I change the color of a font? I'd expect it to be something like:
our $Font = new Win32::GUI::Font(
-name => "Arial",
-height => 24,
-color => 'Red',
-bold => 1,
);
but it doesn't work.
TIA,
Pete
sday, October 30, 2002 14:19
To: 'Peter Eisengrein'; Magnone, Angelo; [EMAIL PROTECTED]
Sourceforge. Net (E-mail)
Subject: RE: [perl-win32-gui-users] force a "tab selection" from a tabstri p
I believe this will only "show" the actual tab you selected. I'm using GU
$tabstrip1->Select(0); # selects the 1st tab
$tabstrip1->Select(1); # selects the 2nd tab
$tabstrip1->Select(2); # selects the 3rd tab
...etc...
-Original Message-
From: Magnone, Angelo [mailto:[EMAIL PROTECTED]
Sent: Wednesday, October 30, 2002 13:51
To: [EMAIL PROTECTED] Sourceforge.
my ($DOS) = Win32::GUI::GetPerlWindow();
Win32::GUI::Hide($DOS);
You can also Win32::GUI::Show($DOS); it if you want to (I find this useful
in debugging, so I'll usually add some *secret* way to do this (like type
"debug on" within a RichEdit or Textbox -- shhh, top secret!).
> -Original Me
from the docs...
new Win32::GUI::Window(%OPTIONS)
Creates a new Window object. Class specific %OPTIONS are:
-minsize => [X, Y]
specifies the minimum size (width and height) in pixels;
X and Y must be passed in an array reference
-maxsize => [X, Y]
specifies the maximum size (wid
Hello!
>http://cpan.org/modules/by-category/22_Microsoft_Windows_Modules/Win32/IFROL/
Great! Is there a ppm-distribution available, too?
Regards,
Peter
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
Darek Adamkiewicz
Sent: Saturday, October 26, 200
I've only seen it done with a system() call to rundll32.exe. Something like
this:
# untested
$dll = "/Winnt/System32/mshtml.dll";
system("rundll32.exe $dll,PrintHTML $file");
-Original Message-
From: Magnone, Angelo [mailto:[EMAIL PROTECTED]
Sent: Wednesday, October 23, 2002 13
> For me, I would just have to say Thanks Aldo, your work has
> made mine much
> better!
>
Same here! If he is so unhappy with it, let him write his own GUI module.
Thanks Aldo,
Pete
this ought to work...
if ($Window->IsVisible)
{
$Button->Disable();
}
-Original Message-
From: Magnone, Angelo [mailto:[EMAIL PROTECTED]
Sent: Tuesday, October 22, 2002 11:30
To: [EMAIL PROTECTED] Sourceforge. Net (E-mail)
Subject: [perl-win32-gui-users] double click buttons
An
I do not have a 'C' compiler on the NT machine I need to run perl on. I
downloaded the NT executables for 5.8 from cpan. Is there a similar
distribution for the GUI interface?
Thanks
from the GUI sample script (should've come with the Module), textfield.pl
my $C = new Win32::GUI::Cursor("harrow.cur");
$Window->ChangeCursor($C);
$Window->Reset->ChangeCursor($C);
-Pete
-Original Message-
From: Motesicky Alojz [mailto:[EMAIL PROTECTED]
Sent:
s
-events => {
Change => sub { MainWindow_Tab_Click(); }
}
sub MainWindow_Tab_Click {
# empty!!!
}
I use ActiveState Perl Binary build 633. Is there any solution?
Sincerely,
Peter
Not sure why it's not working, without seeing some code. Checkout the
'listbox.pl' in the samples that should've come with the module. That works
just fine. Let me know offline if you don't have it and I'll send it to you.
-Original Message-
From: Burley, David [mailto:[EMAIL PROTECTED]
Se
Besides resizing the window, you need to move the other objects, using
something like this:
$Window->Logo->Move($Window->ScaleWidth-325,0);
This is actual piece of code. It moves a bitmap 'Logo' 325 pixels to the
left of the right side but does not move it up or down when the window is
resized.
Assuming $menu 'PopUpMenu' already exists, then do the following:
my ( $x, $y ) = Win32::GUI::GetCursorPos ();
$Window->TrackPopupMenu( $menu -> {'PopUpMenu'}, $x, $y );
-Original Message-
From: moo cow [mailto:[EMAIL PROTECTED]
Sent: Monday, August 26, 2002 22:28
To: perl-win32-gui-us
The subs are called by events, such as Click, RightClick, etc. Any handle
such as Hello (which in this case is defined as the name of the button) can
have one or more of these actions assigned to them. The convention for these
subs is Name_Event where _Event is appended to the widget's name, i.e.
H
ed to check for incoming
messages in a file.
Cheers,
Peter
oils the whole thing...
Could you please help with better ideas how to
accomplish this?
TIA and Cheers,
Peter
First you set up your $menu. Then it is done something like this... I have a
script that does this when a user Click's on a NotifyIcon, so within the sub
ni_Click there is:
my ( $nipx, $nipy ) = Win32::GUI::GetCursorPos ();
$Window->TrackPopupMenu( $menu -> {'PopUpMenu'}, $nipx, $nipy );
HTH,
Pe
Try this... is this what you mean?
-Pete
##
#!perl -w
use Win32::GUI;
use strict;
my $counter=1;
my $Menu = new Win32::GUI::Menu(
"&File" => "File",
" > &Counter $counter..." => "Counter",
);
my $MW = new Win32::GUI::Window(
-title => 'menu.pl',
-left
> Anyway, the Message shortcuts are stored (sorted) in a
> Message menu. When
> they click on the message shortcut the text of the message is
> placed in a
> message box for them. That part all works. The user is able
> to add their
> own message shortcuts to the menu but they don't appea
een scrolled).
Btw I managed to migrate my application from version 558 to 655
and for me the problems with RichEdit controls persisted :-(
Peter
-Original Message-
From: Jonathan Southwick [mailto:[EMAIL PROTECTED]
Sent: Montag, 10. Juni 2002 14:31
To: 'perl-win32-g
1 - 100 of 233 matches
Mail list logo
