OpenEuphoria

2. Re: Menu Program

• Posted by c.k.lester <euphoric at cklester.com> Jan 19, 2007
• 785 views

Rich Klender wrote:
> 
> Hey
> Does anyone know if there is a program in the archive that displays a
> simple text menu?  i.e.
> 
> 1.) <some option>
> 2.) <some option>
> 3.) <some option>
> 4.) Exit
> 
> Press 1,2,3,4
> 
> Just wondering, wanted something to look at for an example.

Try http://www.rapideuphoria.com/txt_dialogs.zip

That's for text mode interfacing... If you want Win32, you'll have to try
something else. :)

4. Re: Menu Program

• Posted by "Greg Haberek" <ghaberek at gmail.com> Jan 27, 2007
• 827 views
• Last edited Jan 28, 2007

On 1/27/07, Rich Klender <guest at rapideuphoria.com> wrote:
>
> Does anyone know if there is a program in the archive that displays a
> simple text menu?  i.e.

Here's a good example:

include get.e

function do_menu( sequence title, sequence options, sequence prompt )

    integer min, max, sel

    min = 1
    max = length( options )

    printf( 1, "%s\n\n", {title} )
    for i = min to max do
        printf( 1, "    %d) %s\n", {i, options[i]} )
    end for

    prompt = "\n    " & prompt
    sel = prompt_number( prompt, {min, max} )

    return sel
end function

sequence options
integer sel

    options = {"Chevy", "Ford", "Dodge"}

    sel = do_menu( "Car Menu", options, "Please select a car:" )

    printf( 1, "\nYou selected %s!\n", {options[sel]} )

6. Re: Menu Program

• Posted by Chris Bensler <bensler at nt.net> Jan 31, 2007
• 771 views
• Last edited Feb 01, 2007

Rich Klender wrote:
> 
> ...so I have my 1st program
> that actually does something and works without any errors!
> 
> Probably not much of a milestone, but I was pretty proud!!

You should be proud. The hardest part about learning to program is breaking the
ice. Things begin to click quickly once you understand the basic principles.

Congratulations.


Chris Bensler
~ The difference between ordinary and extraordinary is that little extra ~
http://empire.iwireweb.com - Empire for Euphoria

8. Menu Program

• Posted by "Don Austin" <dgaustin at mchsi.com> Oct 23, 2003
• 781 views

I was informed I should use plain text for E-Mail=0D
This is try #2=0D
=0D
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.