It works for me! Are you saying you don't see the menu at all?
Jonathan Southwick
Technical & Network Services
Allegheny College
[EMAIL PROTECTED]
----- Original Message -----
From: "Koul Christian" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, January 05, 2001 6:44 AM
Subject: [perl-win32-gui-users] menu
> Hi,
>
> I am new in win32::GUI and i have problem using menu.
> I have this but i can not see the menu. can somebody help me?
>
> -------------------------------------------
> use Win32::GUI;
>
> $Menu = new Win32::GUI::Menu(
> "&File" => "File",
> " > &Load" => "FileLoad",
> );
>
> $Frame = new Win32::GUI::Window(
> -name => "aFrame",
> -top => 100,
> -left => 150,
> -width => 350,
> -height => 400,
> -title => "Test Win32::GUI",
> -menu => $Menu,
> );
> $Frame->AddTextfield(
> -name => "aTextField",
> -top => 200,
> -left => 20,
> -height => 20,
> -width => 300,
> -prompt => "Type a text here : ",
> );
> $Frame->AddButton(
> -name => "aButton",
> -text => "OK",
> -top => 260,
> -left => 150,
> -height => 25
> -width => 50,
> );
>
> $Frame->AddStatusBar();
> $Frame->Show();
>
> Win32::GUI::Dialog();
>
> sub aFrame_Terminate {
> -1;
> }
>
> -------------------------------------------
>
>
> --
>
> Sincerely.
> __________________
>
> Christian Koul
> Civil Engineer
> Unité Statistique - Fucam
>
>
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> [email protected]
> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
