func init()
  include("init_win_ctrl")
  
  fvar(old)
  old = block.select(BLK_BODY)
  //---------------------- CREATE ----------------------------------------------
  println(ctrl, ' := NewButton(' + PARENT_CTRL + ',', Caption, ');')

  //---------------------- PROPERTYS -------------------------------------------
  include("property_win_ctrl")

  //---------------------- EVENTS ----------------------------------------------
  if(linked(onClick))
    lng.begin_proc(ctrl + '_onClick(obj:PObj)')
      if(typeof(Data) = 19)
        event(onClick)
      else
        event(onClick, Data)
      end
    lng.end_proc(BLK_MTD_HEAD)
    
    println(ctrl, '.onClick := ' + ctrl + '_onClick;')
  end
  block.select(old)
end

func doCaption(Data)
  println(ctrl + '.Caption := ', e_str(Data), ';')
end

include("methods_win_ctrl")