Hi,
The correct usage is:
$status-Parts(x1,x2,x3,x4,x5...);
I'm sorry if the docs were confusing. This takes a list, not a list reference.
Also it does not take widths, it takes the X co-ordinate of the right-hand
edge of each part. This is true to the actual API functionality, which is kind
Hi,
The code below creates a status bar with 3 parts. If run in the samples
directory, will place an icon in one of the parts.
Cheers,
jez.
use Win32::GUI;
use strict;
my $Icon = new Win32::GUI::Icon(camel.ico);
my $W = new GUI::Window(
-title= Win32::GUI::status
Forgot the example - I need a coffee:)
==
use Win32::GUI;
use strict;
#create a dummy menu
my $Menu = new Win32::GUI::Menu(
File = File,
New,
Open,
Save,
Save As,
Close,
);
#create the main window
my $mainwindow = new
Have you tried $label-SetImage($win32_gui_bitmap_object)? I find that
this doesnt do anything unless you force the image to update. You can do
this with:
$label-Redraw(0x0001 | 0x0100);
Which invalidates the label rect (0x0001 = RDW_INVALIDATE) - you could
also use InvalidateRect to do this -
Hi Steve, Jez,
Thanks Steve. Now its all clear ;-) Got confused with the MSDN which had
Parts(nParts[array of widths]). Should have spotted the X co-ordinate in
'x1' Doh!
And now Jez has answered my next question with his post, which was how are
the parts referenced... hours of fun coming up,
Okay, I have a window, but I'm not sure how to make it so I can move it.
$Wmain = Win32::GUI::Window-new(
-name = 'winamp',
-top = ($screen_heigth - 116)/2,
-left = ($screen_width - 275)/2,
-maxsize =
Hiya Jez,
On the subject of adding missing options...
The other night you were also adding the toolbar to the rebar... Prior to
the NEW builds that have been done lately, the tooltips did not work on the
buttons that were added to a toolbar... have you played with this lately?
and know if they
I have to write a unix shell script which does recursive grep...It
should be an enhancement over Grep. i.e. It should support all the
functionalities of Grep.
Please tell me how to do that
I am trying.using 'find'..'grep''$@' etcPlease Help
Mayank
Hey here's an idea!
man grep
Wow!
-r, --recursive
Read all files under each directory, recursively;
this is equivalent to the -d recurse option.
Also manifests itself as the rgrep command. RTFM next time. Don't post
dumb questions to this list. Post them to perlmonks. Is
Not a problem!
Give your label the -notify = 1 option. Now when you click it, it'll
generate a WM_LBUTTONDOWN message.
Make a new global variable called $MBUTTON:
our $MBUTTON = 0;
Give your label an -onMouseDown event, and in the event handler, you
want to:
sub mousedown {
I just know you're going to start asking how to put progress bars in there.
Basically, there's a way of obtaining the rectangle of a specific part
($statusbar-GetRect($part)). I'm pretty sure that to insert a progress bar
into the status bar you simply make a new progress bar with the status
Strange, i have LVIF_INDENT constant define in mingw commctrl.h file.
Do you have it in your commctrl.h file ?
I build it without problem on my Win98SE with perl56 and perl58.
Laurent
Hi All,
Have 'checked out' the latest source code - branch Win32-GUI-0_0_670-fix
from SourceForge CVS
Chris,
I, too, am using MinGW and nmake to build the module following Laurent's
instructions and had no problem with the latest CVS update this morning.
I am running XP Pro. The only thing I noticed was that you mentioned a
Win32-GUI-0_0_670-fix branch. I don't believe there is such a branch.
Was
Dear list,
I have functional Perl (5.6) application, with a lot of things done using
TGL/Loft. It worked find with 665 and people who use it on daily basis were
very happy to have executable and don't bother with Perl at all. Perl2exe
nicely accepted everything. I've upgraded to 670 (upgraded TGL
Ross Clunie Wrote:
I had the same problem. Got everything working properly by
commenting out
use base Win32::GUI::Window
in the ToolbarWindow.pm located in /Perl/site/lib/Win32/GUI
Hope this works or you.
Regards
Ross Clunie.
Dear list,
On approximately 1/16/2004 8:26 AM, came the following characters from
the keyboard of Stephen Pick:
You must handle all scrolling yourself, as i've said a million times. I
will look into MDIs when I have the time; win32::gui already seems to
have an MDI object but I'm unsure of what it does.
Okay, is there a way to implement freeform windows yet, so I can have
windows that are round, and other odd shapes??
How do I make a label background transparent?
Let me make that Transparent controls, I would like to be able to see my
background behind my labels and progress bar, and such.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Chris
Sent: Monday, January 19, 2004 8:00 PM
To:
19 matches
Mail list logo