dialog msg {
  title "Uhhhh"
  size -1 -1 80 120
  option dbu
  edit "", 1, 15 44 50 10
  button "Msg", 3, 14 85 37 12, ok
}

on *:dialog:sclick:3: {
  msg $active $did(1) 
}