Sorry, I should of been more specific...

alias c dialog $iif($dialog(_combo),-x,-m _combo) _combo
dialog _combo {
  title "Test"
  size -1 -1 96 32
  option dbu
  combo 1, 2 1 92 50, size drop
  button "Close", 2, 62 18 32 12, cancel
}

On *:Dialog:_combo:init:*:{
  didtok $dname 1 44 Main Theme,My Theme,Dark Theme,Power Theme,Lame Theme,Gay Theme,Hawkee Theme
  did -c $dname 1 1
}