📄 main.bak
字号:
local lcsys16,mypath
lcsys16=sys(16)
mypath=lower(alltrim(left(lcsys16,rat("\",lcsys16))))
set defa to (mypath)
set path to form,data,frx
set sysmenu off
set talk off
set notify off
set clock status
set bell on
set escape on
set keycomp to windows
set exact on
set exclusive off
set multilocks on
set century on
set message on
set safety off
set deleted on
release windows "standard"
release windows "项目"
deactivate window ""
zoom window screen max
modify window screen title "学生管理系统 "
do form fm
open database bb
set color set to
set color of scheme 2 to ,,rgb(255,255,255,0,0,255)
read events
close all
clear events
set sysmenu to default
set sysmenu on
set talk on
set notify on
set exclusive on
set safety on
quit
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -