DO
'桌面定义
'格式: DrawDesktop 提示行开关,桌面颜色,提示行字体颜色,背景色,提示文字$
IF ExitWin < 2 THEN DrawDesktop 2, 3, 0, 7, "Ctrl+X:关闭窗口 Ctrl+F1:输入法"
'各表单控件读入区域, 读入各种控件之间用 [=] 表示该种控件读完
SELECT CASE Wins
'123.QWF
CASE 0:
'格式: LoadWindow X,Y,W,H,Font,BC,Box,TC,Caption
LoadWindow 160,100,320,240,10,7,-1,1,"Form"
RESTORE WIN00
WIN00:
'热键值: Alt+ F1=360 1=376 Q=272 A=286 Z=300
'LoadMenu '读入菜单
'格式: DATA [-,Hotkey,] Enabled,Value,Caption []里的参数为分组用
'DATA -,289,1,0,文件(F)
'DATA 1,0,Menu(1)
'DATA =
'格式: DATA X,Y,W,H,Enabled,FC,FW,FH,Hotkey,Caption
LoadButton 0 '读入命令按钮 背景框
DATA 95,60,70,19,-1,0,0,12,-1,"Button(1)"
DATA =
'234.QWF
CASE 1:
'格式: LoadWindow X,Y,W,H,Font,BC,Box,TC,Caption
LoadWindow 160,100,320,240,10,7,-1,1,"Form"
RESTORE WIN01
WIN01:
'热键值: Alt+ F1=360 1=376 Q=272 A=286 Z=300
'LoadMenu '读入菜单
'格式: DATA [-,Hotkey,] Enabled,Value,Caption []里的参数为分组用
'DATA -,289,1,0,文件(F)
'DATA 1,0,Menu(1)
'DATA =
'格式: DATA X,Y,W,H,Enabled,FC,FW,FH,Hotkey,Caption
LoadButton 0 '读入命令按钮 背景框
DATA 95,80,70,19,-1,0,0,12,-1,"Button(1)"
DATA =
END SELECT |