Dink Software

What is NEW in Aurel Basic RC2 build 0.7 ?
--------------------------------------------------
changed command SET for array seting
to two new commands
SETNUMDIM for numeric array
SETSTRDIM for string array
added commmand SETWINSIZE
added command GETSTRING
updated ABasic tutorial
few bug fixed

download from:
http://aurelbasicsoft.ucoz.com/ABasic7F7.zip

All best...
Aurel

Suggestions:
- With the website button, open it in the user's default browser, not just Internet Explorer (i.e. Firefox is my default browser)
- Is the 'Build' disabled/not working yet?
- The language seems to be at a good level of functionality and the biggest thing it seems to need in my opinion is a better help/more tutorials needed so its easier to get started in it.

The cluster example and Sierpinski triangle program are particularly nice I thought.

What language did you write this in?

Hi Dink...
Yes i dont prefer IE too(I use K-Meleon-gecko based browser)
but onthis way is easier becose every windows have IE.
This is just unfinished help becose is RC release.

Yes Build is not included yet...will be soon...

It is written in IW Basic compiler.

New update:
new commands are:
CONTROLNOTIFY ID eTab eEnter
GETSELECTED ID itempos

you can download udated exe from:
http://aurelbasicsoft.ucoz.com/ABas7F7.zip
screenshot on:
http://aurelmm.byethost6.com/htdocs/

example with Listbox and new commands:

Code: Select all

'language::Aurel Basic
DEFSTR hw_text item$
DEFNUM lb2ID
LET lb2ID=251
DEFNUM itempos
'open window
WIN 0 0 400 300 WS_OVERLAPPED "ListBox..."
MainColor 220 220 230
FrontColor 0 0 180
Print 20 20 "SELECT ITEM & DOUBLECLICK"
Print 20 180 "SELECTED ITEM"
FrontColor 150 0 150
Print 200 20 "SELECT ITEM & PRESS ENTER"
Print 200 180 "SELECTED ITEM"

'crete two listbox controls ------------------------------
wControl wListbox 20 40 150 100 LSTANDARD|LNOTIFY 250
GOSUB additems_1
wControl wListbox 200 40 150 100 LSORT 251
'create editboxes
wControl wEditbox 20 160 150 20 FLAT 150
wControl wEditbox 200 160 150 20 FLAT 151
'set nofity as enable ENTER for control
ControlNotify 251 0 1
GOSUB additems_2

WAIT

SUBID 250
MessageBox "Listbox1<NOTIFY>" & "Double Clicked..OK!"
GetSelected 250 itempos
GetString 250 itempos item$
GOSUB show_selected_item1
ENDSUB

SUBID 251
MessageBox "Listbox1<ENTER>" & "ENTER Pressed..OK!"
GetSelected lb2ID itempos
GetString 251 itempos item$
GOSUB show_selected_item2
ENDSUB

SUB additems_1
AddString 250 "item 1"
AddString 250 "item 2"
AddString 250 "item 3"
AddString 250 "item 4"
AddString 250 "item 5"
AddString 250 "item 6"
AddString 250 "item 7"
AddString 250 "item 8"
AddString 250 "item 9"
AddString 250 "item 10"
RETURN

SUB additems_2
AddString 251 "item 1"
AddString 251 "item 2"
AddString 251 "item 3"
AddString 251 "item 4"
AddString 251 "item 5"
AddString 251 "item 6"
AddString 251 "item 7"
AddString 251 "item 8"
AddString 251 "item 9"
AddString 251 "item 10"
RETURN

SUB show_selected_item1
Settext 150 item$
RETURN 

SUB show_selected_item2
Settext 151 item$
RETURN

The example needs more commenting or help really I think. I.e. like what do 'LSTANDARD|LNOTIFY', 'LSORT', 'FLAT', ControlNotify etc do? What does GET SELECTED ID do? Is this used when using an array to populate the listbox to get the index?

Line 24, "ControlNotify 251 0 1" gives me an error about their being the wrong number of parameters and I didn't know how to fix it. If I comment out that line the program executes, but doesn't work as intended (no list boxes show due to that commented part).

CONTROLNOTIFY ID eTab eEnter
this command enable set NOTIFY flag to specific control
selected by ID number - clear now?
NOTIFY is notification message to control.
eTab -is enable Tab key(control repond on TAB key)
eEnter-is enable Enter key(control repond on ENTER key)
Understand now?
OK...
eTab canbe 0 or 1 (mean 0 -OFF,1-ON)
same thing for enter
you can of course use variable
DEFNUM TRUE FALSE
TRUE = 1
FALSE = 0
then set
Code:
------------------------------------------
CONTROLNOTIFY ID FALSE TRUE
----------------------------------------------
But first you must create Listbox then set CONTROLNOTIFY.
command :
---------------------------------------
GETSELECTED ID item_position
---------------------------------------
return or store listbox or combobox item into numeric variable item_position

That makes sense, thanks for the explanation. I still can't work out how to run the code without that error above though (I did download the new version also).

Dink....
As i say before just replace old ABas7F7.exe with this new one(updated).
Then copy/paste code to Aurel Basic editor.
firs you must save code to disk...
Save code into ABasic folder like listbox1.aon.
When you save new code you will see that gray run button will be green.
If is RUN button green you can run code....
or.....
Clear editor clicking 'new ' button.
Then load this new example listbox1 and click 'Run' button.
thats alll...

I did do that and it still didn't work. I even extracted to a new folder and ran it from there and it didn't work. Are you sure you uploaded the right file as the file in your original post here is the same (unless you updated that also)?

I just tesated updated file on my second computer and work perfect ...
you obviusly do something wrong...
after copy/paste code you must first save example to disk....then run OK.