Xailer & OZ Software

Is there a way to disable dropdown items (or nested items) in TMenu ?
I can only disable the top level (e.g. File) items.
What is purpose of CheckState() ?
What will happened if I omitted a CheckState command ?
Thanks again.
David

Hello Everyone,
Can someone give me a hand please ?
What is the relationship of MENU command & TMENU Class ?
From the "Command" section of the help file,
#xcommand MENUITEM [ <oItem> <x: CAPTION,TEXT> ] <cText> [ <action:
ACTION, ONCLICK, ON CLICK> <OnClick> ] [ MENU <oSubMenu> ] ;
[ <lDisabled: DISABLED> ] ;
[ <lChecked: CHECKED> ] ;
[ <lGrayed: GRAYED> ] ;
[ <lHilited: HILITED> ] ;
[ <lDefault: DEFAULT> ] ;
[ WHEN <bWhen> ] ;
[ BITMAP <cBitmap> ] ;
[ MESSAGE <cMsg> ] ;
[ <lRight: RIGHT> ] ;
=> ;
[ <oItem> := ] XA_MenuItem( <cText>,
[{|oSender,oMenu|<OnClick>}], [<oSubMenu>],
!<.lDisabled.>, <.lChecked.>, <.lGrayed.>, <.lHilited.>, ;
<.lDefault.>, [<cBitmap>], [ <{bWhen}> ], [ <cMsg> ], [
<.lRight.> ] )
There seems to be a way to disable any item within a menu.
Can I 'grey out' an/any item ?
Thanks
David
david fung wrote:
>
>
> Is there a way to disable dropdown items (or nested items) in TMenu ?
> I can only disable the top level (e.g. File) items.
>
>
> What is purpose of CheckState() ?
> What will happened if I omitted a CheckState command ?
>
>
> Thanks again.
>
> David

Hello Everyone,
Can someone give me a hand please ?
What is the relationship of MENU command & TMENU Class ?
From the "Command" section of the help file,
#xcommand MENUITEM [ <oItem> <x: CAPTION,TEXT> ] <cText> [ <action:
ACTION, ONCLICK, ON CLICK> <OnClick> ] [ MENU <oSubMenu> ] ;
[ <lDisabled: DISABLED> ] ;
[ <lChecked: CHECKED> ] ;
[ <lGrayed: GRAYED> ] ;
[ <lHilited: HILITED> ] ;
[ <lDefault: DEFAULT> ] ;
[ WHEN <bWhen> ] ;
[ BITMAP <cBitmap> ] ;
[ MESSAGE <cMsg> ] ;
[ <lRight: RIGHT> ] ;
=> ;
[ <oItem> := ] XA_MenuItem( <cText>,
[{|oSender,oMenu|<OnClick>}], [<oSubMenu>],
!<.lDisabled.>, <.lChecked.>, <.lGrayed.>, <.lHilited.>, ;
<.lDefault.>, [<cBitmap>], [ <{bWhen}> ], [ <cMsg> ], [
<.lRight.> ] )
There seems to be a way to disable any item within a menu.
Can I 'grey out' an/any item ?
Thanks
David
david fung wrote:
>
>
> Is there a way to disable dropdown items (or nested items) in TMenu ?
> I can only disable the top level (e.g. File) items.
>
>
> What is purpose of CheckState() ?
> What will happened if I omitted a CheckState command ?
>
>
> Thanks again.
>
> David

David,
> There seems to be a way to disable any item within a menu.
> Can I 'grey out' an/any item ?
Yes, of course. Just set the menuitem's property lEnabled to .F.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> There seems to be a way to disable any item within a menu.
> Can I 'grey out' an/any item ?
Yes, of course. Just set the menuitem's property lEnabled to .F.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> That is what puzzled me ? There is way, but where ?
>
> Where can I set them ? Within the IDE or thru Code ? Any simple
> illustration please.
If you use the IDE's menu editor, you can do it after the menu is created.
When you see the menu on the form, click on the desired item and it will
appear in the object inspector. Then, you can change any of its properties.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> That is what puzzled me ? There is way, but where ?
>
> Where can I set them ? Within the IDE or thru Code ? Any simple
> illustration please.
If you use the IDE's menu editor, you can do it after the menu is created.
When you see the menu on the form, click on the desired item and it will
appear in the object inspector. Then, you can change any of its properties.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

I see, thanks. How could I miss that !
In real life situation, these menu items are switched on/off in program
logics. What is the nested structure of TMenu. How to refer to them ?
Let use Xailer IDE as an example. How to gray out File->New->TXT ?
oMenu1:aItems[1]:aItems[1]:lEnabled := .f.
Regard,
David
Jose F. Gimenez wrote:
> David,
>
>> That is what puzzled me ? There is way, but where ?
>>
>> Where can I set them ? Within the IDE or thru Code ? Any simple
>> illustration please.
>
> If you use the IDE's menu editor, you can do it after the menu is created.
> When you see the menu on the form, click on the desired item and it will
> appear in the object inspector. Then, you can change any of its properties.
>

I see, thanks. How could I miss that !
In real life situation, these menu items are switched on/off in program
logics. What is the nested structure of TMenu. How to refer to them ?
Let use Xailer IDE as an example. How to gray out File->New->TXT ?
oMenu1:aItems[1]:aItems[1]:lEnabled := .f.
Regard,
David
Jose F. Gimenez wrote:
> David,
>
>> That is what puzzled me ? There is way, but where ?
>>
>> Where can I set them ? Within the IDE or thru Code ? Any simple
>> illustration please.
>
> If you use the IDE's menu editor, you can do it after the menu is created.
> When you see the menu on the form, click on the desired item and it will
> appear in the object inspector. Then, you can change any of its properties.
>

David,
> In real life situation, these menu items are switched on/off in program
> logics. What is the nested structure of TMenu. How to refer to them ?
> Let use Xailer IDE as an example. How to gray out File->New->TXT ?
>
> oMenu1:aItems[1]:aItems[1]:lEnabled := .f.
::oMenu1:aItems[1]:oMenu:aItems[1]:lEnabled := .F.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> In real life situation, these menu items are switched on/off in program
> logics. What is the nested structure of TMenu. How to refer to them ?
> Let use Xailer IDE as an example. How to gray out File->New->TXT ?
>
> oMenu1:aItems[1]:aItems[1]:lEnabled := .f.
::oMenu1:aItems[1]:oMenu:aItems[1]:lEnabled := .F.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

Dear Jose,
I got an error
Error BASE/1004 Message not found: TMENUITEM:OMENU
Arguments: ()
Regards,
David
Jose F. Gimenez wrote:
> David,
>
>> In real life situation, these menu items are switched on/off in program
>> logics. What is the nested structure of TMenu. How to refer to them ?
>> Let use Xailer IDE as an example. How to gray out File->New->TXT ?
>>
>> oMenu1:aItems[1]:aItems[1]:lEnabled := .f.
>
> ::oMenu1:aItems[1]:oMenu:aItems[1]:lEnabled := .F.
>

Dear Jose,
I got an error
Error BASE/1004 Message not found: TMENUITEM:OMENU
Arguments: ()
Regards,
David
Jose F. Gimenez wrote:
> David,
>
>> In real life situation, these menu items are switched on/off in program
>> logics. What is the nested structure of TMenu. How to refer to them ?
>> Let use Xailer IDE as an example. How to gray out File->New->TXT ?
>>
>> oMenu1:aItems[1]:aItems[1]:lEnabled := .f.
>
> ::oMenu1:aItems[1]:oMenu:aItems[1]:lEnabled := .F.
>

David,
> I got an error
>
> Error BASE/1004 Message not found: TMENUITEM:OMENU
> Arguments: ()
Sorry, my fault. The property name is oSubMenu, so the correct way is:
::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled := .F.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> I got an error
>
> Error BASE/1004 Message not found: TMENUITEM:OMENU
> Arguments: ()
Sorry, my fault. The property name is oSubMenu, so the correct way is:
::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled := .F.
--
Regards,
Jose F. Gimenez
http://www.xailer.com

Dear all,
Any material on OnCheckState Methods ? Any reference ?
Thanks
David
david fung wrote:
>
>
> Is there a way to disable dropdown items (or nested items) in TMenu ?
> I can only disable the top level (e.g. File) items.
>
>
> What is purpose of CheckState() ?
> What will happened if I omitted a CheckState command ?
>
>
> Thanks again.
>
> David

Dear all,
Any material on OnCheckState Methods ? Any reference ?
Thanks
David
david fung wrote:
>
>
> Is there a way to disable dropdown items (or nested items) in TMenu ?
> I can only disable the top level (e.g. File) items.
>
>
> What is purpose of CheckState() ?
> What will happened if I omitted a CheckState command ?
>
>
> Thanks again.
>
> David

Excellent ! and Thanks.
BTW can you tell me where you find the correct property name is
"oSubMenu", go thru the source code ? an documentation ?
Thanks
David
Jose F. Gimenez wrote:
> David,
>
>> I got an error
>>
>> Error BASE/1004 Message not found: TMENUITEM:OMENU
>> Arguments: ()
>
> Sorry, my fault. The property name is oSubMenu, so the correct way is:
>
> ::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled := .F.
>
>

Excellent ! and Thanks.
BTW can you tell me where you find the correct property name is
"oSubMenu", go thru the source code ? an documentation ?
Thanks
David
Jose F. Gimenez wrote:
> David,
>
>> I got an error
>>
>> Error BASE/1004 Message not found: TMENUITEM:OMENU
>> Arguments: ()
>
> Sorry, my fault. The property name is oSubMenu, so the correct way is:
>
> ::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled := .F.
>
>

David,
> Any material on OnCheckState Methods ? Any reference ?
It's documented in the help file:
TMenuItem:OnCheckState
Event that is produced when is displayed the menu that allows to
establish the element enable status.
Parameters:
<oSender>:
Object that triggers the event
Return value:
If returns .F. the menu element will be shown disabled.
In short words, it acts like the Clipper's WHEN clause
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> Any material on OnCheckState Methods ? Any reference ?
It's documented in the help file:
TMenuItem:OnCheckState
Event that is produced when is displayed the menu that allows to
establish the element enable status.
Parameters:
<oSender>:
Object that triggers the event
Return value:
If returns .F. the menu element will be shown disabled.
In short words, it acts like the Clipper's WHEN clause
--
Regards,
Jose F. Gimenez
http://www.xailer.com

This is a multi-part message in MIME format.
------=_NextPart_000_0009_01C6F2BF.7FB12930
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_000A_01C6F2BF.7FB12930"
------=_NextPart_001_000A_01C6F2BF.7FB12930
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Regards,=20
--=20
Ignacio Ortiz de Z=FA=F1iga
http://www.xailer.com
"david fung" <davfung@yahoo.com> escribi=F3 en el mensaje =
news:[email=45361990@news.xailer.com...]45361990@news.xailer.com...[/email]
> Excellent ! and Thanks.
>=20
> BTW can you tell me where you find the correct property name is=20
> "oSubMenu", go thru the source code ? an documentation ?
>=20
> Thanks
> David
>=20
>=20
>=20
> Jose F. Gimenez wrote:
>> David,
>>=20
>>> I got an error
>>>
>>> Error BASE/1004 Message not found: TMENUITEM:OMENU
>>> Arguments: ()
>>=20
>> Sorry, my fault. The property name is oSubMenu, so the correct way =
is:
>>=20
>> ::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled :=3D .F.
>>=20
>>
------=_NextPart_001_000A_01C6F2BF.7FB12930
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2963" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT face=3DArial size=3D2></FONT><IMG alt=3D"" hspace=3D0=20
src=3D"cid:000401c6f2ae$bc260f40$1700000a@ozlan.local" align=3Dbaseline=20
border=3D0></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Regards, </FONT></DIV>
<DIV><BR><FONT face=3DArial size=3D2>-- <BR>Ignacio Ortiz de =
Z=FA=F1iga<BR></FONT><A=20
href=3D"http://www.xailer.com"><FONT face=3DArial=20
size=3D2>http://www.xailer.com</FONT></A></DIV>
<DIV><FONT face=3DArial size=3D2>"david fung" <</FONT><A=20
href=3D"mailto:davfung@yahoo.com"><FONT face=3DArial=20
size=3D2>davfung@yahoo.com</FONT></A><FONT face=3DArial size=3D2>> =
escribi=F3 en el=20
mensaje </FONT><A href=3D"news:45361990@news.xailer.com"><FONT =
face=3DArial=20
size=3D2>news:45361990@news.xailer.com</FONT></A><FONT face=3DArial=20
size=3D2>...</FONT></DIV><FONT face=3DArial size=3D2>> Excellent ! =
and=20
Thanks.<BR>> <BR>> BTW can you tell me where you find the correct =
property=20
name is <BR>> "oSubMenu", go thru the source code ? an documentation=20
?<BR>> <BR>> Thanks<BR>> David<BR>> <BR>> <BR>> =
<BR>> Jose=20
F. Gimenez wrote:<BR>>> David,<BR>>> <BR>>>> I got =
an=20
error<BR>>>><BR>>>> Error BASE/1004Â Message not =
found:=20
TMENUITEM:OMENU<BR>>>> Arguments: ()<BR>>> <BR>>> =
Sorry, my=20
fault. The property name is oSubMenu, so the correct way is:<BR>>> =
<BR>>>ÂÂÂÂ=20
::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled :=3D .F.<BR>>>=20
<BR>>></FONT></BODY></HTML>
------=_NextPart_001_000A_01C6F2BF.7FB12930--
------=_NextPart_000_0009_01C6F2BF.7FB12930
Content-Type: image/png;
name="Image1.png"
Content-Transfer-Encoding: base64
Content-ID: <000401c6f2ae$bc260f40$1700000a@ozlan.local>
iVBORw0KGgoAAAANSUhEUgAAAo8AAAEUCAIAAADFu0sxAAAABmJLR0QAAAAA AAD5Q7t/AAAACXBI
WXMAAA7EAAAOxAGVKw4bAAAZnElEQVR4nO3dv27cyJbH8XqnzeYd7DeYdKDJ HQqDiRwZDg2sAGcD
aDHYwDBwQwPKlDhweBU6FLCB34BbVo3qHtWpf6xis4vV3w8IgTo8VWRTPfwN u1uyuQMAAGMzpQYA
AHBmptQAAADOzJQaAADAmZlSAwAAODNTagAA4BItK5Xm62JefFMn1f/p06dg dltJjR1B5qjevHmj
iwfy8eNH+xB++eUX9wBfv379xx9//P3336VxBat+jualwz09AFw4G8DG/Fa5 HCmtP3z4EMxuK6mx
I4ge1V9//eVCLj7mCGwwm4S3b9+WRudEz1hKsOvDPT0AXLhp0/rXX38NZreV 1NgRRI9qzEOt9/79
e5Nl/3ekNEeSn6TU+FOw38M9PQBcOJfWwcvdX79+9V/dirV3WofbStdQo6xt OK/oUY15qPVev37t
jt/eYf/rX/9yxU+fPvlo/P333/MzZKw6OUZZ2wAAZ+TS+utLPqGltrRevppS y3+Y3LbSNdQ32ABw
Kx8/fvRb7XqwVU9l48SGinvl2X616/rdTTnWzulT582bN/qN2NSOovWgaGJk /9qjtbe5LjvtV39H
a4tuBvtA9G1udL+OeyvaN9h1eba91Az24KObUv3FZv/o7MOxB5M5FQd9egC4 cPqVcH+33f9KuI1q
t5Qa/2Fy20qXMN/gX32VH87y0SJfm5XD7ZXXfwxKCjLM16NvxwZXZF+/eyla D4omxjevPVr9Mq+d
QT+E1PC7l/Rsjr5R9vfWdlPNi96pPUbrvhg9ntRjOejTA8CFc6nsyZC2678J a9PaR3V9YJvcttIl
zDfYC667Q7KXV7/VXWptPXU5jl6Lg0nkXqKCD2/7+t1L0XpQNDG+uf9oozME cevrsijvPrVghuB9
a3fj++HDB31X6vjOmrrJSp2Kgz49AFw4/0q4e4ta30x7q9I6iOrKwM51FC9h vsHewfhrrrv1sV/d
t7Zut+qpfL+9S3Nvr9qv/n5Lfn7Yj7WXaf9SqnxNOHpIdy/VN0eLDUfrO2Ua 2Rtfd7eXiijNv2Js
nk6m3/vbt299PXhJPJXudu/6xXO/tabui/JnYVd8skZPxUGfHgAunHzfWr/0 7TbZG+tV71tHo7om
sHObi5cw32AvuP53Z93vCPkssfXo5dgniv8klJxT3i/6sTJpNn8XNl9sOFr5 gm2+eJclXzEONvnX
fvVvh9tz5V8SD9hRstPXgxmidV8MUl++Ca2bD/r0AHDhgnvr4JXwhnvrTFQX Azu7rXQJ8w3uftHd
YNmQuHt+99S9aBm9HJss+WqnL6b2Xiyuas4Xo4pHW1/UfFuQW3cv/7pIbOjP BnsbKv9MiiODPzVD
tJ5qjm7ylYM+PQBcOJ/W7s1peYfti2vvrc1//ZZbfvuaHJjacFdxCfMN7nLs 7wL9nZa752u4HEc7
U3svFlc154splcOLRS3fVjnJ3VNy+xtWF5lOaoZoPbM7vclXDvr0AHDhNr+3 7mFy20qXMN/gLsf+
T1P512Dd+4vRy7G/20vM/R96bKbe3xwtdh5tfVHzbZl7a3+v6Y9TNzt6p6nD iNZ9Uc+fmfmgTw8A
Fy64tw5ur9vet25mcttKlzDf4C7H+s8+u88h59+YjP7SsKTHZuq+KOPEf6Yp 1Vwsdh5tfVHzu655
39rfv0b/znn0lXNfWXXGgj8jWnzf+u6ATw8AF07fW6ccJq39bwfJTzb5l1uj IeHvtOxdlP/slS/K
v1Kpx2bq/p7Mf5bK/91v3Vws+mt659HWF7VVnwmXzcFfLJGf3JZZ3nbGjAhs ObP8O+S+86BPDwAX
bhn274SH20qXMN0g/0KF/OxxdKrUL9Saus9OR+vyV3eiijPIo5IPoedoO4up P43iBLfR+V/OdmSK
t52xKHuK5D2rr/vKsZ4eAC5c4YZaKc3XxeS2lS5hukHe28nXMKNTyWap51eM 9Mut5uVfuSrOIC/o
8h6u52g7i3fpwI6+4p1Jd/lLyU7bGYv+P0Ews57hWE8PABiHyW0rXcJ0g/w9 1/xtlu+310r5xzI7
/3zH3dP7oD5xbW65F2yjzakZfBQFWdh8tJ1F5+PLf7L6TeLvhEebzdPRvn37 Nvrps7Yz9v79e/lH
ufN/wds51tMDAMZhSg0AAODMTKkBAACcmSk1AACAMzOlBgAAcGam1AAAAM7M lBoAAMCZmVIDAAA4
M1NqAAAAZ2ZKf0kNAACcGWkNAMDoSGsAAEZHWgMAMDrSGgCA0ZHWAACMjrQG AGB0pDUAAKMjrQEA
GB1pDQDA6EhrAABGR1oDADA60hoAgNGR1gAAjI60BgBgdKQ1AACjI60BABgd aQ0AwOhIawAARkda
AwAwOtIaAIDRkdYAAIyOtAYAYHSkNQAAoyOtAQAYHWkNAMDoSGsAAEZHWgMA MDrSGgCA0bWntTGR
xdVT/fswsT1Fi+Pwh3f2gz/pvk40+YbTbjhVm1McwCnmlPLzm5jUqM5DPcWc 0oZTnciUR+iHNIzV
NplEO9G00gY7CA7Sx3axeCJbnbWt5lml83JT35nSP0NATrjh5DtMe1K77Whp 2teqIZXNQVvlqFW2
mnOreTax6mBWNWudw1M6px02rU90FUrZYAfBQUaDOVo8ka3O2lbzrEJaV9ph 2pPabUdL075WDals
Jq3brDqYVc1a5/CUzmlJa2eDHQQH6b6VxWjFmHiPLup1yTyTFV8Piqkhuhjt 8ZsWNX9qSGXRiP0u
avJgXU+Y2pRpzgxZ1AHoTj1Er6dGFSfPdEb766cNpPab3xrsurjT1KhgoGwu tmUadLE4Z1CMzpAa
tagfeooevqgTWNyppBva5gyK0R6/KTUq2hw0mJenKzpDUIxOkhq1pH8W0XmC 9Zp9yU7ZswjBKP1t
qjNV1GOjW6MVve6/Vu5Xd0b766dttsUUL+dw38piUNGb3IpuiHZK+swuL89X ZmVVUcrP31lsOHgp
1VDfXPno6ncUbK2ZPNUptU0rpfab35o/wppRulPa6vijxYYhxQb56PKCtvxp aX74a+csFqVTHN5S
mja1r+gDXHUwlcUlsYvow6mftqFYPM78Vre+6rCjDboz1Zw/zrV6xy8/DyL+ rVsJvg36G4pSz887
VdRbM/Wtpq2cp/izTzUUm6PFmqPSXwPFQ6ovSm3TSg2num2nxaJUbNCdqWLD g9JbU+vF06sFbfWH
GlV/VJVbpT1/OsXm4qjiVFL92WhrkOr3FVXzE8z/pPTXJTbJqqJUPBvFGVbp Hb/8PIj4t24l+Nat
yCXYGh0SrIti7QmSK5Ieosdm6sWfSrCjVDE/j1yRFiU6PFiXMkeyxA5AF/XX QM3kUn5UtFg/rZTf
b35rar1+lCxKQbOcJ9ocNOQPIL9Vqp9zScygBW3RGaL7XWJqhuuV/APRYzP1 +sOLFqMHE9QrRwUN
S0zlqNRU9Q1L076kzHA9T2aS6NclNsnSemJTDflpm/WOX34eUPxbtxJ8q/t1 MdqZGFV4Euhi8aTn
i0tp/mXNbPnDqzx4KXUY9QPrH51b0V8DxUNaNarY0HaudHHDndZ3pur1j6Xz QUWLbQ1a0FZ/WorF
6HBdLM6TL6bqbcX6hrZRxYb6Yn9Dsai3Rjv11vxPSn9dYpMsiXnaTuxSmrbZ BnMFxyO/ja53FqXi
Car5edcUJfMk09xTbNgqFZ89xeb6YmZdKvbXF6W2aaWGU92202JRKu4rWqzc V8OQtQ0ZQVvDoUr1
R1W5NVWUTnF40QbzZO2oYD3aWf/AOxva9pUfHjy66IONbi2u1xeltmmb9Y5f fh5E8tvMuqn7+LdR
r5kHzDNdyZzKYGtmnkVxxZoZ6ot+3Qh6a3SspAdmmqMNq/abag56/Kb6yYsz t00bKO638qgaRqUO
LD+VbtYNxQOoHFI/yteDhoAerteLO5V0gz6kpWLO1DyLUpwqaNbT5hsWsWtf 15OkRul60LAkHoKp
3lflerCvYBdBp6ykhuux+ttA5aHK9eBgUuvBkHyznrbZBlMcwiYny9lwKgCn xn+ws7q0n2z7ozWx
vzx66qXZhj/XDacCcGr8BzurS/vJzv9ot3oVwtt2NgAnsvl/+xjEZf5kL+4B AwBwOKQ1AACjI60B
ABjdNmmdfwshutUXU2PHfFui7ajyZ+Cgjn78AHAgG1xw3VU7c+0uprVuGOpD BPJI2o6qbdT+Vh3n
qmYAQI8NLrikdVHbqP2tOs5VzQCAHhtccFNp7RM3SLugGO2Jjor2pKI0miV6 VDDDovalv60ZJYt+
VEAWo8OD5qAhs546kvzwaE9qqmAGAMBJ9V5w8wGwqGhMFfVYPSo/Q6pTCkZV zhAU146SQ6RVh51Z
z2/tL0YbUg8KAHAKvRfc4vV9iV3ro8UgeypHFYtS5xGuaqg/mGLs5Q9g1eHV d65qAACcVNcF18T4
TbKtpmheZo9c6ZlfSjU07CsYVVmUgga5R92pj8pvKnZGpzWxwzOxQ0pNFZ0W AHAKXRdcfb3OX9bz
RbeSqgfq55dSDQ37WhKj2g6moejr/TtqO+bUUQEANtd+wW2IkPpisaG+KG24 r2JD/cHUd0bXNzy8
tqkAAKfWfsFNXazlld2TW4NiMSHkqPpOWawZJdf1vvy39aNkMaj7rbpTt6Ua Mut6qnzR1/UuKkct
AIBT4joLAMDoSGsAAEZHWgMAMDrSGgCA0ZHWAACMjrQGAGB0pDUAAKMjrQEA GB1pDQDA6EhrAABG
R1oDADA60hoAgNGR1gAAjI60BgBgdKQ1AACjI60BABgdaQ0AwOhIawAARkda AwAwOtIaAIDRtaf1
/z3+m4WFhYVl2KV0FceRkNYsLCwsEy7/+z//XbqK40h609o+IVgqF04XCwvL Dou/1JSu4jiSDdK6
1Ih/cLoA7IC0nhJpvR9OF4AdkNZTIq33w+kCsAPSekqk9X44XQB2QFpPibTe D6cLwA5I6yltnNa3
t7evXr0yT25ubh4fH1PDL1Aqre250sVKPWOl6DxbTQ5gT6T1lNovxzqtbVTb 6/v379/t+sPDg12/
urpKT3BxomntEvHsuUhaA9MgrafUfjnWae1uqTNDLhxpDWAHpPWU2i/HOq3t nbS7n3a314HPnz+7
F8nfvXvnXyH3RbviO13qf/v2zW66vr6Wk9zc3Litun8Z3qq0Ns/yxWA9mM1/ WzlPcfJgHgADIq2n
1H7x1Wlt89Vf020ky8y24WqL9/f3NqfdVlv88uWLK1p2xX7rmt0Mt7e3rm5X XN290m6LbkdB/zI8
ndaZaNTr+aJcSa3n58nPqYcAGBNpPaX2K2/0U2Y2oe3dsHlmY9XV3Q10MIO7 F3frRrzJHSSHHasn
MQd8U7wtrSuLqQzWRalyeHEeAOMgrafUfuXN/AaXzWyXxD5oZQB7QSpXrkvL oUTf5k89ouhjjLYF
K8Xi8nLXNcPNSwuAgZHWU2q/8hZ/31pe2Te/tz4indZBQ/TR5Yt65RTFQ592 4NKQ1lNqvwqnPmX2
8PCwPL+H7d9yDt63dp8dK75vHUzi37d2k0TTfWTydKUO2NV7AlWejeKQ+k69 FcCYSOsptV95dVrb
EPWf2bb3wT5lHRfYJvaZcCv6mXDz/Hk0zwV2MIlMnZHVp/Xy/KCCNl0M1s3L sF/VWTO5rAAYE2k9
pfaLb/GV8GazpsKJTpc25dkDUIm0nlL7ZZ20XutEp8tJ3RMDuDSk9ZTaL+uk 9VonOl0eL1YDWEjr
SbVf2U+X1rPidAHYAWk9JdJ6P5wuADsgrafUm9YsLCwsLKMtpPV8etPaPSdY ahZOFwsLyw4LaT2l
DdK61Ih/cLoA7IC0nhJpvR9OF4AdkNZTIq33w+kCsAPSekqk9X44XQB2QFpP ibTeD6cLwA5I6ylt
ltYmIT/JRYmmdepcRU8d5xNAEWk9pfarf+rempBO0acrk9BbncOt5gFwFKT1 lNov5aT1WsHpyt89
b3UOt5oHwFGQ1lNqv5RXpvXV1ZX99sePH3bdfrXrtuLbvn379urVq+vrazmD /0ey9T96vRxZQ1oH
jzpY1+ckKEZ7AMyNtJ5S+3W8Mq1t4tpv7+/v7br9ap4z2LXd3t66ol1x/XbF 9dsgtytfvnyJTntE
a9NarqdWVhUBXALSekrtl/LKtP7+/bv99t27d3bdfrXrDw8PQZtdsXfYbt2u yLq7EZ/D2rTOFOuD
mbQGLg1pPaX2S3llWi/PAexeBvepHKR1sC4ts9g2rfUpyk8I4EKQ1lNqv5TX p7V7H9rdWNt13WYS
99aT2TatF6W+CGBipPWU2i/l9Wnt3oF27Lpsu729dVv1+9aPj49GvBKupz2c 5t/gyqd1fRHAJSCt
p9R+Ka9Pa180zx8O9xUX1e5dbc8FtqvbzM5MeyyZ06UfXbQerGdGBZUFwMUg rafUfh1PpXXU9fW1
zQz5m1oXmCL1pyvl0s4YgAak9ZTar/71aW3vj9270f5l8IW0bnJpZwxAA9J6 Su1X/8q0dql8dXXl
f3Na1lOjplRzulIu8HQBaENaT6k9ACrTGh6nC8AOSOspkdb74XQB2AFpPaXe tGZhYWFhGW0hrefT
m9buOcFSs3C6WFhYdlhI6yltkNalRvyD0wVgB6T1lEjr/XC6AOyAtJ4Sab0f TheAHZDWUyKt98Pp
ArAD0npKpPV+OF0AdkBaT2nLtK75e1upnp6xq2wySRt9uoIGX9ErAFCJtJ5S exj0p/X379/9v761
dmyzTSZpUzxdpDWAfqT1lNrDoC2tpVP3R20ySZvovbU8GNIaQD/SekrtYZBP a7du755fPfH/+pbv
MUIw9vHx0d5zu8rV1dXDw4Oe37Hzm5f/PLYbaOs1k6TWrZubG1f5/PmzL+oD WIW0BrAD0npK7WFQ
k9b39/c2Ne2KDexUj16/vr524ZoZ69kktsUfP37YdfvVPGVz5SSp9dvbW/N0 8PZ/MuyK/9fDogdQ
L/W+dc0KAFQirafUHgY1ad22vjzdNNubWpu4mR7HBarN1+U5Zf19fHGS1Lr7 17h93cV/P9IawA5I
6ym1h8Hp0toF8M3NjbstjvZI7sV2e2PtVuonya9LyxYynwl36/IAdA8A1CCt p9QeBqdL65p16cuX
L+bp3WuTeNV67bq8t94QaQ1gB6T1lNrD4HRp7cLS3hPf39+negLmmXsDu3IS 95637XF57+v+fWt3
X+5fCc8cQI3871sHBxntAYAi0npK7WHQn9buxerr62tdd69pf/78OTU24PLV vXtdP4nrsWHsPlsu
J3cTmqdbdpvZemyDfFrLSnC00gIAWaT1lNqv/jqtkcfpArAD0npKpPV+OF0A dkBaT4m03g+nC8AO
SOspkdb74XQB2AFpPSXSej+cLgA7IK2n1JvWLCwsLCyjLaT1fHrT2j0nWFhY WFhGW0pXcRxJV1oX
nyssLCwsLOdaSldxHEl7WgMAgH2Q1gAAjI60BgBgdKQ1AACjI60BABgdaQ0A wOhIawAARkdaAwAw
OtIaAIDRkdYAAIyOtAYAYHSkNQAAoyOtAQAYHWkNAMDoSGsAAEZHWgMAMDrS GgCA0ZHWAACMjrQG
AGB0pDUAAKMjrQEAGB1pDQDA6EhrAABGR1oDADA60hoAgNGR1gAAjI60BgBg dKQ1AACjI60BABgd
aQ0AwOja0/pP86deXD3VH62vtdU8AAAcRXtae0F8+tguFtv4ebaaEACAwZHW AACM7iRpHRSjlSC/
fY8uBuuyc+2cG/5PAwAAuzlDWqcyWDdk0jq1dUnPGR0IAMD4TpXWfqUyZRuK NWmdbwAA4BDOk9Zy
0ZNUFoOtlXMG6wAAjO88ab0o/Wm9KKQ1AGAOJ0zr1PpWxbYdBesAAIzvDGnt 1v+s+Pi37IymdfOc
CwAAx7FBWgMAgJNqT2t513vEpfT4AAAYRXtaAwCAfZDWAACMjrQGAGB0pDUA AKPrSmtjwmVPO+8O
AIBz6Uo8nZenTtBTzw8AwIC60o+0BgBgB13pl0lrtyK/DV4q9w3BJPlOuSno qZkKAIAj6oqyfFqn
YjXTUN9ZM0oXAQA4oq4ck/e7wV1scb2zWGwgoQEA0+jKtEwiNkeszv6aqVL/ xxBUAAA4oq4oO0Va
a6umiio2AAAwsq4c60xrHbfFMK5vSI0CAOBwunKsMq2X52zWCWrUK9WpTrk1 VS9OBQDAEZ0tyghR
AAAqtWemv3M9ygIAwEGdLcSITwAAKpGZAACMjrQGAGB0pDUAAKPrSuvUe8/1 70nXd0ptowAAOKiu
3It+1rr4AWy5tS1320YBAHBQXblHWgMAsIOu3HOpqdM3qMj81t/6ohS0yeKS nR8AgPl0pVwxraO3
0Tpr8w16Jd8JAMBkuiJO3yJH6zXFYkOxCADArLririat5RJsTa3XFxexCwAA ZtWVcjVprW2b1vki
AAAT6Iq4bXO3YVQxwgEAmEBXxBVz160bE6msHSWLxU4AAGZCygEAMLr2tJZ3 uuMsAADMh3wDAGB0
pDUAAKMjrQEAGB1pDQDA6LrSms95AQCwg650PUU2n2JOAAAOrSsbT5Gsp5gT AIBD68rGVLLKul/X
L5W7dVmM9vACOwDgwnXFYOp962gkBxU/XBd1Z7AOAMBF6crATIIGIZ1K68oi AACXrCsPV6V1cP+9
JII5mDMYAgDABeqKwVVpneoJ1lNzEtgAgIvVlYH5BE29pl1/b82r4gAALP1p rRe5NdocbZBpHdSD
CgAAl4YYBABgdO1pHb2xPvUCAMAFIgABABgdaQ0AwOhIawAARkdaAwAwOtIa AIDRkdYAAIyOtAYA
YHSkNQAAoyOtAQAYHWkNAMDo/h/8V5Drup8QCQAAAABJRU5ErkJggg==
------=_NextPart_000_0009_01C6F2BF.7FB12930--

Attached files

This is a multi-part message in MIME format.
------=_NextPart_000_0009_01C6F2BF.7FB12930
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_000A_01C6F2BF.7FB12930"
------=_NextPart_001_000A_01C6F2BF.7FB12930
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Regards,=20
--=20
Ignacio Ortiz de Z=FA=F1iga
http://www.xailer.com
"david fung" <davfung@yahoo.com> escribi=F3 en el mensaje =
news:[email=45361990@news.xailer.com...]45361990@news.xailer.com...[/email]
> Excellent ! and Thanks.
>=20
> BTW can you tell me where you find the correct property name is=20
> "oSubMenu", go thru the source code ? an documentation ?
>=20
> Thanks
> David
>=20
>=20
>=20
> Jose F. Gimenez wrote:
>> David,
>>=20
>>> I got an error
>>>
>>> Error BASE/1004 Message not found: TMENUITEM:OMENU
>>> Arguments: ()
>>=20
>> Sorry, my fault. The property name is oSubMenu, so the correct way =
is:
>>=20
>> ::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled :=3D .F.
>>=20
>>
------=_NextPart_001_000A_01C6F2BF.7FB12930
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2963" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT face=3DArial size=3D2></FONT><IMG alt=3D"" hspace=3D0=20
src=3D"cid:000401c6f2ae$bc260f40$1700000a@ozlan.local" align=3Dbaseline=20
border=3D0></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Regards, </FONT></DIV>
<DIV><BR><FONT face=3DArial size=3D2>-- <BR>Ignacio Ortiz de =
Z=FA=F1iga<BR></FONT><A=20
href=3D"http://www.xailer.com"><FONT face=3DArial=20
size=3D2>http://www.xailer.com</FONT></A></DIV>
<DIV><FONT face=3DArial size=3D2>"david fung" <</FONT><A=20
href=3D"mailto:davfung@yahoo.com"><FONT face=3DArial=20
size=3D2>davfung@yahoo.com</FONT></A><FONT face=3DArial size=3D2>> =
escribi=F3 en el=20
mensaje </FONT><A href=3D"news:45361990@news.xailer.com"><FONT =
face=3DArial=20
size=3D2>news:45361990@news.xailer.com</FONT></A><FONT face=3DArial=20
size=3D2>...</FONT></DIV><FONT face=3DArial size=3D2>> Excellent ! =
and=20
Thanks.<BR>> <BR>> BTW can you tell me where you find the correct =
property=20
name is <BR>> "oSubMenu", go thru the source code ? an documentation=20
?<BR>> <BR>> Thanks<BR>> David<BR>> <BR>> <BR>> =
<BR>> Jose=20
F. Gimenez wrote:<BR>>> David,<BR>>> <BR>>>> I got =
an=20
error<BR>>>><BR>>>> Error BASE/1004Â Message not =
found:=20
TMENUITEM:OMENU<BR>>>> Arguments: ()<BR>>> <BR>>> =
Sorry, my=20
fault. The property name is oSubMenu, so the correct way is:<BR>>> =
<BR>>>ÂÂÂÂ=20
::oMenu1:aItems[1]:oSubMenu:aItems[1]:lEnabled :=3D .F.<BR>>>=20
<BR>>></FONT></BODY></HTML>
------=_NextPart_001_000A_01C6F2BF.7FB12930--
------=_NextPart_000_0009_01C6F2BF.7FB12930
Content-Type: image/png;
name="Image1.png"
Content-Transfer-Encoding: base64
Content-ID: <000401c6f2ae$bc260f40$1700000a@ozlan.local>
iVBORw0KGgoAAAANSUhEUgAAAo8AAAEUCAIAAADFu0sxAAAABmJLR0QAAAAA AAD5Q7t/AAAACXBI
WXMAAA7EAAAOxAGVKw4bAAAZnElEQVR4nO3dv27cyJbH8XqnzeYd7DeYdKDJ HQqDiRwZDg2sAGcD
aDHYwDBwQwPKlDhweBU6FLCB34BbVo3qHtWpf6xis4vV3w8IgTo8VWRTPfwN u1uyuQMAAGMzpQYA
AHBmptQAAADOzJQaAADAmZlSAwAAODNTagAA4BItK5Xm62JefFMn1f/p06dg dltJjR1B5qjevHmj
iwfy8eNH+xB++eUX9wBfv379xx9//P3336VxBat+jualwz09AFw4G8DG/Fa5 HCmtP3z4EMxuK6mx
I4ge1V9//eVCLj7mCGwwm4S3b9+WRudEz1hKsOvDPT0AXLhp0/rXX38NZreV 1NgRRI9qzEOt9/79
e5Nl/3ekNEeSn6TU+FOw38M9PQBcOJfWwcvdX79+9V/dirV3WofbStdQo6xt OK/oUY15qPVev37t
jt/eYf/rX/9yxU+fPvlo/P333/MzZKw6OUZZ2wAAZ+TS+utLPqGltrRevppS y3+Y3LbSNdQ32ABw
Kx8/fvRb7XqwVU9l48SGinvl2X616/rdTTnWzulT582bN/qN2NSOovWgaGJk /9qjtbe5LjvtV39H
a4tuBvtA9G1udL+OeyvaN9h1eba91Az24KObUv3FZv/o7MOxB5M5FQd9egC4 cPqVcH+33f9KuI1q
t5Qa/2Fy20qXMN/gX32VH87y0SJfm5XD7ZXXfwxKCjLM16NvxwZXZF+/eyla D4omxjevPVr9Mq+d
QT+E1PC7l/Rsjr5R9vfWdlPNi96pPUbrvhg9ntRjOejTA8CFc6nsyZC2678J a9PaR3V9YJvcttIl
zDfYC667Q7KXV7/VXWptPXU5jl6Lg0nkXqKCD2/7+t1L0XpQNDG+uf9oozME cevrsijvPrVghuB9
a3fj++HDB31X6vjOmrrJSp2Kgz49AFw4/0q4e4ta30x7q9I6iOrKwM51FC9h vsHewfhrrrv1sV/d
t7Zut+qpfL+9S3Nvr9qv/n5Lfn7Yj7WXaf9SqnxNOHpIdy/VN0eLDUfrO2Ua 2Rtfd7eXiijNv2Js
nk6m3/vbt299PXhJPJXudu/6xXO/tabui/JnYVd8skZPxUGfHgAunHzfWr/0 7TbZG+tV71tHo7om
sHObi5cw32AvuP53Z93vCPkssfXo5dgniv8klJxT3i/6sTJpNn8XNl9sOFr5 gm2+eJclXzEONvnX
fvVvh9tz5V8SD9hRstPXgxmidV8MUl++Ca2bD/r0AHDhgnvr4JXwhnvrTFQX Azu7rXQJ8w3uftHd
YNmQuHt+99S9aBm9HJss+WqnL6b2Xiyuas4Xo4pHW1/UfFuQW3cv/7pIbOjP BnsbKv9MiiODPzVD
tJ5qjm7ylYM+PQBcOJ/W7s1peYfti2vvrc1//ZZbfvuaHJjacFdxCfMN7nLs 7wL9nZa752u4HEc7
U3svFlc154splcOLRS3fVjnJ3VNy+xtWF5lOaoZoPbM7vclXDvr0AHDhNr+3 7mFy20qXMN/gLsf+
T1P512Dd+4vRy7G/20vM/R96bKbe3xwtdh5tfVHzbZl7a3+v6Y9TNzt6p6nD iNZ9Uc+fmfmgTw8A
Fy64tw5ur9vet25mcttKlzDf4C7H+s8+u88h59+YjP7SsKTHZuq+KOPEf6Yp 1Vwsdh5tfVHzu655
39rfv0b/znn0lXNfWXXGgj8jWnzf+u6ATw8AF07fW6ccJq39bwfJTzb5l1uj IeHvtOxdlP/slS/K
v1Kpx2bq/p7Mf5bK/91v3Vws+mt659HWF7VVnwmXzcFfLJGf3JZZ3nbGjAhs ObP8O+S+86BPDwAX
bhn274SH20qXMN0g/0KF/OxxdKrUL9Saus9OR+vyV3eiijPIo5IPoedoO4up P43iBLfR+V/OdmSK
t52xKHuK5D2rr/vKsZ4eAC5c4YZaKc3XxeS2lS5hukHe28nXMKNTyWap51eM 9Mut5uVfuSrOIC/o
8h6u52g7i3fpwI6+4p1Jd/lLyU7bGYv+P0Ews57hWE8PABiHyW0rXcJ0g/w9 1/xtlu+310r5xzI7
/3zH3dP7oD5xbW65F2yjzakZfBQFWdh8tJ1F5+PLf7L6TeLvhEebzdPRvn37 Nvrps7Yz9v79e/lH
ufN/wds51tMDAMZhSg0AAODMTKkBAACcmSk1AACAMzOlBgAAcGam1AAAAM7M lBoAAMCZmVIDAAA4
M1NqAAAAZ2ZKf0kNAACcGWkNAMDoSGsAAEZHWgMAMDrSGgCA0ZHWAACMjrQG AGB0pDUAAKMjrQEA
GB1pDQDA6EhrAABGR1oDADA60hoAgNGR1gAAjI60BgBgdKQ1AACjI60BABgd aQ0AwOhIawAARkda
AwAwOtIaAIDRkdYAAIyOtAYAYHSkNQAAoyOtAQAYHWkNAMDoSGsAAEZHWgMA MDrSGgCA0bWntTGR
xdVT/fswsT1Fi+Pwh3f2gz/pvk40+YbTbjhVm1McwCnmlPLzm5jUqM5DPcWc 0oZTnciUR+iHNIzV
NplEO9G00gY7CA7Sx3axeCJbnbWt5lml83JT35nSP0NATrjh5DtMe1K77Whp 2teqIZXNQVvlqFW2
mnOreTax6mBWNWudw1M6px02rU90FUrZYAfBQUaDOVo8ka3O2lbzrEJaV9ph 2pPabUdL075WDals
Jq3brDqYVc1a5/CUzmlJa2eDHQQH6b6VxWjFmHiPLup1yTyTFV8Piqkhuhjt 8ZsWNX9qSGXRiP0u
avJgXU+Y2pRpzgxZ1AHoTj1Er6dGFSfPdEb766cNpPab3xrsurjT1KhgoGwu tmUadLE4Z1CMzpAa
tagfeooevqgTWNyppBva5gyK0R6/KTUq2hw0mJenKzpDUIxOkhq1pH8W0XmC 9Zp9yU7ZswjBKP1t
qjNV1GOjW6MVve6/Vu5Xd0b766dttsUUL+dw38piUNGb3IpuiHZK+swuL89X ZmVVUcrP31lsOHgp
1VDfXPno6ncUbK2ZPNUptU0rpfab35o/wppRulPa6vijxYYhxQb56PKCtvxp aX74a+csFqVTHN5S
mja1r+gDXHUwlcUlsYvow6mftqFYPM78Vre+6rCjDboz1Zw/zrV6xy8/DyL+ rVsJvg36G4pSz887
VdRbM/Wtpq2cp/izTzUUm6PFmqPSXwPFQ6ovSm3TSg2num2nxaJUbNCdqWLD g9JbU+vF06sFbfWH
GlV/VJVbpT1/OsXm4qjiVFL92WhrkOr3FVXzE8z/pPTXJTbJqqJUPBvFGVbp Hb/8PIj4t24l+Nat
yCXYGh0SrIti7QmSK5Ieosdm6sWfSrCjVDE/j1yRFiU6PFiXMkeyxA5AF/XX QM3kUn5UtFg/rZTf
b35rar1+lCxKQbOcJ9ocNOQPIL9Vqp9zScygBW3RGaL7XWJqhuuV/APRYzP1 +sOLFqMHE9QrRwUN
S0zlqNRU9Q1L076kzHA9T2aS6NclNsnSemJTDflpm/WOX34eUPxbtxJ8q/t1 MdqZGFV4Euhi8aTn
i0tp/mXNbPnDqzx4KXUY9QPrH51b0V8DxUNaNarY0HaudHHDndZ3pur1j6Xz QUWLbQ1a0FZ/WorF
6HBdLM6TL6bqbcX6hrZRxYb6Yn9Dsai3Rjv11vxPSn9dYpMsiXnaTuxSmrbZ BnMFxyO/ja53FqXi
Car5edcUJfMk09xTbNgqFZ89xeb6YmZdKvbXF6W2aaWGU92202JRKu4rWqzc V8OQtQ0ZQVvDoUr1
R1W5NVWUTnF40QbzZO2oYD3aWf/AOxva9pUfHjy66IONbi2u1xeltmmb9Y5f fh5E8tvMuqn7+LdR
r5kHzDNdyZzKYGtmnkVxxZoZ6ot+3Qh6a3SspAdmmqMNq/abag56/Kb6yYsz t00bKO638qgaRqUO
LD+VbtYNxQOoHFI/yteDhoAerteLO5V0gz6kpWLO1DyLUpwqaNbT5hsWsWtf 15OkRul60LAkHoKp
3lflerCvYBdBp6ykhuux+ttA5aHK9eBgUuvBkHyznrbZBlMcwiYny9lwKgCn xn+ws7q0n2z7ozWx
vzx66qXZhj/XDacCcGr8BzurS/vJzv9ot3oVwtt2NgAnsvl/+xjEZf5kL+4B AwBwOKQ1AACjI60B
ABjdNmmdfwshutUXU2PHfFui7ajyZ+Cgjn78AHAgG1xw3VU7c+0uprVuGOpD BPJI2o6qbdT+Vh3n
qmYAQI8NLrikdVHbqP2tOs5VzQCAHhtccFNp7RM3SLugGO2Jjor2pKI0miV6 VDDDovalv60ZJYt+
VEAWo8OD5qAhs546kvzwaE9qqmAGAMBJ9V5w8wGwqGhMFfVYPSo/Q6pTCkZV zhAU146SQ6RVh51Z
z2/tL0YbUg8KAHAKvRfc4vV9iV3ro8UgeypHFYtS5xGuaqg/mGLs5Q9g1eHV d65qAACcVNcF18T4
TbKtpmheZo9c6ZlfSjU07CsYVVmUgga5R92pj8pvKnZGpzWxwzOxQ0pNFZ0W AHAKXRdcfb3OX9bz
RbeSqgfq55dSDQ37WhKj2g6moejr/TtqO+bUUQEANtd+wW2IkPpisaG+KG24 r2JD/cHUd0bXNzy8
tqkAAKfWfsFNXazlld2TW4NiMSHkqPpOWawZJdf1vvy39aNkMaj7rbpTt6Ua Mut6qnzR1/UuKkct
AIBT4joLAMDoSGsAAEZHWgMAMDrSGgCA0ZHWAACMjrQGAGB0pDUAAKMjrQEA GB1pDQDA6EhrAABG
R1oDADA60hoAgNGR1gAAjI60BgBgdKQ1AACjI60BABgdaQ0AwOhIawAARkda AwAwOtIaAIDRtaf1
/z3+m4WFhYVl2KV0FceRkNYsLCwsEy7/+z//XbqK40h609o+IVgqF04XCwvL Dou/1JSu4jiSDdK6
1Ih/cLoA7IC0nhJpvR9OF4AdkNZTIq33w+kCsAPSekqk9X44XQB2QFpPibTe D6cLwA5I6yltnNa3
t7evXr0yT25ubh4fH1PDL1Aqre250sVKPWOl6DxbTQ5gT6T1lNovxzqtbVTb 6/v379/t+sPDg12/
urpKT3BxomntEvHsuUhaA9MgrafUfjnWae1uqTNDLhxpDWAHpPWU2i/HOq3t nbS7n3a314HPnz+7
F8nfvXvnXyH3RbviO13qf/v2zW66vr6Wk9zc3Litun8Z3qq0Ns/yxWA9mM1/ WzlPcfJgHgADIq2n
1H7x1Wlt89Vf020ky8y24WqL9/f3NqfdVlv88uWLK1p2xX7rmt0Mt7e3rm5X XN290m6LbkdB/zI8
ndaZaNTr+aJcSa3n58nPqYcAGBNpPaX2K2/0U2Y2oe3dsHlmY9XV3Q10MIO7 F3frRrzJHSSHHasn
MQd8U7wtrSuLqQzWRalyeHEeAOMgrafUfuXN/AaXzWyXxD5oZQB7QSpXrkvL oUTf5k89ouhjjLYF
K8Xi8nLXNcPNSwuAgZHWU2q/8hZ/31pe2Te/tz4indZBQ/TR5Yt65RTFQ592 4NKQ1lNqvwqnPmX2
8PCwPL+H7d9yDt63dp8dK75vHUzi37d2k0TTfWTydKUO2NV7AlWejeKQ+k69 FcCYSOsptV95dVrb
EPWf2bb3wT5lHRfYJvaZcCv6mXDz/Hk0zwV2MIlMnZHVp/Xy/KCCNl0M1s3L sF/VWTO5rAAYE2k9
pfaLb/GV8GazpsKJTpc25dkDUIm0nlL7ZZ20XutEp8tJ3RMDuDSk9ZTaL+uk 9VonOl0eL1YDWEjr
SbVf2U+X1rPidAHYAWk9JdJ6P5wuADsgrafUm9YsLCwsLKMtpPV8etPaPSdY ahZOFwsLyw4LaT2l
DdK61Ih/cLoA7IC0nhJpvR9OF4AdkNZTIq33w+kCsAPSekqk9X44XQB2QFpP ibTeD6cLwA5I6ylt
ltYmIT/JRYmmdepcRU8d5xNAEWk9pfarf+rempBO0acrk9BbncOt5gFwFKT1 lNov5aT1WsHpyt89
b3UOt5oHwFGQ1lNqv5RXpvXV1ZX99sePH3bdfrXrtuLbvn379urVq+vrazmD /0ey9T96vRxZQ1oH
jzpY1+ckKEZ7AMyNtJ5S+3W8Mq1t4tpv7+/v7br9ap4z2LXd3t66ol1x/XbF 9dsgtytfvnyJTntE
a9NarqdWVhUBXALSekrtl/LKtP7+/bv99t27d3bdfrXrDw8PQZtdsXfYbt2u yLq7EZ/D2rTOFOuD
mbQGLg1pPaX2S3llWi/PAexeBvepHKR1sC4ts9g2rfUpyk8I4EKQ1lNqv5TX p7V7H9rdWNt13WYS
99aT2TatF6W+CGBipPWU2i/l9Wnt3oF27Lpsu729dVv1+9aPj49GvBKupz2c 5t/gyqd1fRHAJSCt
p9R+Ka9Pa180zx8O9xUX1e5dbc8FtqvbzM5MeyyZ06UfXbQerGdGBZUFwMUg rafUfh1PpXXU9fW1
zQz5m1oXmCL1pyvl0s4YgAak9ZTar/71aW3vj9270f5l8IW0bnJpZwxAA9J6 Su1X/8q0dql8dXXl
f3Na1lOjplRzulIu8HQBaENaT6k9ACrTGh6nC8AOSOspkdb74XQB2AFpPaXe tGZhYWFhGW0hrefT
m9buOcFSs3C6WFhYdlhI6yltkNalRvyD0wVgB6T1lEjr/XC6AOyAtJ4Sab0f TheAHZDWUyKt98Pp
ArAD0npKpPV+OF0AdkBaT2nLtK75e1upnp6xq2wySRt9uoIGX9ErAFCJtJ5S exj0p/X379/9v761
dmyzTSZpUzxdpDWAfqT1lNrDoC2tpVP3R20ySZvovbU8GNIaQD/SekrtYZBP a7du755fPfH/+pbv
MUIw9vHx0d5zu8rV1dXDw4Oe37Hzm5f/PLYbaOs1k6TWrZubG1f5/PmzL+oD WIW0BrAD0npK7WFQ
k9b39/c2Ne2KDexUj16/vr524ZoZ69kktsUfP37YdfvVPGVz5SSp9dvbW/N0 8PZ/MuyK/9fDogdQ
L/W+dc0KAFQirafUHgY1ad22vjzdNNubWpu4mR7HBarN1+U5Zf19fHGS1Lr7 17h93cV/P9IawA5I
6ym1h8Hp0toF8M3NjbstjvZI7sV2e2PtVuonya9LyxYynwl36/IAdA8A1CCt p9QeBqdL65p16cuX
L+bp3WuTeNV67bq8t94QaQ1gB6T1lNrD4HRp7cLS3hPf39+negLmmXsDu3IS 95637XF57+v+fWt3
X+5fCc8cQI3871sHBxntAYAi0npK7WHQn9buxerr62tdd69pf/78OTU24PLV vXtdP4nrsWHsPlsu
J3cTmqdbdpvZemyDfFrLSnC00gIAWaT1lNqv/jqtkcfpArAD0npKpPV+OF0A dkBaT4m03g+nC8AO
SOspkdb74XQB2AFpPSXSej+cLgA7IK2n1JvWLCwsLCyjLaT1fHrT2j0nWFhY WFhGW0pXcRxJV1oX
nyssLCwsLOdaSldxHEl7WgMAgH2Q1gAAjI60BgBgdKQ1AACjI60BABgdaQ0A wOhIawAARkdaAwAw
OtIaAIDRkdYAAIyOtAYAYHSkNQAAoyOtAQAYHWkNAMDoSGsAAEZHWgMAMDrS GgCA0ZHWAACMjrQG
AGB0pDUAAKMjrQEAGB1pDQDA6EhrAABGR1oDADA60hoAgNGR1gAAjI60BgBg dKQ1AACjI60BABgd
aQ0AwOja0/pP86deXD3VH62vtdU8AAAcRXtae0F8+tguFtv4ebaaEACAwZHW AACM7iRpHRSjlSC/
fY8uBuuyc+2cG/5PAwAAuzlDWqcyWDdk0jq1dUnPGR0IAMD4TpXWfqUyZRuK NWmdbwAA4BDOk9Zy
0ZNUFoOtlXMG6wAAjO88ab0o/Wm9KKQ1AGAOJ0zr1PpWxbYdBesAAIzvDGnt 1v+s+Pi37IymdfOc
CwAAx7FBWgMAgJNqT2t513vEpfT4AAAYRXtaAwCAfZDWAACMjrQGAGB0pDUA AKPrSmtjwmVPO+8O
AIBz6Uo8nZenTtBTzw8AwIC60o+0BgBgB13pl0lrtyK/DV4q9w3BJPlOuSno qZkKAIAj6oqyfFqn
YjXTUN9ZM0oXAQA4oq4ck/e7wV1scb2zWGwgoQEA0+jKtEwiNkeszv6aqVL/ xxBUAAA4oq4oO0Va
a6umiio2AAAwsq4c60xrHbfFMK5vSI0CAOBwunKsMq2X52zWCWrUK9WpTrk1 VS9OBQDAEZ0tyghR
AAAqtWemv3M9ygIAwEGdLcSITwAAKpGZAACMjrQGAGB0pDUAAKPrSuvUe8/1 70nXd0ptowAAOKiu
3It+1rr4AWy5tS1320YBAHBQXblHWgMAsIOu3HOpqdM3qMj81t/6ohS0yeKS nR8AgPl0pVwxraO3
0Tpr8w16Jd8JAMBkuiJO3yJH6zXFYkOxCADArLririat5RJsTa3XFxexCwAA ZtWVcjVprW2b1vki
AAAT6Iq4bXO3YVQxwgEAmEBXxBVz160bE6msHSWLxU4AAGZCygEAMLr2tJZ3 uuMsAADMh3wDAGB0
pDUAAKMjrQEAGB1pDQDA6LrSms95AQCwg650PUU2n2JOAAAOrSsbT5Gsp5gT AIBD68rGVLLKul/X
L5W7dVmM9vACOwDgwnXFYOp962gkBxU/XBd1Z7AOAMBF6crATIIGIZ1K68oi AACXrCsPV6V1cP+9
JII5mDMYAgDABeqKwVVpneoJ1lNzEtgAgIvVlYH5BE29pl1/b82r4gAALP1p rRe5NdocbZBpHdSD
CgAAl4YYBABgdO1pHb2xPvUCAMAFIgABABgdaQ0AwOhIawAARkdaAwAwOtIa AIDRkdYAAIyOtAYA
YHSkNQAAoyOtAQAYHWkNAMDo/h/8V5Drup8QCQAAAABJRU5ErkJggg==
------=_NextPart_000_0009_01C6F2BF.7FB12930--

Attached files

David,
> BTW can you tell me where you find the correct property name is
> "oSubMenu", go thru the source code ? an documentation ?
It's documented in the help file. Search for TMenuItem
--
Regards,
Jose F. Gimenez
http://www.xailer.com

David,
> BTW can you tell me where you find the correct property name is
> "oSubMenu", go thru the source code ? an documentation ?
It's documented in the help file. Search for TMenuItem
--
Regards,
Jose F. Gimenez
http://www.xailer.com