yxi.prg

来自「VFP开发的一个拼图游戏」· PRG 代码 · 共 9 行

SET TALK off
RELEASE WINDOW 常用
deactivate window "项目管理器"
_SCREEN.visible=.f.
mypath=lower(allt(left(sys(16),rat("\",sys(16)))))
set defa to (mypath)
do form yxi
read even