ich habe mich mal wieder an SB herangetraut und auch ein kleines Programm geschrieben welches unter SB auch läuft.
Code: Alles auswählen
EnableExplicit
Enumeration ID
#WinID
#BtnMove
#BtnSize
#BtnExit
EndEnumeration
#WindowWidth = 200
#WindowHeight = 260
Procedure CloseWindowEvent()
CloseWindow(EventWindow())
EndProcedure
Procedure GadgetEvents()
Select EventGadget()
Case #BtnMove
ResizeWindow(#WinID, 400, 500, #PB_Ignore, #PB_Ignore)
Case #BtnSize
ResizeWindow(#WinID, #PB_Ignore, #PB_Ignore, 320, 200) ; Resize the window to 320,200
Case #BtnExit
CloseWindowEvent()
EndSelect
EndProcedure
Procedure.a MainWindow_Create()
Protected pQuit.a
If OpenWindow(#WinID, 100, 200, #WindowWidth, #WindowHeight, "SpiderBasic Window", #PB_Window_BorderLess|#PB_Window_ScreenCentered)
ButtonGadget(#BtnMove, 40, 020, 120, 25, "Move the Window")
ButtonGadget(#BtnSize, 40, 060, 120, 25, "Resize the Window")
ButtonGadget(#BtnExit, 40, 100, 120, 25, "Abbruch")
pQuit = #True
EndIf
ProcedureReturn pQuit
EndProcedure
If MainWindow_Create()
BindEvent(#PB_Event_Gadget, @GadgetEvents())
BindEvent(#PB_Event_CloseWindow, @CloseWindowEvent())
EndIf
Selbst wenn ich den SB libraries Path eingebe und/oder Copy SB libraries anklicke, was natürlich eine Menge MB jedes mal ins Verzeichnis kopiert und nicht tragbar ist.
Sicherlich liegt der Fehler irgendwo bei mir aber ich habe auch ansonsten keine Ahnung von Java oder Html Programmierung und bis dato meine Hände davon gelassen.