;Ab Vista

EnableExplicit

Define EventID
Define combomem

If OpenWindow(0,0,0,500,400,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  ComboBoxGadget(1,10,10,200,20,0)
  AddGadgetItem(1,-1,"Item 1",0,0)
  AddGadgetItem(1,-1,"Item 2",0,0)
  AddGadgetItem(1,-1,"Item 3",0,0)
  
  combomem = AllocateMemory(40)
  PokeS(combomem, "Deine Nachricht...", -1, #PB_Unicode)
  SendMessage_(GadgetID(1), #CB_SETCUEBANNER, 0, combomem)
  
  Repeat
    EventID=WaitWindowEvent()
    If EventID = #PB_Event_CloseWindow
      End
    EndIf
  ForEver
EndIf
; IDE Options = PureBasic 4.60 Beta 2 (Windows - x86)
; CursorPosition = 23
; EnableXP