No, it doesn't work even in empty project,
here is the source code
sync on
sync rate 60
backdrop on
color backdrop rgb(128,128,128)
autocam off
set window on
set window position 0,0
GUI()
do
`if load level button is clicked
if button clicked(ButtonLoadLevel)
OpenFile$=open file dialog("Select level script file","Script file (*.script)")
if asc(mid$(OpenFile$,1))<>0
file$=OpenFile$
if (fast right$(OpenFile$,6)="script")=0
endif
endif
endif
click=get clicked button()
if click>0
last$=str$(click)
last=click
endif
repeat
get event
handle=event get handle()
message=event get message()
if handle=get main window()
if message=WM_CLOSE
click=make message box("Are you sure you want to quit?","The zone editor",MB_YESNO)
if click=IDYES
end bbb gui
endif
endif
endif
until message=0
sync
loop
`editor interface gui
function GUI()
`setup gui
start bbb gui
windows set font 8,"Arial",0,0,0,0
windows set icon "EditorIcon.ico"
windows set visibility 1
`draw main window
GuiMainWin=get dbpro window()
set main window GuiMainWin
MainWin=make window(200,250,640,320,"Tools",GuiMainWin,WS_OVRLAPPEDWINDOW)
`draw buttons
`load level button
ButtonLoadLevel=make button(10,10,150,20,"Load level",MainWin)
window set property MainWin,"id","1"
`save level button
ButtonSaveLevel=make button(10,35,150,20,"Save level",MainWin)
window set property MainWin,"id","2"
`make player button
ButtonMakePlayer=make button(10,60,150,20,"Make player",MainWin)
window set property MainWin,"id","3"
`make ai button
ButtonMakeAi=make button(10,85,150,20,"Make AI",MainWin)
window set property MainWin,"id","4"
`make ai node button
ButtonMakeAiNode=make button(10,110,150,20,"Make AI node",MainWin)
window set property MainWin,"id","5"
`make light button
ButtonMakeLight=make button(10,135,150,20,"Make light",MainWin)
window set property MainWin,"id","6"
`make sound button
ButtonMakeSound=make button(10,160,150,20,"Make sound",MainWin)
window set property MainWin,"id","7"
`make camera button
ButtonMakeCamera=make button(10,185,150,20,"Make camera",MainWin)
window set property MainWin,"id","8"
`make camera path button
ButtonMakeCameraPath=make button(10,210,150,20,"Make camera path",MainWin)
window set property MainWin,"id","9"
`make camera point button
ButtonMakeCameraPoint=make button(10,235,150,20,"Make camera point",MainWin)
window set property MainWin,"id","10"
`make special button
ButtonMakeSpecial=make button(10,260,150,20,"Make special",MainWin)
window set property MainWin,"id","11"
endfunction
I also included bbbgui_constants.dba file and still no solution.
