carollyne courtney wrote:
>
> I'm trying to lauch a windows help file(.hlp) from a
> Win32::GUI::Menu as follows:
>
try this:
sub helpme_Click {
my $path=$_[0];
my $whelp = new Win32::API ('user32', 'WinHelp', [N,P,I,N], I) or die
'can\'t find WinHelp function';
my $string="$path\\winnt.hlp";
$whelp->Call (0, $string, 3, '');
return 0;
}
--
$_=q,6;-16;-1;-8;0;7;-13;-12;-9;-3;13#4A75737420616E6F74686572,,($_,$b)=
split?#?;@b=split?;?;map{$c.=$_,$d.=chr$b[$e++]+ord}split??,pack'H24',$b
;chop$d,print$c.chr(32).$d
