gt_2_selctt

---我把选择的数量的函数单独的列举出来,这样效果就会很好用,
---每次调用就好,

----这样吧函数简单的改一下,就好不像以前那样写好多的代码了,
---- 结尾这样if kol== 2 then  return false 就不用再在函数中做判断了。效果就是很好用。

    fn gt_2_selctt    =
  (   
   kol =1
     if $selection.count !=1 then
  (
        if AboutRollout != undefined then destroydialog AboutRollout
  rollout AboutRollout "About"
  (
  label lbl5  "选择数量!=1 将不执行," pos:[10,10]
  label lbl3 "以此提醒。"
  timer tmclose "" interval:1000 active:true
  on AboutRollout rbuttonup press do destroydialog AboutRollout ------ 右键进行消除
  on tmclose tick do destroydialog AboutRollout  --时间按点到消除  给我提供了思路。
  )createdialog AboutRollout 200 100  modal:true style:#(#style_border,#style_sysmenu,#style_sunkenedge)
  
  kol+=1
     if kol== 2 then  return false
  )else ( return kol )
 
  )

posted on 2011-05-12 22:13  盖天00  阅读(110)  评论(0编辑  收藏  举报

导航