if !strComp(Password,"1")=0 then
   Password=""
   提示="请输入密码！"
   !CloseAllWindow("设置")
   颜色 = 0
   '!CloseSubWnd(输入密码)
else
   Password=""
   提示="密码错误，请重新输入！"
   颜色 = 1
endif