我程序如下图所示,当鼠标移到恢复系统那个按钮上出现提示黄颜色提示框({
见贴http://bbs.wuyou.net/forum.php?m ... ;tid=137183&highlight=%2Bzhweb作者: chen463 时间: 2009-11-25 18:31
这个功能,我也想学的,那位先学者知道,教导一下,如何应用。作者: 阿文 时间: 2009-11-26 22:58
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 时间: 2009-11-27 11:57
阿文版主:
这上面指令,可能还有其他相关需配合?...能否教学说明这指令用法
........
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:
...
想加个简单的提示, "小心使用``备份恢复"
又该如何应用??谢谢。作者: jiangfeng321 时间: 2009-11-27 13:38
哦 加了判断语句 不过估计里面有更多的判断作者: 阿文 时间: 2009-11-28 22:45
有前面做个定义,加个一段
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