Seite 1 von 1

[Done] CreateToolbar in einem Container funktioniert nicht

Verfasst: 23.09.2010 12:59
von Kiffi
Hallo,

folgender Code funktioniert unter Windows aber nicht unter Xubuntu.
Die Toolbar wird dort nicht erstellt.

Code: Alles auswählen

Enumeration
  #myWindow
  #myContainer
  #myToolbar
EndEnumeration

If OpenWindow(#myWindow, 0, 0, 300, 70, "ToolBar")
  ContainerGadget(#myContainer, 0, 0, 300, 50)
  If CreateToolBar(#myToolbar, GadgetID(#myContainer))
    ToolBarStandardButton(0, #PB_ToolBarIcon_New)
    ToolBarStandardButton(1, #PB_ToolBarIcon_Open)
    ToolBarStandardButton(2, #PB_ToolBarIcon_Save)
  Else
    Debug "Couldn't create #myToolbar"
  EndIf
  CloseGadgetList()
  Repeat
  Until WaitWindowEvent() = #PB_Event_CloseWindow 
EndIf
Kann das bitte jemand (gern auch mit anderen Distributionen) bestätigen?

Danke im Voraus & Grüße ... Kiffi

// Edit:

so gehts

Code: Alles auswählen

Enumeration
  #myWindow
  #myContainer
  #myToolbar
EndEnumeration

If OpenWindow(#myWindow, 0, 0, 300, 70, "ToolBar")
  
  ContainerGadget(#myContainer, 10, 10, 280, 50, #PB_Container_Flat)
  
  If CreateToolBar(#myToolbar, WindowID(#myWindow))
    
    CompilerSelect #PB_Compiler_OS
        
      CompilerCase #PB_OS_Linux
        gtk_widget_reparent_(ToolBarID(#myToolbar), GadgetID(#myContainer))
        
      CompilerCase #PB_OS_Windows
        SetParent_(ToolBarID(#myToolbar), GadgetID(#myContainer))
        
    CompilerEndSelect
    
    ToolBarStandardButton(0, #PB_ToolBarIcon_New)
    ToolBarStandardButton(1, #PB_ToolBarIcon_Open)
    ToolBarStandardButton(2, #PB_ToolBarIcon_Save)
    
  EndIf
  
  CloseGadgetList()
  
  Repeat
  Until WaitWindowEvent() = #PB_Event_CloseWindow 
  
EndIf
danke an das 'edle' Vögelchen, das mir den Tipp gezwitschert hat :allright: