OpenEuphoria

Re: Getting started with IDE

• Posted by Chris Burch <chriscrylex at aol.com> Mar 19, 2006
• 525 views

JAYBEEDEE wrote:
> 
> don cole wrote:
> > 
> > JAYBEEDEE wrote:
> > > 
> > > I'm investigating use of Euphoria, but just cannot get started with IDE.
> > > 
> > > Could someone talk me through a simple program such as adding two numbers.
> > > \
> > }}}
<eucode>
> > atom first_num,second_num
> > first_num=1
> > sec_num=2
> > ?first_num + second_num
> > </eucode>
{{{

> > 
> > > I cannot get the widgets (buttons for example) to link to any code.
> > 
> > this is an wxWindows issue not an IDE issue.

Not really, a widget is a device on a window, wxWidgets is the name of the
program that puts widgets on the window.

> > 
> > > 
> > > Perhaps Charles Newbold could write another chapter to his excellent Intro
> > > to
> > > Euphoria Programming covering basic use of the IDE
> > > 
> > > Any help greatly appreciated!
> > 
> > 
> > Don Cole
> 
> Thanks, Don,
> 
> Fine, but if I put that code into an IDE button procedure it will only revert
> to the DOS window to run.
> 
> How does one set up the equivalent of Visual Basic's Input or Output Boxes,
> and get the output shown in a window window?

A _very_ quick tutorial on adding two numbers

1. Open the IDE
2. Click the input tab from the controls at the bottom
3. Click an input box (hold your mouse over the controls - it will say Edit
text)
4. Click somewhere on Window 1
5. Click the input box on the contriols section again
6. Click under the previously created input box
7. Click the controls tab of the controls
8. Click a button
9. Click somehwere else on Window 1
10. Add another input box
11. By clicking on each of the controls on the window, you can reposition and
resize them ubntil you have what you like
12. Click an input, select caption in the property list, and delete the caption
(not the name). Repeat for the other input boxes.
13. Click the button, change the caption to 'Add'
14. Double click the Add button
15. copy and paste the following code into the new window that has popped up.

object a, b, c

a = 0
b = 0

if length(getText(EditText2)) > 0  then
	a = w32TextToNumber(getText(EditText2))	
end if
if length(getText(EditText3)) > 0  then
	b = w32TextToNumber(getText(EditText3))	
end if

c = a + b

setText(EditText5, sprintf("%f", {c}) )

http://members.aol.com/chriscrylex/euphoria.htm
http://uboard.proboards32.com/
http://members.aol.com/chriscrylex/EUSQLite/eusql.html