Your example works fine for me on Windows 2000. What OS and version of Win32::GUI are you testing on?

Brian

Micah Wilson wrote:
Here's my test code:

#!/usr/bin/perl
use strict;
use Win32::GUI;

my $mw = new Win32::GUI::Window (
 -title    => "test",
 -pos      => [600, 600],
 -size     => [100, 100],
 -name     => "Window",
);
my $tooltip1 = Win32::GUI::Tooltip->new( -parent => $mw,
                                         -name   => "tooltip1",
                                       );
$tooltip1->AddTool( -window => $mw,
                    -text   => "Text that pops up",
                  );
$tooltip1->Activate();
$mw->Show();
Win32::GUI::Dialog();

sub Window_Terminate { -1 }

This should generate a simple tooltip when I hover the mouse over the main window, yet nothing happens. I'm not sure what I am missing here. ;_;

------------------------------------------------------------------------- This SF.net email is sponsored by: Splunk Inc. Still grepping through log files to find problems? Stop. Now Search log events and configuration files using AJAX and a browser. Download your FREE copy of Splunk now >> http://get.splunk.com/

_______________________________________________ Perl-Win32-GUI-Users mailing list Perl-Win32-GUI-Users@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users http://perl-win32-gui.sourceforge.net/


-- 
Brian, Tommy, Helen and Paka -- bmillham@hughes.net
This message traveled at least 44,000 miles to reach you!



avast! Antivirus: Outbound message clean.

Virus Database (VPS): 071114-0, 11/14/2007
Tested on: 11/14/2007 9:44:44 PM
avast! is copyright (c) 2000-2007 ALWIL Software.