Here's what I've done. I'm not sure that this is the *correct* way of
creating the rebar but it seems to work for me. I copied it from the
example code. It does use the -style flag but I'm not sure how to do it
without setting that manually.
Jeremy Blonde
Win32::GUI::Rebar->new(
$Window,
-name => "Rebar",
-pos => [ 0, 0 ],
-size => [ 0, 0 ],
);
my $toolbar = $Window->AddToolbar(
$Window->Rebar,
-name => "ToolBar",
-style => 2048 + 8 + 4,
);
$toolbar->SetBitmapSize(40,40);
$toolbar->AddButtons(
6,
0, 1, 4, 0, 0,
1, 2, 4, 0, 1,
2, 3, 4, 0, 2,
3, 4, 4, 0, 3,
4, 5, 4, 0, 4,
5, 6, 4, 0, 5,
);
$Window->Rebar->InsertBand(
-minwidth => 50,
-minheight => 50,
-child => $toolbar,
-bitmap => $BUTTONS,
);
----- Original Message -----
From: "Forhan, Michael" <[EMAIL PROTECTED]>
To: "'Andrew Kincaid'" <[EMAIL PROTECTED]>
Cc: <[email protected]>
Sent: Wednesday, June 27, 2001 1:21 PM
Subject: RE: [perl-win32-gui-users] Rebar
> Thank you for sending me the webpage, unfortunately it hasn't been much
help
> to me (I haven't been able to display the bar, or anything on it). I
> originally was using:
> http://velocity.activestate.com/code/cpan/w/wi/Win32-GUI.html
>
> to look up information for Win32::GUI, but I'm really looking for an
example
> that works, so I can see where my code is wrong. I apologize for not
posting
> my code, as I'm sure that would be helpful, but I am unable to do that at
> this time.
>
> Thanks for all your time and effort,
> -Mike
> [EMAIL PROTECTED]
>
> -----Original Message-----
> From: Andrew Kincaid [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, June 27, 2001 10:48 AM
> To: [EMAIL PROTECTED]
> Subject: Re: [perl-win32-gui-users] Rebar
>
>
> There is documentation included in the Win32::GUI 0.0.558 distribution on
> Rebar. I have attached the Rebar.html out of that package in case you
don't
> have it.
>
> Andrew Kincaid
> Lead PC Systems Specialist, IS&T
> Georgia State University
> [EMAIL PROTECTED]
>
>
> >>> [EMAIL PROTECTED] 06/27/01 10:54AM >>>
> I have been looking for the window elements that are mobile in a window
> (like the toolbars in IE, and MS Office Products), and have figured from
the
> description that what I want is a 'Rebar'. I've been having a tough time
> getting this item to work, and was hoping that someone could post an
> example, perhaps with a bit of information on how it works. Unfortunately,
> the site I'm at currently has very limited internet access, (thank god I
can
> still reach CPAN & ActiveState! ) so it'd be best to include attachments ,
> rather than links (though links would probably also be good for people
> browsing this list.)
>
> Thank you for all of your trouble :)
> -Mike
> [EMAIL PROTECTED]
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> [email protected]
> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
>
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> [email protected]
> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com
