eingeschalteten Debugger getestet:
ImageMenu.pb
Code: Alles auswählen
If OpenWindow(0, 100, 100, 300, 300, "PureBasic Office Menus")
LoadImage(0,"kerze.ico")
If CreateImageMenu(0, WindowID(0))
MenuTitle("File")
MenuItem( 1, "Open...", ImageID(0))
MenuItem( 2, "Save"+Chr(10)+"Ctrl+S")
MenuItem( 3, "Close", ImageID(0))
MenuBar()
MenuItem( 4, "Quit")
DisableMenuItem(0, 3, 1)
EndIf
Repeat
Select WaitWindowEvent()
Case #PB_Event_Menu
Debug EventMenu()
Case #PB_Event_CloseWindow
Break ; Quit the forever loop
EndSelect
ForEver
EndIf
;End ;<-- ohne dieses End gibt es in PB ein Memoryfehler im Betabeispiel!
auf die Schliessbox klicke taucht bei mir in der Statusleiste
folgende Debug-Fehlermeldung auf:
[ERROR] ImageMenu.pb (Line:28) -- also nach dem letzten Endif wo nix ist.
[ERROR]Invalid memory acces. (read error at adress 23526391)
Wenn ich am Sourceende ein End hinzufüge, läuft das Programm so wie es
soll.
Das Komische ist aber, das unter Windows Me der gleiche Source ohne
End keine Probleme macht
Kann das jemand unter den Vistanutzern bestätigen?
Gruß Falko