Menu
▾
▴
perl-win32-gui-users
|
From: Koul C. <chr...@fu...> - 2001-01-05 11:42:26
|
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 =3D new Win32::GUI::Menu(
"&File" =3D> "File",
" > &Load" =3D> "FileLoad",
);
$Frame =3D new Win32::GUI::Window(
-name =3D> "aFrame",
-top =3D> 100,
-left =3D> 150,
-width =3D> 350,
-height =3D> 400,
-title =3D> "Test Win32::GUI",
-menu =3D> $Menu,
);
$Frame->AddTextfield(
-name =3D> "aTextField",
-top =3D> 200,
-left =3D> 20,
-height =3D> 20,
-width =3D> 300,
-prompt =3D> "Type a text here : ",
);
$Frame->AddButton(
-name =3D> "aButton",
-text =3D> "OK",
-top =3D> 260,
-left =3D> 150,
-height =3D> 25
-width =3D> 50,
);
$Frame->AddStatusBar();
$Frame->Show();
Win32::GUI::Dialog();
sub aFrame_Terminate {
-1;
}
-------------------------------------------
--
Sincerely.
__________________
Christian Koul
Civil Engineer
Unit=E9 Statistique - Fucam
|
|
From: Koul C. <chr...@fu...> - 2001-01-05 14:52:30
|
Hi,
it's work with this (copied from From: Vince
Subject:
[perl-win32-gui] Code
Date: Wed, 14
Oct 1998 16:54:06 -0700 (PDT) )
-----------------------------
use Win32::GUI;
$menu =3D Win32::GUI::MakeMenu(
"&File" =3D> "File",
" > &Load" =3D> "FileLoad",
);
$Frame =3D new Win32::GUI::Window(
-name =3D> "aFrame",
-top =3D> 100,
-left =3D> 150,
-width =3D> 350,
-height =3D> 400,
-title =3D> "Test Win32::GUI",
-menu =3D> $menu,
);
$Frame->AddTextfield(
-name =3D> "aTextField",
-top =3D> 200,
-left =3D> 20,
-height =3D> 20,
-width =3D> 300,
-prompt =3D> "Type a text here : ",
);
$Frame->AddButton(
-name =3D> "aButton",
-text =3D> "OK",
-top =3D> 260,
-left =3D> 150,
-height =3D> 25
-width =3D> 50,
);
$Frame->AddStatusBar();
$Frame->Show();
Win32::GUI::Dialog();
sub aFrame_Terminate {
-1;
}
------------------------------
--
Sincerely.
__________________
Christian Koul
Civil Engineer
Unit=E9 Statistique - Fucam
|
|
From: Jonathan S. <jso...@al...> - 2001-01-05 13:22:23
|
It works for me! Are you saying you don't see the menu at all?
Jonathan Southwick
Technical & Network Services
Allegheny College
jso...@al...
----- Original Message -----
From: "Koul Christian" <chr...@fu...>
To: <per...@ht...>
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 =3D new Win32::GUI::Menu(
> "&File" =3D> "File",
> " > &Load" =3D> "FileLoad",
> );
>
> $Frame =3D new Win32::GUI::Window(
> -name =3D> "aFrame",
> -top =3D> 100,
> -left =3D> 150,
> -width =3D> 350,
> -height =3D> 400,
> -title =3D> "Test Win32::GUI",
> -menu =3D> $Menu,
> );
> $Frame->AddTextfield(
> -name =3D> "aTextField",
> -top =3D> 200,
> -left =3D> 20,
> -height =3D> 20,
> -width =3D> 300,
> -prompt =3D> "Type a text here : ",
> );
> $Frame->AddButton(
> -name =3D> "aButton",
> -text =3D> "OK",
> -top =3D> 260,
> -left =3D> 150,
> -height =3D> 25
> -width =3D> 50,
> );
>
> $Frame->AddStatusBar();
> $Frame->Show();
>
> Win32::GUI::Dialog();
>
> sub aFrame_Terminate {
> -1;
> }
>
> -------------------------------------------
>
>
> --
>
> Sincerely.
> __________________
>
> Christian Koul
> Civil Engineer
> Unit=E9 Statistique - Fucam
>
>
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
|
|
From: Koul C. <chr...@fu...> - 2001-01-05 14:17:24
|
I still don't see the menu.
I have Win32-GUI 0.99 on Win95
and perl v5.6.0 built for MSWin32-x86-multi-thread (Binary build 620
provided by ActiveState).
Jonathan Southwick wrote:
> It works for me! Are you saying you don't see the menu at all?
>
> Jonathan Southwick
> Technical & Network Services
> Allegheny College
> jso...@al...
>
> ----- Original Message -----
> From: "Koul Christian" <chr...@fu...>
> To: <per...@ht...>
> 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 =3D new Win32::GUI::Menu(
> > "&File" =3D> "File",
> > " > &Load" =3D> "FileLoad",
> > );
> >
> > $Frame =3D new Win32::GUI::Window(
> > -name =3D> "aFrame",
> > -top =3D> 100,
> > -left =3D> 150,
> > -width =3D> 350,
> > -height =3D> 400,
> > -title =3D> "Test Win32::GUI",
> > -menu =3D> $Menu,
> > );
> > $Frame->AddTextfield(
> > -name =3D> "aTextField",
> > -top =3D> 200,
> > -left =3D> 20,
> > -height =3D> 20,
> > -width =3D> 300,
> > -prompt =3D> "Type a text here : ",
> > );
> > $Frame->AddButton(
> > -name =3D> "aButton",
> > -text =3D> "OK",
> > -top =3D> 260,
> > -left =3D> 150,
> > -height =3D> 25
> > -width =3D> 50,
> > );
> >
> > $Frame->AddStatusBar();
> > $Frame->Show();
> >
> > Win32::GUI::Dialog();
> >
> > sub aFrame_Terminate {
> > -1;
> > }
> >
> > -------------------------------------------
> >
> >
> > --
> >
> > Sincerely.
> > __________________
> >
> > Christian Koul
> > Civil Engineer
> > Unit=E9 Statistique - Fucam
> >
> >
> >
> > _______________________________________________
> > Perl-Win32-GUI-Users mailing list
> > Per...@li...
> > http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> >
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
--
Sincerely.
__________________
Christian Koul
Civil Engineer
Unit=E9 Statistique - Fucam
|
|
From: Aldo C. <da...@pe...> - 2001-01-05 15:00:50
|
Koul Christian wrote: > I still don't see the menu. > I have Win32-GUI 0.99 on Win95 please? I have never released version 0.99 ;-) to find out your Win32::GUI version number, use this: perl -MWin32::GUI -e "print Win32::GUI::Version;" cheers, Aldo __END__ $_=q,just perl,,s, , another ,,s,$, hacker,,print; |
|
From: Koul C. <chr...@fu...> - 2001-01-05 15:21:54
|
My previous version was http://www.ActiveState.com/PPMPackages/5.6 PPM> search Packages available from http://www.ActiveState.com/PPMPackages/5.6: Win32-API [0.01 ] Implementation of arbitrary Win32 APIs. Win32-AdminMisc [0.10 ] Performs various Win32 administrative tasks that are not addressed by Win32::NetAdmin. Win32-DDE [0.02 ] Perl extension for Win32 DDE. Win32-GUI [0.99 ] Win32 Graphical User Interface Extension Win32-Shell [0.03 ] A simple extension for displaying Windows message boxes and ......... I made the update at dada.perl.it/PPM and now it is C:\Perl\koul> perl -MWin32::GUI -e "print Win32::GUI::Version; 0.0.502 Aldo Calpini wrote: > Koul Christian wrote: > > I still don't see the menu. > > I have Win32-GUI 0.99 on Win95 > > please? I have never released version 0.99 ;-) > to find out your Win32::GUI version number, use this: > > perl -MWin32::GUI -e "print Win32::GUI::Version;" > > cheers, > Aldo > > __END__ > $_=3Dq,just perl,,s, , another ,,s,$, hacker,,print; > > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Per...@li... > http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users -- Sincerely. __________________ Christian Koul Civil Engineer Unit=E9 Statistique - Fucam |
Thanks for helping keep SourceForge clean.
X