|
发表于 2012-11-7 19:25:05
|
显示全部楼层
天津市天津市
本帖最后由 泽拉图 于 2012-11-7 19:58 编辑
模块版本: 3.12
所用系统: Win7 x86
命令名称:
BUG描述:
我的建议:建议添加3个命令
1.控制台_置标题
调用kernel32.dll的SetConsoleTitleA命令
2.控制台_禁用关闭按钮 (为了防止控制台应用程序在使用过程中不慎点击关闭按钮而关闭)
代码如下(需要调用API)- .版本 2
- DeleteMenu (GetSystemMenu (GetConsoleWindow (), 假), 61536, 0)
- DrawMenuBar (GetConsoleWindow ())
复制代码 DLL命令如下:- .版本 2
- .DLL命令 GetConsoleWindow, 整数型
- .DLL命令 DeleteMenu
- .参数 hMenu, 整数型
- .参数 uPosition, 整数型
- .参数 uFlags, 整数型
- .DLL命令 GetSystemMenu, 整数型
- .参数 hWnd, 整数型
- .参数 bRevert, 逻辑型
- .DLL命令 DrawMenuBar
- .参数 hWnd, 整数型
复制代码 效果如下:
3.时间_时间输出
代码如下:- .版本 2
- .子程序
- <span style="background-color: rgb(255, 255, 255); ">时间_时间输出</span>, 文本型
- .参数 t, 日期时间型, 可空
- .参数 format, 文本型, 可空
- .局部变量 Buff, 文本型
- .局部变量 st, 短整数型, , "8"
- Buff = 取空白文本 (50)
- .如果 (是否为空 (t))
- GetLocalTime (st)
- .否则
- VariantTimeToSystemTime (t, st)
- .如果结束
- GetDateFormat (0, 0, st, 选择 (format ≠ “”, format, “yyyy/MM/dd HH:mm:ss”), Buff, 50)
- GetTimeFormat (0, 0, st, Buff, Buff, 50)
- 返回 (Buff)
复制代码 DLL命令如下:- .版本 2
- .DLL命令 GetDateFormat, 整数型, "Kernel32.dll", "GetDateFormatA"
- .参数 Locale, 整数型
- .参数 dwFlags, 整数型
- .参数 lpDate, 短整数型, 数组
- .参数 lpFormat, 文本型
- .参数 lpDateStr, 文本型
- .参数 cchDate, 整数型
- .DLL命令 GetTimeFormat, 整数型, "Kernel32.dll", "GetTimeFormatA"
- .参数 Locale, 整数型
- .参数 dwFlags, 整数型
- .参数 lpTime, 短整数型, 数组
- .参数 lpFormat, 文本型
- .参数 lpTimeStr, 文本型
- .参数 cchTime, 整数型
- .DLL命令 GetLocalTime, , "Kernel32.dll", "GetLocalTime"
- .参数 lpSystemTime, 短整数型, 数组
- .DLL命令 VariantTimeToSystemTime, 整数型, "oleaut32.dll", "VariantTimeToSystemTime"
- .参数 vtime, 日期时间型
- .参数 lpSystemTime, 短整数型, 数组
复制代码 QQ:1747050385
|
|