From: "Frazier, Joe Jr" <[EMAIL PROTECTED]>
To: "Jeremy White" <[EMAIL PROTECTED]>
CC: <perl-win32-gui-users@lists.sourceforge.net>
Subject: RE: [perl-win32-gui-users] Tooltips - do they work?
Date: Mon, 7 Jul 2003 07:18:09 -0400
Jeremy, try this. It works on my machine (Win2k, AP 626). Just mouse over
the button and the tip should should up in a few seconds. BTW, I have been
able to dynamically change tip's within a systray menu, but have not tried
on a standard control (button, etc).
use Win32::GUI;
my $Window = new Win32::GUI::Window (
-name => "Window",
-topmost => 1,
-left => 300,
-dialogui => 1,
-top => 400,
-width => 222,
-height => 235,
-text => "Test",
# ....
-events =>
{
Terminate => sub { print "Dying\n"; return -1 },
#Activate => sub { print "here I am!\n"; },
},
#-onMinimize => sub { print "no please!\n"; },
);
$Window->AddDateTime(
-top => 1,
-left => 1,
-width => 180,
-height => 25,
-name => "dateFromT",
-events =>
{
#Click => sub { print "Got a Click\n"; },
LostFocus => sub { print "Lost Focus\n"; },
},
-onClick => sub { print "Got a Click\n"; },
-onChange => sub { print "Got a Click\n"; },
);
$Window->AddButton(
-name =>"but",
-top => '30',
-left => '1',
-text => "TipTest",
-tip => "This is a Tip!",
-width => 150,
-height => 25,
);
#$Window->dateFromT->CheckBox(1);
$Window->dateFromT->Format('MM/dd/yyyy HH:mm:ss');
$Window->Enable();
$Window->Show();
Win32::GUI::Dialog;
Joe Frazier, Jr.
Technical Support Engineer
Peopleclick Service Support
Tel: +1-800-841-2365
E-Mail: mailto:[EMAIL PROTECTED]
> -----Original Message-----
> From: Glenn Linderman [mailto:[EMAIL PROTECTED]
> Sent: Saturday, July 05, 2003 4:36 PM
> To: Jeremy White; perl-win32-gui-users@lists.sourceforge.net
> Subject: Re: [perl-win32-gui-users] Tooltips - do they work?
>
>
> On approximately 7/5/2003 1:03 PM, came the following characters from
> the keyboard of Glenn Linderman:
>
> > On approximately 7/5/2003 9:51 AM, came the following
> characters from
> > the keyboard of Jeremy White:
> >
> >>> From: Glenn Linderman <[EMAIL PROTECTED]>
> >>>
> >>> Unfortunately, the examples that I have are not suitable
> for including
> >>> in documentation, as I pass things through a couple
> layers of wrappers
> >>> before it gets to a real Win32::GUI call. But the gist
> of it is just
> >>> to add
> >>>
> >>> -tip => 'Configuration options menu',
> >>>
> >>
> >> Thanks for the reply - I created a simple window, with one
> button with
> >> the tip option included. Still nothing
tried it under 5.6,
> and 5.8,
> >> both with 665. Im on XP. Do I need to create event handlers or
> >> anything? I am just being stupid!?
> >>
> >> Perhaps, I should say what I think should happen - just in
> case Im
> >> barking up the wrong tree - when the mouse hovers over the
> button, the
> >> little yellow box should appear with the text that was
> specified in
> >> the -tip option?
> >
> >
> > Indeed, that is the sort of behavior you should expect, and
> that I get,
> > with Win2K SP3 or SP4 (worked on both), Perl 5.8 build 805,
> Win32::GUI
> > build 0.0.665.
>
> Oh, and maybe I should mention that tooltips don't _always_
> show up. It
> seems that if another process is consuming all the CPU cycles, that
> tooltips are not displayed during that time. Maybe it is some
> "benevolent" way of shedding CPU activity since it is so
> loaded already?
> However, when I'm using a program that has tooltips, and they don't
> show up, I get aggravated.... but I do have a program that
> periodically
> slurps up all my CPU cycles, so I guess it is my own fault...
> but still,
> I think the tooltips should show up if you leave your mouse
> there long
> enough.
>
> --
> Glenn -- http://nevcal.com/
> ===========================
> Like almost everyone, I receive a lot of spam every day, much of it
> offering to help me get out of debt or get rich quick. It's
> ridiculous.
> -- Bill Gates
>
>
>
> -------------------------------------------------------
> This SF.Net email sponsored by: Free pre-built ASP.NET sites including
> Data Reports, E-commerce, Portals, and Forums are available now.
> Download today and enter to win an XBOX or Visual Studio .NET.
> http://aspnet.click-url.com/go/psa00100006ave/direct;at.asp_06
> 1203_01/01
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
>
-------------------------------------------------------
This SF.Net email sponsored by: Free pre-built ASP.NET sites including
Data Reports, E-commerce, Portals, and Forums are available now.
Download today and enter to win an XBOX or Visual Studio .NET.
http://aspnet.click-url.com/go/psa00100006ave/direct;at.asp_061203_01/01
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
