1. Win32Lib - MenuItem
- Posted by MiCkeY <mickeysc at ZAZ.COM.BR>
Dec 01, 1999
-
Last edited Dec 02, 1999
------=_NextPart_000_0027_01BF3C3F.468523C0
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Does anybody here know how can I create MenuItem in MenuItem?
--/--
ie:
-File
--Print
---Print
---Setup
--/--
Thanks,
Lu=EDs Fernando
------=_NextPart_000_0027_01BF3C3F.468523C0
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-1" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Does anybody here know how can I create =
MenuItem in=20
MenuItem?</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>--/--</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>ie:</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>-File</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>--Print</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>---Print</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>---Setup</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>--/--</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>Thanks,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Lu=EDs =
------=_NextPart_000_0027_01BF3C3F.468523C0--
2. Re: Win32Lib - MenuItem
On Wed, 1 Dec 1999 21:01:45 -0200, MiCkeY <mickeysc at ZAZ.COM.BR> wrote:
>Does anybody here know how can I create MenuItem in MenuItem?
>
>--/--
>
>ie:
>
>-File
>--Print
>---Print
>---Setup
>
>--/--
>
>Thanks,
>Lu=EDs Fernando
>
Try this (untested code follows!)
without warning
include win32lib.ew
global constant
MainWin =3D create(Window,"Main Window", 0, Default, Default, 640, 480, 0),
FileMenu =3D create(Menu,"&File", MainWin, 0, 0, 0, 0, 0),
PrintMenu =3D create(Menu,"&Print", FileMenu, 0, 0, 0, 0, 0),
PrintMenuItem =3D create(MenuItem,"&Print", PrintMenu, 0, 0, 0, 0, 0),
SetupMenuItem =3D create(MenuItem,"&Setup", PrintMenu, 0, 0, 0, 0, 0)
WinMain(MainWin, Normal)
-- end code
That should do it...
Brian