Creating a Menu using tab

new topic     » topic index » view thread      » older message » newer message

--------------Boundary-00=3D_KRO7G6G0000000000000
Content-Type: Multipart/Alternative;
  boundary=3D"------------Boundary-00=3D_LRO7BHK0000000000000"


--------------Boundary-00=3D_LRO7BHK0000000000000
Content-Type: Text/Plain;
  charset=3D"iso-8859-1"
Content-Transfer-Encoding: 8bit

I down loaded the Euphoria package 4 days ago, so I'am very green.=0D
I'am trying to create a "main menu" program using tab that will execute
other programs.=0D
I modifiied some code Ifound in "EX05,EXW" to the procedure below=0D
=0D
=0D
global procedure onClick_MakeTable(integer self, integer event, sequence
parms)=0D
    shellExecute("open","work.exw",SW_NORMAL)=0D
  end procedure                                       =0D
=0D
This works.=0D
QUESTION:=0D
=0D
Is there a way to execute a procedure by clicking on a tab??=0D
=0D
Thanks for any help.
--------------Boundary-00=3D_LRO7BHK0000000000000
Content-Type: Text/HTML;
  charset=3D"iso-8859-1"
Content-Transfer-Encoding: 8bit

<meta http-equiv=3D"Content-Type" content=3D"text/html; charset=3Diso-8859-=
1"><html>
<head>
<meta name=3D"GENERATOR" content=3D"IncrediMail 1.0">=0D
<!--IncrdiXMLRemarkStart>
<IncrdiX-Info>
<X-FID>BA285063-5BCE-11D4-AF8D-0050DAC67E11</X-FID>
<X-FVER>2.0</X-FVER>
<X-FIT>Letter</X-FIT>
<X-FCOL>Elegant Paper</X-FCOL>
<X-FCAT>Stationery</X-FCAT>
<X-FDIS>Rice Fields</X-FDIS>
<X-Extensions>SU1CTDEsNDEsgUmBSTAkkcGNgZmVTY0wNCxNhYUoiU0kOMEoTYGBjYEoJDSZn=
SyFhUksSU1CTDIsMCwsSU1CTDMsMCws</X-Extensions>
<X-BG>D32287DF-A8ED-4241-A449-36604A896FEB</X-BG>
<X-BGT>repeat</X-BGT>
<X-BGC>#dce0e3</X-BGC>
<X-BGPX>0px</X-BGPX>
<X-BGPY>0px</X-BGPY>
<X-ASN>ANIM3D00-NONE-0000-0000-000000000000</X-ASN>
<X-ASNF>0</X-ASNF>
<X-ASH>ANIM3D00-NONE-0000-0000-000000000000</X-ASH>
<X-ASHF>1</X-ASHF>
<X-AN>6486DDE0-3EFD-11D4-BA3D-0050DAC68030</X-AN>
<X-ANF>0</X-ANF>
<X-AP>6486DDE0-3EFD-11D4-BA3D-0050DAC68030</X-AP>
<X-APF>1</X-APF>
<X-AD>C3C52140-4147-11D4-BA3D-0050DAC68030</X-AD>
<X-ADF>0</X-ADF>
<X-AUTO>X-ASN,X-ASH,X-AN,X-AP,X-AD</X-AUTO>
<X-CNT>;</X-CNT>
</IncrdiX-Info>
<IncrdiXMLRemarkEnd-->

</head>
<BODY style=3D"BACKGROUND-POSITION: 0px 0px; FONT-SIZE: 12pt; MARGIN: 0px 1=
0px 10px; BACKGROUND-REPEAT: repeat; FONT-FAMILY: Comic Sans MS" text=3D#00=
0040 bgColor=3D#dce0e3 background=3Dcid:D32287DF-A8ED-4241-A449-36604A896FE=
B scroll=3D"yes" X-FIT=3D"Letter" X-FCAT=3D"Elegant Paper" X-FCOL=3D"Elegan=
t Paper" X-FDIS=3D"Rice Fields" X-FID=3D"BA285063-5BCE-11D4-AF8D-0050DAC67E=
11" X-FVER=3D"2.0" X-ASN=3D"ANIM3D00-NONE-0000-0000-000000000000" X-ASNF=
=3D"0" X-ASH =3D"ANIM3D00-NONE-0000-0000-000000000000" X-ASHF =3D"1" X-AN =
=3D"6486DDE0-3EFD-11D4-BA3D-0050DAC68030" X-ANF=3D"0" X-AP=3D"6486DDE0-3EFD=
-11D4-BA3D-0050DAC68030" X-APF=3D"1" X-AD=3D"C3C52140-4147-11D4-BA3D-0050DA=
C68030" X-ADF=3D"0" SIGCOLOR=3D"0" ORGYPOS=3D"0"><TABLE id=3DINCREDIMAINTAB=
LE cellSpacing=3D0 cellPadding=3D2 width=3D"95%" border=3D0>
<TBODY>

<TR>

<TD id=3DINCREDITEXTREGION style=3D"PADDING-RIGHT: 7px; PADDING-LEFT: 7px; =
FONT-SIZE: 10pt; FONT-FAMILY: Comic Sans MS"=20
    width=3D"100%">
      <DIV>I down loaded the Euphoria package 4 days ago, so I'am very=20
      green.</DIV>
      <DIV>
      <DIV>I'am trying to create a "main menu" program using tab that will=
=20
      execute other programs.</DIV>
      <DIV>I modifiied some code Ifound in "EX05,EXW" to the procedure=20
      below</DIV></DIV>
      <DIV>&nbsp;</DIV>
      <DIV>&nbsp;</DIV>
      <DIV>global procedure onClick_MakeTable(integer self, integer event,=
=20
      sequence parms)<BR>&nbsp;&nbsp;&nbsp;=20
      shellExecute("open","work.exw",SW_NORMAL)</DIV>
      <DIV>&nbsp;&nbsp;end=20
      procedure&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;=20
      <BR></DIV>
      <DIV>This works.</DIV>
      <DIV>QUESTION:</DIV>
      <DIV>&nbsp;</DIV>
      <DIV>Is there a way to execute a procedure by clicking on a tab??</DI=
V>
      <DIV>&nbsp;</DIV>
      <DIV>Thanks for any help.</DIV></TD></TR>
<TR>
<TD id=3DINCREDIFOOTER width=3D"100%">
<TABLE cellSpacing=3D0 cellPadding=3D0 width=3D"100%">
<TBODY>
<TR>
<TD width=3D"100%"></TD>
<TD id=3DINCREDISOUND vAlign=3Dbottom align=3Dmiddle></TD>
<TD id=3DINCREDIANIM vAlign=3Dbottom align=3Dmiddle></TD></TR></TBODY></TAB=
LE></TD></TR></TBODY></TABLE><SPAN=20
id=3DIncrediStamp><SPAN dir=3Dltr><FONT face=3D"Arial, Helvetica, sans-seri=
f"=20
size=3D2>____________________________________________________<BR><FONT=20
face=3D"Comic Sans MS" size=3D2><A=20
href=3D"http://www.incredimail.com/redir.asp?ad_id=3D309&amp;lang=3D9"><IMG=
 alt=3D""=20
hspace=3D0 src=3D"cid:CC19C25A-37A4-461F-8D0E-262DC2DFABA5" align=3Dbaselin=
e=20
border=3D0></A>&nbsp; <I>IncrediMail</I> - <B>Email has finally evolved</B>=
 -=20
</FONT><A href=3D"http://www.incredimail.com/redir.asp?ad_id=3D309&amp;lang=
=3D9"><FONT=20
face=3D"Times New Roman" size=3D3><B><U>Click=20
--------------Boundary-00=3D_LRO7BHK0000000000000--

--------------Boundary-00=3D_KRO7G6G0000000000000
Content-Type: image/gif

new topic     » topic index » view thread      » older message » newer message

Search



Quick Links

User menu

Not signed in.

Misc Menu