请问这样的效果QBWIN是怎么做出来的

zhweb

如下图所示（图片来源于阿文版主的一键恢复），就是鼠标放到恢复系统按钮上会出现的黄颜色的提示框。我找QBWIN的说明文明看了半天也做不出来。


[ 本帖最后由 zhweb 于 2009-3-25 18:02 编辑 ]

zhweb

谢谢阿文版主的回复，这么长时间了，才看到

阿文

有前面做个定义，加个一段
FOR C = 0 TO 1
      A = C: B = C
        Frame(A).X = Button(2).X
        Frame(A).Y = Button(2).Y
        Frame(A).W = Button(2).W
        Frame(A).H = Button(2).H
NEXT
       A = 2: B = 0
        Frame(A).X = Label(1).X
        Frame(A).Y = Label(1).Y
        Frame(A).W = LEN(LabelCap(1)) * 6 + 12
        Frame(A).H = 12

      SumFrame = 2

是否备份看你怎么判断了，是根据文件存在还是图标禁用等来判断都可以。

jiangfeng321

哦 加了判断语句 不过估计里面有更多的判断

chen463

阿文版主：
这上面指令，可能还有其他相关需配合？...能否教学说明这指令用法

........
      LoadFrame 1   '读入框架  是否读入到变量
     
      DATA 25,40,70,30,1,0,15,6,""
变量框架，我已经作好，想在
SUB C.FrameMouseInOut (NWin, Inx, State)
Sel = NWin * 100 + Inx
  SELECT CASE Sel

CASE 100:
...
想加个简单的提示， "小心使用``备份恢复"
又该如何应用？？谢谢。

阿文

SUB C.FrameMouseInOut (NWin, Inx, State)
  sel = NWin * 100 + Inx
  SELECT CASE sel
  
    CASE 0 TO 10:
      IF ZMsg = 2 THEN ZMTime = ZMTime - 10: C.Timer NWin, KeyCode
      IF State = 0 THEN ZMsg = 0
      
      IF State = 1 THEN
ZMsgg$ = ""
SELECT CASE Inx
   CASE 0:
   CASE 1:
     IF Button(2).Enabled = 0 THEN ZMsgg$ = "系统没有安全备份``请及时备份您的系统`按 F8 备份当前系统"
       IF Button(2).Enabled = -1 THEN ZMsgg$ = "您已经备份系统``按此处恢复系统`点击或按F5恢复"
END SELECT
IF ZMsgg$ <> "" THEN ZMsg = 1 ELSE ZMsg = 0

      END IF
   
  END SELECT
  
END SUB

chen463

这个功能，我也想学的，那位先学者知道，教导一下，如何应用。

zhweb

原帖由 zjq20032006 于 2009-3-27 12:21 发表
你的QWIN说明在那，发上来我帮你指出

我程序如下图所示，当鼠标移到恢复系统那个按钮上出现提示黄颜色提示框（{
见贴http://bbs.wuyou.net/forum.php?m ... ;tid=137183&amp;highlight=%2Bzhweb

zjq20032006

你的QWIN说明在那，发上来我帮你指出