Editor close/re-open

When the Panoramic editor throws an error,you go back and correct it but it requires closing ..saving and re-open.

to avoid this is one way. simply use the wait command

rem hang the form
wait 100
l

Now....this will hang up the form if an error thrown

Test it

rem create an error on purpose

picture 1
left 1,10
top 1,20
width 1,48
height 1,48
file_load 1,"airplane.png"

an error will be thrown but the form is still created
close the form and go back to the editor. You see the red arrow ready
to use again without having to close and re-open

Yes this is little bit annoying.
i think that author must fix this behavier.
And one thing i dont understand.
When i use for comment sign '
interpreter return error?
why is that?
So is this only keyword REM proper way for comments?

Aurel
author of Aurel Basic

PS.Keep up the good work.

For the comment, you have two possibilities:
- the traditional one: rem followed by a space
- the "modern" one: ' followed by a space
In this case, the line is colored in purple by the editor.

Finally got around to making the editor, Added Copy, paste, cut functions, Code below

dim a$:dim b$
rem defines line labels
label quit : label ed1 :label sav : label edp : label rtln
label er3 : label nw : label cp :label pt : label ud

rem defines form Label
caption 0,"ViewerPro Ver. 1.0"

rem Creates Dialog Box + filters
open_dialog 11
filter 11,"All Files|*.*|Text Files|*.Txt|Doc Files|*.Doc|RTF Files|*.RTF"
Save_dialog 13
filter 13,"All Files|*.*|Text Files|*.Txt|Doc Files|*.Doc|RTF Files|*.RTF"


rtln:
rem menus---------------------------------------------------------------
main_menu 1
on_error_goto er3
rem Creation of 2 Main_menus at the same level
sub_menu 2 : caption 2,"File" : parent 2, 1
sub_menu 3 : caption 3,"Edit" : parent 3, 1

rem Creation of 3 Sub_Menus to Main_Menu 2 (File)
sub_menu 4 : caption 4,"New" : parent 4, 2
sub_menu 5 : caption 5,"Open" : parent 5, 2
sub_menu 6 : caption 6,"Save" : parent 6, 2
sub_menu 7 : caption 7,"Quit" : parent 7, 2
rem action on click , line number
on_click 4, nw
on_click 5, ed1
on_click 6, sav
on_click 7, edp

rem Creation of 3 Sub_Menus to Main_Menu 3 (Edit)
sub_menu 8 : caption 8,"Copy" : parent 8, 3
sub_menu 9 : caption 9,"Paste" : parent 9, 3
sub_menu 10 : caption 10,"Cut" : parent 10, 3
rem action on click , line number
on_click 8, cp
on_click 9, pt
on_click 10, ud
rem menu----------------------------------------------------------------

rem Inserts text box + Size
memo 12
width 12,800
height 12,600

rem --------------------------------------------------------------------
rem clipboard functions + Memo #
cp:
clipboard_copy 12
goto rtln:
pt:
clipboard_paste 12
goto rtln:
ud:
clipboard_cut 12
goto rtln:
rem -------------------------------------------------------------------
end

quit:
terminate
return

nw:
clear 12
return

ed1:
rem open_dialog 11
a$=file_name$(11)
file_load 12, a$
return

sav:
rem Save_dialog 13
b$=file_name$(13)
file_save 12, b$
return

er3:
print error_type$
return

edp:
terminate

****************************************
PANORAMIC V 0.9.24 ist verfügbar
PANORAMIC V 0.9.24 is available
PANORAMIC V 0.9.24 est disponible
PANORAMIC V 0.9.24 es disponible

Das Forum Panoramic ist wieder aktiv.
Bitte besucht uns.

The forum Panoramic is active again.

Please, visits us.

Le forum Panoramic est actif de nouveau.

S'il vous plaît, nous visite.

El foro Panoramic es de nuevo activo.

Por favor, nos visita.
********************************************

Precision,

if you use the : ' for yours comments, don't forget to leave a space between ' and text.