通过ODBC从NT网络读取数据库数据的时候长时间等待的原因？请各位发表帮忙解决

hyz 2000-06-25 09:41:00
我的配置如下：
服务器NT Server + SQL Server,客户端：Win98 通过ODBC与SQL Server连接。VC++下编程。
问题：有时读取数据的时候长时间等待，感觉很慢。有时又很畅顺。Win98 登陆到NT是正常的。是那方面出的问题呢？
...全文
178 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
hyz 2000-06-29
  • 打赏
  • 举报
 回复
就算慢也不应该经常连不上。有时ODBC也会出现连接失败。有时慢得不可思议。因为连在网上的只有服务器和本机共两台，根本不存在阻塞。
hyz 2000-06-28
  • 打赏
  • 举报
 回复
局域网中的慢是不正常的。我这几天都是用TCP/IP，一直都没问题。但觉得怪。在ODBC中设置SQL时默认的是pipe name,为什么会不正常。而改为TCP/IP后就好了。对于pipe name，是哪里设置有问题？
yrc 2000-06-28
  • 打赏
  • 举报
 回复
网络上本来就时慢时快，因为网络流量总是变化的。
harley 2000-06-28
  • 打赏
  • 举报
 回复
oracle 的pipe name 比tcpip 要慢。这和操作系统有关。你可以看看有关操作系统
的资料。
hyz 2000-06-26
  • 打赏
  • 举报
 回复
各位同仁，我发现我原先在ODBC设置SQL时的网络连接是通过pipe name，昨天我改为TCP/IP，到现在没有出现慢的感觉。有可能是这个原因。
beta 2000-06-26
  • 打赏
  • 举报
 回复
哈哈，是不是你的服务器上面启用了OpenGL的屏幕保护啊？如果是的话......
cwq 2000-06-26
  • 打赏
  • 举报
 回复
1.SQL server服务全了吗?
2.数据量大吗
3.有无缩引
4.再试试吧
leslielu 2000-06-26
  • 打赏
  • 举报
 回复
关注。
Wonny 2000-06-26
  • 打赏
  • 举报
 回复
表锁定（sorry）
Wonny 2000-06-26
  • 打赏
  • 举报
 回复
是不是格锁定有关？
php使用sql数据库 获取字段问题介绍
在PB开发过程中，由于数据库中使用了 ntext字段，出现以下提示错误，郁闷了很长时间找不到解决方案，后查阅大量资料，终于明白：PB报错: 不能用 DB-Library（如 ISQL）或 ODBC 3.7 或更早版本将 ntext 数据或仅使用 Unicode 排序规则的 Unicode 数据发送到客户端。————————————————由于sql server中，ntext和nvarchar字段是用unicode编码存储内容的，因此php通过mssql扩展读取带ntext和nvarchar类型字段的时候会抱错。 如果 title 字段类型为 nvarchar，content 字段类型为 nt
易语言程序免安装版下载
易语言5.1 相对于易语言5.0更新说明： 　　支持静态链接其它编程语言（如C/C++、汇编等）编译生成的静态库（.LIB或.OBJ），但仅限于COFF格式，支持cdecl和stdcall两种函数调用约定。 　　使用说明如下：函数声明和调用方法与DLL命令一致；“库文件名”以.lib或.obj为后缀的将被视为静态库，可使用绝对路径或相对路径（相对当前源代码所在目录），如依赖多个静态库请分别列出并以逗号分隔；“在库中的对应命令名”请务必准确填写静态库中公开导出的符号名称（C函数(cdecl)编译后，符号名称通常是在函数名称前加下划线(_)）；“在库中的对应命令名”以@开头表示以cdecl方式调用，否则表示以默认的stdcall方式调用；各参数声明要与其定义一致。 　　请参考易语言安装目录内的例程：samples\静态编译\调用LIB和OBJ 1. 静态编译方面的改进和优化。 2. 符号重命名程序(resym.exe)增加对.obj文件的支持，并更新了文档(sdk\static_docs)。 3. 编译生成安装软件时已支持打包静态编译后的程序，但需事先静态编译出该程序。 4. 升级加密狗驱动程序，增加了对 Windows 7, Vista 等操作系统的支持。 5. 操作系统界面功能支持库(shell.fne)中的“执行()”命令增加一个参数“窗口显示方式”，作用与核心库“运行()”命令的同名参数一致。 6. 数据库操作支持库增加读写长整数字段的功能，但受限于系统接口暂不能读写超出整数范围的数值。 7. 修改高级表格支持库，通过鼠标调整行高列宽时不改变当前光标行列号。 8. 修改BUG：在IDE中打开源代码文件(.e)后，高级选择夹组件不能正确切换到“现行子夹”属性设定的子夹。 9. 修改BUG：矢量动画支持库中的“矢量编辑框”组件在光标位于组件右下角时按右光标键进入下一行会导致显示错误。 10. 修改BUG：矢量动画支持库中的“矢量编辑框”组件在光标位于组件左上角时按左光标键进入前一行可能会导致显示错误或内存申请失败。 11. 修改BUG：网络传送支持库在使用代理下载时可能会导致程序崩溃。 12. 修改BUG：超级列表框.置列图片()有时功能不正常或导致随机错误。 13. 修改BUG：Sqlite3数据库支持库中的“Sqlite记录集.绑定参数()”命令不支持汉字/UTF-8。 14. 修改BUG：VCL相关支持库部分组件在修改个别属性或调用个别方法后不可见，并改进了Delphi版本的支持库SDK。 15. 修改BUG：高级表格在列类型为数值型时，添加新行且省略标题的情况下，会导致程序异常。 16. 修改BUG：数值计算支持库“大数.四舍五入()”命令在最高位进位时，会导致程序异常。 17. 修改BUG：办公组件支持库打印进度对话框的标题和用户设置的内容不一致。 18. 修改BUG：办公组件静态编译后无法正常销毁。 19. 修改BUG：应用接口支持库“取内存容量信息()”命令不能正常处理大于2G的内存。 20. 修改BUG：超级列表框在属性“整行选择”为真时，鼠标单击第一列右面也会导致第一列中的选择框被选中或取消选中。 21. 修改BUG：Sqlite3数据库支持库中“Sqlite数据库.取错误文本()”返回的文本是UTF-8编码（应是GB18030编码）。 -------------------------------------------------------------------------------- 易语言5.0 相对于易语言4.x更新说明（2010/02/01）： 　　增加静态编译功能，支持挂接第三方链接器（比如VC6中的link.exe）。 　　静态编译后的易语言可执行程序(exe)和动态链接库(dll)，运行时不再依赖任何支持库文件，文件尺寸更小（相对以前的独立编译），PE结构更合理（取消了“易格式体”），加载速度更快，而且有效解决了“病毒误报”和“易被脱壳”的难题。 　　为实现静态编译，易语言编译器、核心支持库、集成开发环境(IDE)等均有重大更新，支持库开发架框有扩展性调整，绝大多数官方支持库都已针对静态编译完成自身改造并提供静态库。 　　目前绝大多数官方支持库均已支持静态编译，只有极少数不支持静态编译：vclbase.fne, jedi.fne, com.run/cominf.run/ocx.run。 　　第三方支持库，由源代码作者按照静态编译技术文档（参见sdk\static_docs）完成自身改造并提供静态库后，可支持静态编译。外部OCX组件和COM组件，不支持静态编译。 　　此次重大版本升级不影响以前的源代码(.e)和模块(.ec)。只要代码或模块中未用到“不支持静态编译”的支持库、COM/OCX等，都可以静态编译。以前编译好的模块(.ec)甚至不需要重新编译即可直接支持静态编译。 　　支持库开发框架调整是扩展性调整，比较好的做到了向前向后兼容。即，新版支持库可被旧版易语言或易程序使用，旧版支持库也可被新版易语言或易程序使用（只是不支持静态编译）。 　　静态编译后的易语言EXE/DLL之间不能再共享譬如窗口、窗口组件等类似资源，对于已经静态连接到一个EXE/DLL中的支持库，该支持库中的数据或资源将不能再被其它EXE/DLL中所使用的同名支持库访问。这是因为代码被分别静态链接接到各个独立模块（EXE/DLL）中。 版权所有 (C) 2009 - 2010，保留所有权利。 大连大有吴涛易语言软件开发有限公司 http://www.eyuyan.com -------------------------------------------------------------------------------- 易语言5.0测试版3相对于测试版2更新内容： 1. 支持设置程序(EXE)图标 2. 支持设置使用通用组件库6.0 3. 支持“链接后动作(post_link_action)”（参见tools\link.ini中注释） 4. 重新整理所有官方支持库的静态库，有望彻底解决链接时可能出现的符号冲突 5. 全面取消静态编译中的人为功能限制（此前有最多5个支持库同时参与静态链接等功能限制） 6. 公开易语言静态编译技术文档（参见sdk\static_docs），便于第三方支持库作者针对静态编译进行支持库改造 7. 修改以下多个BUG： 1) 修改在静态编译的DLL中调用其它DLL失败的BUG 2) 修改静态编译后“选择列表框”在“单选”属性为真时不显示项目内容的BUG 3) 修改核心库中“播放音乐”命令在没有声卡或声卡被禁用时未正确释放资源的BUG 4) 修改静态编译后“读配置项”命令在第三个参数“配置项名称”为空文本时导致程序崩溃的BUG 5) 修改高级选择夹中的组件在窗口载入后强制得到焦点的BUG 6) 修改MYSQL支持库跨静态编译的EXE和DLL传递连接句柄和记录集句柄无效的BUG（改动较大，可能会产生兼容性问题，我们已经仔细测试，也请使用到此库的用户帮助我们多多测试，以便及早发现问题，谢谢） 7) 其它修改 注意：静态编译后的易语言EXE和DLL之间不能再共享“某些”句柄或资源，这一点和原动态连接时的程序行为不能保持一致，使用时请务必设法避免此类用法（MYSQL支持库我们作了特别处理）。 注意：静态编译后常量数据位于PE文件的.rdata段中，只可读不可写，编程时请避免修改它们。譬如以下的代码，静态编译后就可能会出现问题： a = " " GetWindowTextA(hWnd, a, 20) 正确的代码为： a = 取空白文本 (20) GetWindowTextA(hWnd, a, 20) 易语言5.0测试版2相对于测试版1的更新内容： 1. 修改了很多由于符号冲突而导致无法完成静态编译的BUG 易语言5.0测试版1发布于2009/12/28，是易语言5.0静态编译版第一个公开测试版本 ******************************************************************************** ** 以下是易语言4.x及以前版本的升级信息 ******************************************************************************** 易语言4.14版相对于4.13更新说明： 对易语言核心支持库、编译器、开发环境的更新： 1. 修复了打印机对象的自定义纸张尺寸的支持问题 2. 修复了打印机对象的打印份数的支持问题 3. 修复了滑块条的选择长度不能到最大的问题 对其它支持库的更新： 1. 修改XML解析支持库，解决“XML树.取节点值文本()”返回的文本会失效的BUG。 2. 修改高级表格支持库，解决在鼠标按下和抬起之间收到时钟周期事件的情况下，无法收到“被单击”事件的BUG。 3. 修改扩展界面支持库三，解决单击卷帘菜单后导致日期框不能弹出下拉窗口的BUG。 4. 修改XP风格支持库，解决GDI资源泄露，以及在使用通用组件库六时组合框标题出现重影的BUG。 5. 修改扩展界面支持库一，解决树形框项目无法通过鼠标点击进入编辑状态的BUG。 6. 修改高级表格支持库，解决插入行/插入列在未指定行号/列号的情况下插入位置不正确的BUG。 7. 修改文本语音转换支持库，增加“机读文本.重新创建并初始化()”方法。 8. 修改应用接口支持库，增强“取快捷方式目标”命令功能，可以获取目标、参数、启始位置、图标、运行方式、快捷键、备注等信息。 9. 修改扩展界面支持库三，解决高级选择夹会导致所在窗口的收不到“首次激活”事件的BUG，相应地修改了核心库和开发环境。 10. 为所有支持库文件统一添加了版本信息。 -------------------------------------------------------------------------------- 易语言4.13版相对于4.12更新说明（2009/4/13）： 对易语言编译器、开发环境、核心支持库的更新： 1. 修改核心支持库，为窗口增加一个“窗口类名”属性。 2. 修改核心支持库，为外部数据库的连接类命令增加参数“不显示ODBC连接对话框”。 3. 修改核心支持库，解决用“播放音乐()”播放“音频采样大小为24位”的WAV文件时产生噪音的BUG。 4. 修改编译器，可以为编译出的EXE、DLL添加版本信息（通过“程序配置”设定）。 5. 修改集成开发环境，自动记忆非独立编译时是否写出依赖文件的选项。 6. 大幅提高编译速度。 对其它支持库的更新： 1. 修改高级表格支持库，在双击单元格进入编辑状态后，不能收到第一个“字符输入”事件的BUG。 2. OpenGL支持库中的部分英文名称常量已改为中文，并统一在所有常量名称之前加前缀“GL_”，以减少与其它库的冲突机率。 3. 互联网支持库中的“FTP目录列表”命令返回的文件时间改为FTP服务器返回的原始时间，不做任何时区转换。 4. 互联网支持库中的“置代理服务器”命令增加了参数，用于支持代理服务器用户认证。 5. 修改控制台操作支持库中“控制台对象.取显示区大小”的参数名称及其说明。 6. 修改外部数据库在4.12版中导致的不兼容问题，并增加了对MS SQL Server数据库中image和text字段类型的说明。 7. 修改扩展界面支持库一，禁止透明标签在父窗口刷新时自动刷新，以解决其导致窗口刷新缓冲的问题。 8. 改进应用接口支持库中“设置屏幕分辨率”命令。 9. 修改外部数据库在“表中记录数为零”时可能导致程序崩溃的BUG。 10. 修改扩展界面支持库一，修改“超级列表框.取标题()”不能返回长度大于256的包含汉字的文本。 11. 修改扩展界面支持库一，为“超级列表框.查找表项()”增加可空参数“列索引”，以指定查找哪一列。 12. 修改扩展界面支持库一，添加“工具条.置标题()”方法。 13. 修改高级表格支持库在表格空白处（所有单元格之外）单击鼠标导致当前光标处单元格自动进入编辑状态的BUG。 14. 修改扩展界面支持库一，为“超级列表框”增加“检查框状态被改变”事件。 15. 修改扩展界面支持库一，为“树形框”增加“是否已加粗()”方法。 16. 修改扩展界面支持库一，为“树形框”增加多态检查框功能，相应地添加了多个与检查框相关的属性、方法和事件。 17. 修改高级表格支持库，允许“复制选定文本()”“剪切选定文本()”在“允许选择块”属性为假时复制剪切当前单元格中的文本。 18. 修改扩展界面支持库三，为“高级选择夹”增加“不点燃选中子夹”属性。 19. 修改XML解析支持库，增加写出CDATA数据功能，解决解析XML时错误的丢弃换行和TAB字符的BUG，解决读取节点值时对CDATA数据进行转义处理的BUG。 20. 修改扩展界面支持库一，超级列表框“置列图片()”导致列图片被强行设置到标题左边的BUG。 21. 修改通用对象支持库，“快速字节集对象.倒找字节集()”的一个BUG。 22. 修改扩展界面支持库一，“超级列表框.取标题()”在表项标题为空的情况下可能会返回乱码文本的BUG。 23. 修改农历日期支持库，内部农历数据错误（2013年四五月份大小进错位）的BUG。 24. 修改远程服务支持库，“远程服务.启动()”第三个参数的描述与实际不符的BUG。 25. 修改应用接口支持库，“取硬盘信息()”命令，将尽量获取能够获取的信息（有时只能获取部分信息）。 26. 修改文本语音转换支持库，为数据类型“机读文本”的方法“文本到语音()”增加超时等待和事件反馈功能，并增加方法“是否可用()”，并在该对象创建时，自动选择一个“可能”为中文的语音库（通过名称猜测）。 27. 修改MySql支持库，第二次连接失败会导致前一次连接句柄无法使用的BUG。 28. 修改VCLBase支持库，解决VCL组件“对齐”属性和VCL滚动框失效的BUG。 其它更新： 1. 修改“树型框操作类.e”例程，加入项目时检查索引数组下标越界的BUG -------------------------------------------------------------------------------- 易语言4.12版相对于4.11更新说明： 对易语言编译器、开发环境、核心支持库的更新： 1. 修改“文件是否存在”命令不支持“路径字符大于127的文件”的BUG，感谢易友企达软件。 2. 修改“到全角”命令对“~”转全角字符结果不对的BUG，感谢易友叮咚茶。 3. 修改窗口“位置”属性和“可视”属性在特定情况下相互冲突的BUG，感谢易友牛非牛。 4. 修改核心支持库，窗口的“销毁()”命令，在销毁窗口后，不能再次载入窗口的BUG，感谢易友hsy_jj，上上签。 5. 修改核心支持库，窗口底图方式增加“图片缩放”功能，感谢易友世恒。 6. 修改核心支持库“组合框.可有焦点()”命令，在组合框获得焦点后，还是返回“假”的BUG，感谢易友lilho_e。 7. 修改核心支持库“销毁”方法增加了一个参数“立即销毁”。 8. 修改核心支持库，画板在调整尺寸后，不能重画的BUG，感谢易友浮云缭绕。 　　9. 修改编辑框在字体变大，编辑框高度自动调整后，原来的编辑框仍然会留在窗口上的BUG，感谢易友水影。 　　10. 修改核心支持库“插入字节集”命令的帮助说明，感谢易友低调生存。 　　11. 修改“变体型”对数值型数组数据支持不完善的BUG，感谢易友神2。 　　12. 修改核心支持库，“横向滚动条”和“纵向滚动条”位置被改变后，禁止由“真”变为“假”的BUG，感谢易友ming1228。 　　13. 修改窗口“在任务条中显示”属性和“总在最前”属性在特定情况下相互冲突的BUG，感谢易友ok5168。 　　14. 修改易语言开发环境，为自定义数据类型时，粘贴代码，数据类型为“”的BUG，感谢易友叮咚茶。 　　15. 修改核心支持库“组合框.禁止＝真”，在给“组合框.列表项目”属性赋值后，“组合框.禁止＝真”失效的BUG，感谢易友子涵。 16. 修改易语言编译器，可以指定独立编译的程序运行时的支持库释放目录，感谢易友西风。 17. 修改核心支持库，“其它”类别增加了六个命令（“取组件名称”“寻找组件”等），用作支持窗口组件反查。 18. 修改核心支持库“播放音乐()”命令，个别WAV文件不能播放的BUG，感谢易友破天一箭，流川枫，别康桥，得心应手，一帆风，z284949127，上等兵，yanshi810，xushushun。 19. “特殊功能支持库”中的“置入代码”命令已移入核心库，原有命令已被隐藏。 20. 在开发环境中打开被调用命令的参数引导（Alt+→）后，对每个参数的说明已可体现出是否为数组类型。 21. 修改“取配置节名”在节名个数超过一定数量时可能会导致返回值出错的BUG。 22. 修改“取对象类型”命令取不到FNR支持库中窗口组件类型名称的BUG。 对其它支持库的更新： 1. 修改应用接口支持库“取窗口标题”命令在指定窗口标题为空的情况下返回窗口类名称的BUG，感谢易友叮咚茶。 2. 修改应用接口支持库“取文件版本信息”在失败的情况下返回上次结束的BUG，同时添加逻辑型返回值，感谢易友yhan。 3. 修改应用接口支持库“取窗口类名”命令在指定窗口不存在的情况下取出窗口类名为乱码的BUG。 4. 修改通用对象支持库中“快速文本对象”“快速字节集对象”没有复制构造函数的BUG，感谢易友wentianxin。 5. 修改应用接口支持库“截取屏幕区域”命令未及时释放GDI资源的BUG，感谢易友醉。 6. 修改数值计算支持库“大数.导入文本()”，允许参数文本以一个或多个0开头，感谢易友王军。 7. 修改应用接口支持库“取窗口标题”在窗口标题以汉字开头的情况下可能返回空文本的BUG，感谢易友叮咚茶。 8. 修改数据结构支持库，为数据类型“表”添加方法“删除键值对”“删除所有键值对”，感谢易友.end。 9. 修改VCLBase支持库，因为设置数据类型“键值编辑器”的“可调整列位置”属性时会引发异常“可调整列位置 是不支持的选项”，所以将其删除，感谢易友MMiao79，nfh_china。 10. 修改应用接口支持库“取窗口标题”最多只能返回511个字符的BUG，感谢易友叮咚茶。 11. 修改数据结构支持库中数据类型“表”未及时释放内存的BUG，感谢易友.end。 12. 修改应用接口支持库“取窗口标题”命令取得的标题比实际标题少1到2个字符的BUG，感谢易友叮咚茶，wentianxin。 13. 修改高级表格在表头列类型为非文本的情况下“取数据()”返回结果不对的BUG，感谢易友小熊。 14. 修改应用接口支持库“取窗口标题”命令在取其它进程中的窗口标题时取出的文本不完整的BUG，感谢易友叮咚茶。 15. 修改扩展界面支持库一“工具条.取状态()”命令说明中的笔误。 　　16. 修改windows媒体播放器“鼠标按键被按下”事件中，第一个参数“鼠标按键”说明中的笔误，感谢易友xyx20021129。 　　17. 修改热键框“功能键”的属性名称，感谢易友mingriver。 18. 修改高级表格支持库，解决在部分打印机中打印不出图片的BUG，感谢易友97998。 19. 修改数据图表支持库，解决“柱状图控件”与“曲线图控件”在第一个X轴标注文字为空文本的情况下，导致X轴其它标注文字显示不完整的BUG，感谢易友wentianxin。 20. 修改高级表格，“回车键功能”属性增加“3.无”，感谢易友hswad。 21. 修改数据库支持库在记录集未置数据库连接的情况下调用“删除(3)”导致程序异常退出的BUG，感谢易友王庆。 22. 修改外部数据库组件不支持MS SQL Server中的nvarchar类型的BUG，感谢易友见易思迁。 23. 修改外部数据库组件无法读取MSSQL中binary类型字段的BUG，感谢易友NightCAT。 　　24. 修改外数数据库.查询()之后自动定位到首记录，感谢易友见易思迁。 25. 修改远程服务支持库在客户端连接失败的情况下出现socket句柄泄露的BUG，感谢易友readyisme。 26. 修改数据库支持库“记录集.写字段”在字段名称不存在的情况下也返回真的BUG，感谢易友liyunxing。 27. 修改高级表格，置图片多次GDI资源泄露问题，感谢易友borisc。 　　28. 修改超级菜单，当菜单条不可见时在代码中修改菜单的可视属时，弹出菜单的子菜单标题不可见的BUG，感谢易友搞怪。 29. 修改数值运算支持库大数除法的一处BUG，感谢易友zhen。 30. 修改MySql支持库，添加了“取影响行数” 方法，感谢易友浮云缭绕。 31. 修改高级表格调整行列数时未正确处理现有合并单元格的BUG，感谢易友wentianxin。 　　32. 修改互联网支持库，“HTTP读文件”命令支持读取HTTPS协议文件，感谢易友季翔。 33. 修改XML解析支持库，在连续两个自结束节点（）存在时可能导致导入失败的BUG，感谢易友.end。 34. 修改XML解析支持库，允许XML文件中双引号之间的属性文本中存在任意字符，包括，感谢易友技术支持部、user190。 35. 完善XML解析支持库，增加对CDATA的支持，和XML文本格式化功能，感谢易友goomoo。 36. 完善XML解析支持库，导出到文本或字节集时必要的时候使用自结束节点格式，感谢易友goomoo。 37. 修改应用接口支持库，完善了“是否与互联网连接”和“是否登入网络”的命令说明，并隐藏了后者，感谢易友mijac。 　　38. 修改数值计算支持库，“曲线拟合.三次样条插值()”的第二个参数“三次样条方程系数”可以直接接受“曲线拟合.三次多项式方程()”的计算结果作为参数，感谢易友搞怪。 39. 修改高级表格支持库，增加“表头被单击”“表头被双击”事件。 40. 修改高级表格支持库，将属性“表头可单击”更名为“响应表头被单击”。 41. 修改扩展界面支持库一，在主窗口刷新时透明标签没有及时刷新的BUG，感谢易友地球销售代表。 42. 修改VCLBase支持库，高级分隔条“高亮渐变起始颜色”属性名称重复的BUG。 其它更新： 1. 更新了易语言知识库(ESDN)（仅在完全安装版中提供）。 2. 增加了“硬件操作精解-精简版”教程（仅在完全安装版中提供） 3. 在“行业控件”类例程中新增“Grid++report报表控件”。 4. 在“行业控件”类例程中新增“滴答报表控件”。 5. 在“行业控件”类例程中新增“skinsharp皮肤控件”。 6. 在“硬件控制”类“加密锁”例程中新增“ET199”。 7. 修改易语言安装制作程序，允许在开始菜单生成多级程序组（目录），感谢易友银戒指、电子商务。 8. 修改远程服务支持库例程“网络数据库中间件.e”中删除意外断开连接客户的BUG，感谢易友雨纷飞。 　　9. 修改了购买易语言的说明信息，由学习版50元，改为免费，感谢易友majiyunsea。 -------------------------------------------------------------------------------- 易语言4.11版相对于4.10更新说明： 对易语言编译器、开发环境、核心支持库的更新： 1. 修改易语言编译器“‘调用外部DLL命令的程序’执行结束后未释放该DLL”的BUG，感谢易友企达软件。 2. 修改易语言编译器编译动态链接库时提示“寻找指定库命令失败”的BUG。 3. 修改易语言开发环境，在调试状态下允许通过双击设计窗口中的组件跳转到对应的事件处理子程序。 4. 修改易语言开发环境“在窗体设计器中拖动组件导致GDI资源泄漏”的BUG。 5. 修改易语言开发环境，解决了程序集名称过长不显示程序集名称选择夹的BUG。 6. 修改核心支持库，窗口的“销毁()”命令改为通过PostMessage间接实现。 对其他支持库和相关例程的更新： 1. 修改支持库例程“INI手术室.e”，在勾选“是否使用Windows通用组件库6.0版”后编译，工具栏上的图标无法显示的BUG。 2. 修改扩展功能支持库一“当窗口总在最前时，气球提示框会被窗口挡在后面”的BUG。 3. 修改扩展功能支持库一“设置文件拖放”的错误，感谢易友叮咚茶。 4. 修改MySql支持库“读字段值”，当参数“字段索引”被传入类型为小数的参数值后，读取失败的BUG。 5. 更新多线程支持库：启动线程() 增加一个可选参数，用于接收线程句柄；并增加以下命令：等待线程，强制结束线程，关闭线程句柄。感谢易友zhe001。 6. 修改保密通讯支持库可能导致程序异常退出的BUG。 7. 修改高级表格预览时表格线不显示的BUG，感谢易友一帆风。 8. 修改高级表格选择块时鼠标回到首选择单元格致使该单元格自动进入编辑状态的BUG，感谢易友民政，wanwan5。 9. 修改农历日期框被禁止后文本和按钮不变灰的BUG，感谢易友p_anch；修改农历日期框控件默认大小为200*24。 10. 修改XP风格支持库“应用XP风格后令单选框文本颜色与选择框文本颜色失效”的BUG，感谢易友yulimate。 11. 修改VCLBase支持库中“单一实例”组件，“标识文本”属性为空文本时组件功能失效的BUG。 12. 修改数据操作支持库“记录集.读字节集()”读取失败的BUG，感谢易友rsrs168，xuejsh。 13. 修改DirectX支持库“输入设备.置鼠标边界()”命令说明中的笔误。 14. 修改高级表格累加公式功能可能累加其它列的BUG，并允许结果列小于开始列，感谢易友浮云缭绕。 15. 修改高级表格在粘贴“类CSV”格式文本时错误处理连续分隔符的BUG，感谢易友风精灵。 16. 修改高级表格在列类型为选择型时取不出表头文本的BUG，感谢易友恶人磨。 17. 修改可执行数据转换支持库令转换后的正则表达式支持库无法载入的BUG。 18. 修改高级表格，增加了“可否被编辑”事件，可在此事件中返回假以阻止当前选中单元格进入编辑状态，感谢易友123yizheng123。 19. 增加超级列表框状态图片组及其索引的说明，索引不能大于14(Windows的局限)，感谢易友企达软件。 20. 优化调整Java支持库中JVM的查找及加载策略。 21. 修改XP风格支持库令分组框文本颜色无效的BUG，感谢易友破天一箭。 22. 修改易语言下载快车例程在程序已启动情况下新建下载任务时获取的URL缺少最后一个字符的BUG，感谢易友520zone。 23. 修改数据操作支持库中“记录集.删除(3)”不能删除所有记录的BUG，感谢易友rsrs168。 24. 修改数据库操作支持库有时取不到记录集记录数量的BUG，感谢易友h179635532。 25. 修改树形框“图片组被重新赋值后导致之前动态加入的项目丢失”的BUG，感谢易友菜鸟老大。 26. 修改高级表格“修改单元格数值时导致计算列无穷递归计算”的BUG，感谢易友一帆风。 27. 修改数值计算支持库“计算大数相乘时存在递归进位的情况下导致结果出错”的BUG，感谢易友chegjigfg。 28. 修改网络通讯支持库“网络服务器.断开连接()”导致CPU使用率100%的BUG，感谢易友尘土.飞扬，.end。 29. 修改数值计算支持库求实矩阵逆的BUG（注意不再返回矩阵行列式），感谢易友wuestuary。 30. 修改MySql支持库写入空字节集失败的BUG，感谢易友angelye。 31. 修改高级表格最后一行（或行）只显示半行（或列）而没有出现滚动条的BUG，感谢易友cbw，liweiyong和zye7504。 32. 修改高级表格，用鼠标或键盘选中高级表格某单元格时使其尽量完整显示（而不是只显示单元格上边或左边一部分），感谢易友 esir。 33. 修改易语言完整版安装程序“未选中安装多媒体教程的情况下仍然安装了多媒体教程”的BUG，感谢易友秋风下的落叶。 34. 网络通讯支持库网络服务器、网络客户端和网络数据报的“接收”方法均增加一个参数，用于返回是否接收成功。感谢易友.end。 35. 修改WORD2000支持库Word程序的文档即将保存事件的第二个参数修改无效的BUG，感谢易友97998。 36. 修改DirectX支持库“MIDI音乐.播放()”不支持含空格的文件名的BUG，感谢易友张飞，klasp。 37. 修改应用接口支持库“取网卡信息列表()”命令消耗大量内存且不释放的BUG，感谢易友伟业，花无心。 38. 修改农历日期支持库内部取节气的一处数据错误，感谢易友净莲。 39. 修改超级列表框不能通过对“现行选中项”属性赋值-1从而取消选中现行选中项的BUG，感谢易友zye7504。 40. 修改超级菜单支持库，在没有菜单条的窗口上放置一个超级菜单组件，运行时在标题栏点右键导致程序异常退出的bug，感谢易友狼性本色。 41. 修改超级列表框多次调用“置列图片(-1)”导致程序无故退出的BUG，感谢易友redxblue。 42. 修改应用接口支持库“是否与互联网链接()”未及时关闭网络连接句柄的BUG，感谢易友zzy90。 43. 修改超级列表框表项编辑对话框删除表项时未同时删除子表项的BUG，感谢易友TLSWR。 44. 修改MySql支持库"取字段属性"方法返回的字段属性值与字段类型常量无法对应的BUG，感谢易友gaoheran。 45. 修改互联网支持库“HTTP读文件”命令不能读取非80端口URL的BUG，感谢易友goomoo。 46. 修改超级列表框刷新问题和图标显示问题。 47. 增加超级列表框插入表项的帮助说明，“类型”属性为“大图标列表框”或“小图标列表框”的情况下，将始终在所有表项的最后插入新的表项，感谢易友redsleaf。 48. 修改超文本浏览框，补充完善了对事件“已就绪”和“载入完毕”的说明，感谢易友qq136013347。 49. 修改超文本浏览框未释放BSTR指针的BUG，感谢易友东灿。 50. 扩展界面支持库二“提取加入图片”命令增加一个参数以提取小图标，感谢易友redxblue。 51. 修改超级编辑框“最大允许长度”属性为0时最大允许输入长度仍被限制为64K的BUG，感谢易友红花。 52. 修改扩展界面支持库二“RTF到纯文本”命令无法处理\emdash\lquote\rquote等殊符号的BUG，感谢易友zjc2008。 53. 修改扩展界面支持库二超级编辑框设定字符格式为“#禁止更改”后无法取消“禁止更改”的BUG。 54. 修改超文本浏览框的逻辑型属性或逻辑型方法返回值可能有误的BUG，感谢易友wincom1。 55. 修改IP编辑框无法得到“获得焦点”和“失去焦点”事件的BUG，感谢易友hedogn,poplarshine。 56. 修改IP编辑框的默认窗口尺寸为104*20。 57. 为IP编辑框增加“地址被改变”事件，感谢易友zjzqs。 58. 修改压缩解压支持库“生成的压缩包内文件日期和解压缩后文件日期与原被压缩文件日期不符”的BUG，感谢易友wanwan5。 59. 修改易语言知识库中办公组件帮助文档中的笔误，感谢易友sxfxx。 60. 修改易语言知识库中“取网卡信息列表”命令例程有重复的程序集名称导致程序无法编译的错误，感谢易友cjdn。 61. 修改VCL相关支持库中在组件事件中销毁窗口可能导致程序非法访问内存的错误，感谢易友redxblue,nfh_china。 62. 修改VclBase支持库中位图按钮类型为“确认”、“是”时修改按钮标题后在运行时不显示按钮图片的BUG，感谢易友redxblue。 63. 扩展功能支持库一增加“拖放树型框项目”命令。 其它更新： 1. 在“行业控件”类例程中新增“Grid++report报表控件”。 -------------------------------------------------------------------------------- 易语言4.10版相对于4.06版(修订版1)更新说明： 1. 更新易语言开发环境和核心支持库，提供对VCL控件的更好支持。 2. 增加了易语言支持库开发包(SDK)，目前有C++版本和Delphi版本。 3. 增加了两个用Delphi开发的支持库，VCLBase 和 JEDI，含大约20个封装自VCL的易语言窗口组件。 4. 增加了“硬件控制”方面的多个例程。 5. 增加了“网友优秀作品”例程。 6. 修改开发环境主程序，独立编译前提示，修改整体搜索的BUG。 7. 修改了通过右键菜单新建的.e文件不能直接保存的问题。 8. 修改了日期框自动跳转日期的问题。 9. 修改了MySQL支持库“执行SQL语句”的问题。 10. 修改了特殊功能支持库中“调用子程序”的问题。 11. 修改了“数据库语言转换器.e”转换出现乱码的错误。 12. 修改了“数据库管理器.e”有密码打开失败的错误。 13. 修改了“MIDI测试.e”音乐文件在桌面不能播放的错误。 14. 修改了多媒体支持库“CD播放.是否有CD”的BUG。 15. 修改了Excel支持库设置字体下划线无效的BUG。 16. 修改了“气球提示框”单击鼠标或按键导致提示框关闭未发送“提示框即将隐藏”事件的BUG。 17. 修改了“shellEx支持库”注册热键的BUG。 18. 修改了“网络通讯支持库”内存泄露的BUG。 19. 修改了小数型数据到文本函数多次执行出错的问题。 20. 修改了正则表达式“搜索全部”时假死的问题，和程序中多次频繁调用正则容易出错的问题。 21. 修改了多个支持库例程。 22. “可执行文件数据转换”支持库的代码打乱功能得到了较大的提升，不同的打乱码将得到差异性很大的结果，因此用户可以尝试使用不同的打乱码来从技术上应对杀毒软件的误报。 关于可执行文件数据转换，说明如下： 1、多次重复转换可能会导致转换后的可执行文件或易语言支持库无法使用，请确保只转换一次； 2、对于非易语言编译的可执行文件或DLL，不保证转换后能够正常使用； 3、如果想转换易语言独立编译可执行文件，应该在易语言的系统设置里面直接设置打乱码后进行编译转换，而不能在独立编译后再使用本命令来转换； 4、尽量在易语言系统设置里面设置打乱码后进行编译转换，在这种情况下，所编译出来的可执行文件将得到最好的打乱效果。 -------------------------------------------------------------------------------- 易语言4.06版(修订版1)相对于4.06版更新说明： 1. 未注册情况下，除不提供编译功能外，不再有其它任何限制，即等同于以前的学习版功能。 2. 核心库中播放音乐功能已支持多个音乐同时播放（混音）。 3. 修改了扩展界面支持库二中动画框PNG图片透明的问题。 4. 修改了可执行文件数据转换支持库，在Win98下转换的支持库存在载入失败的问题。 5. 修改了数据库支持库不能正常读写双精度小数的问题。 6. 修改了mysql支持库“读字段值”、“查找记录”、“创建表”、“修改表”的问题。 7. 修改了编码转换支持库部分情况下不能正常进行编码转换的问题。 8. 修改了远程服务支持库不能同时启动两个服务器的问题。 9. 对以往支持库的相关例程做了修正更新。 10. 对安装包中的部分执行文件(.exe)进行了重新编译。 -------------------------------------------------------------------------------- 易语言4.06版相对于4.05版(修订版1)更新说明： 1. 扩展界面支持库二中增加了动画框组件 2. 增加了可执行文件数据转换支持库，以应付一些使用落后的特征码查毒技术的杀毒软件，使其不再或很难对易语言编译出来的程序和易语言本身支持库误报. 3. "工具->系统配置->目的程序安全"选项中增加了编译结果打乱码设置，设置此选项后将会自动对"编译"、"独立编译"、"编译生成安装软件"菜单功能所产生的结果进行自动打乱。 4. 远程服务支持库修改了服务端和客户端线程句柄泄露的错误. 5. 高级表格支持库，在类型为“选择型”的单元格中按下空格键前后，将分别触发“将被编辑”“结束编辑”事件. -------------------------------------------------------------------------------- 易语言4.05版(修订版1)相对于4.05版更新说明： 1. 编译器，更正了“对全局数组变量和局部变量多次赋值可能无效”的BUG。 2. 核心库，更正了“取时间间隔”命令的BUG。 3. 扩展界面支持库三，更正了高级选择夹“无法删除表头字体”和“‘竖排子夹名称’属性为‘真’时子夹名称显示不完整”的BUG；外加一项改进：编辑“子夹管理”时可预览字体和字体颜色。 -------------------------------------------------------------------------------- 易语言4.05版相对于4.04版更新说明： 1. 对以往支持库和相关例程发现的问题做了修正更新。 2. 开发环境新增了剪辑历史处理和展开全部代码功能 -------------------------------------------------------------------------------- 易语言4.04版相对于4.03版更新说明： 1. 对以往支持库和相关例程发现的问题做了修正更新。 2. 增加了3个支持库： 自定义图形支持库 编码转换支持库 矢量动画支持库 -------------------------------------------------------------------------------- 易语言4.03版相对于4.02版更新说明： 编程环境新增快速跳转夹和书签支持。 系统新增长文本常量支持。 新增“代码编辑框”支持库 新增“通用对象支持库”，内含“快速文本对象”“快速字节集对象”等数据类型。 特殊功能支持库：新增“取文本”等三个命令。 Sqlite数据库支持库：“Sqlite表”新增“查找”方法；将Sqlite版本升级至目前最新的3.3.4版。 扩展界面支持库三：改进卷帘式菜单控件，允许修改非选中菜单中的项目属性；改进高级选择夹控件在表头样式为梯形时的外观显示；改进部分属性和方法的说明信息。 扩展界面支持库五：修改气球提示框控件在Windows98系统下字体不清晰的BUG；新增对的支持。 扩展界面支持库六：对多功能条控件进行的小的改进。 农历日期支持库：修改农历日期框控件调用“增减日期”“置农历日期”“置公历日期”等方法后未及时更新显示文本的BUG。 数据结构支持库：修改"链表.加入节点"方法有时不能按键值正确排序的BUG。 其它一些支持库的改进和修正 -------------------------------------------------------------------------------- 易语言4.02版相对于4.0版更新说明： 1、DLL命令调用功能全面增强，具体请参见核心支持库手册里面的“调用API.e”例程和相关文档。 2、新增位图操作和易LOGO两个支持库。 3. 核心库中的外部数据库组件被修正。 4、以下支持库被修正或增加新功能： 互联网服务支持库 网络传送支持库 mysql支持库 Sqlite数据库支持库：增加了20个命令以直接返回相关数据（而不是写入到参数变量中）。 扩展界面支持库三：增加了提示文本功能，同时更新了卷帘式菜单和高级选择夹的属性编辑对话框并增加了相关方法；在卷帘式菜单控件的“项目”属性编辑对话框中，如果项目名称为空文本，则显示为“未命名”，以便于用户以鼠标点击选中。 扩展界面支持库五：“汽球提示框”更名为“气球提示框”并增加“批量关联组件”方法，以方便用户动态指定提示文本；修改其“提示框即将弹出”事件的参数“手柄横向坐标”“手柄纵向坐标”，由屏幕坐标改为客户坐标，以方便用户处理。 数据图表支持库：曲线图和柱状图增加了“显示标注”和“提示文本”属性；鼠标指向曲线图和柱状图的相应区域时会有提示框弹出并显示当前数据值。 XML解析支持库：增加导入导出字节集功能，另外增加了9个命令以直接返回相关数据（而不是写入到参数变量中）。 -------------------------------------------------------------------------------- 易语言4.0版相对于易语言3.8正式版更新说明： 1、“新建”对话框布局改变，将一些新建项目进行了分类，大家可以在Samples和Wizard目录中组织目录，“新建”对话框会自动列出。 2、新的“文本代码编辑器”工具。 代码编辑方式是以文本方式编辑，在每一行程序编辑完成后不必回车确认，直接下移光标继续输入。或按[Shift+回车]可代替原单键[回车]形式。 可以将代码以文本方式复制到记事本，或从记事本将文本代码粘贴回来，系统自动恢复为程序代码。 “系统配置”中可以设置改变编辑区字体及字号。 “系统配置”中的“输入新语句后自动检查语法错误”项选中时，当光标在代码行末时回车，就可以编译当前行检查是否有语法错误，并在提示面板中提示出来。默认为选中。 若“系统配置”的“输入新语句后自动检查语法错误”项未勾选，代码编辑时将不会弹出错误提示，代码编辑后的运算符号不会规范整理，而会在调试或编译时给出错误提示，或使用全程提示工具检查，或通过按[Shift+回车]编译当前行进行检查。 3、新的“全程提示”工具，当用户将鼠标移至常量、变量、属性表等名称上停留片刻，会显示当前名称的相关信息。对未事先声明的变量不作任何提示。 4、新的“寻找替换管理器”工具。可以在当前程序集中进行寻找与替换。 5、新的“程序调试管理器”工具。新设计的“调用表”面板与“监视表”面板代替了原调试面板，具体使用与原来的调试方法类似，可用“查看表达式/变量”菜单查看当前子程序变量值。 6、新的“整体搜寻管理器”工具。提示夹中增加“搜寻1”、“搜寻2”两个面板。使用“整体搜寻”菜单命令可将搜寻结果显示在其中，并且可以对比查看。 7、新的“条件断点管理器”工具。新增“条件断点”菜单，可以设置断点时给定一组条件，方便调试，如果断点不是条件公式，就会自动转换为普通断点。 8、新的“组件排列管理器”工具。当没有安装扩展组件、OCX组件或COM组件时，不显示分类，当组件排列拥挤时，自动增加分类。 9、新的“配色方案管理器”工具。编辑代码区与属性表的配色方案已合并，且支持任意颜色自由定制，大家可将自定义的配色方案拷贝到Clr目录中，就可在列表中看到。 请使用菜单“工具”→“系统配置”→“程序显示”→“颜色配置”，在下拉列表中选择本Clr目录中的颜色配置文件。 10、“提示”面板中显示命令帮助内容时，将会显示当前命令所处的上级支持库分类信息，以利于用户查询所在支持库。 11、调试中断后回到代码编译界面，可将鼠标移到变量上查看变量值提示。 12、备注直接使用单引号标注，并兼容打开以前版本的代码自动改为单引号标注形式。 13、热键调整：如原直接使用键盘的方向键可展开命令，现在需要使用[ALT+方向键]才可以展开，“单步跟踪”热键有所改动。 编辑时原[F1]热键插入文件名称路径现改为[F2]热键插入。[F10]可删除一行，[CTRL+K]可屏蔽一行。 14、菜单调整：如“配置”子菜单移至“程序”菜单下，增加“条件断点”菜单，原“易向导”菜单改为“执行易向导”菜单.....具体请自行对比。 15、Samples目录中增加大量的经典例程，供大家学习交流。 16、Ecom易模块目录中新增若干易模块及例程。 17、易向导中增加“通用密码登录管理向导”及“OpenGL向导”。 18、系统配置对话框的“编译选项”中新增“是否使用Windows通用组件库6.0版”选项，默认不选中。如果选中，编译后的程序将使用6.0版风格的组件。 19、推出了以下新的支持库： 农历月历支持库中新增“农历月历”组件 拖放支持库 正则表达式支持库 进程通讯支持库 BT下载支持库 网络通讯支持库二 扩展界面支持库三中增加“高级选择夹”组件（本库必须在易语言4.0以上版本中使用） 应用接口支持库 OpenGL支持库 DirectX发支持库 SQLite数据库支持库 控制台操作支持库 扩展界面支持库五 20、办公组件支持库已升级，推荐大家使用该升级后的支持库。 21、新表格组件改名为高级表格以区分基本支持库中的表格，方便大家定义数据类型。 22、网络传送支持库更新及易语言下载快车已更新。 23、基本组件中的打印机组件已支持自定义纸张，“开始打印”方法中当“纸张”参数为-1时,可以自定纸张宽高。 24、“打印机”对象和“打印设置信息”数据类型中的打印纸类型新增了100多种扩展打印纸类型。 25、系统核心支持库中的“寻找字节集”和“倒找字节集”命令各增加一个参数。 26、窗口组件的基本事件中加入了“滚轮被滚动”事件，以支持鼠标滚轮编程。 27、核心库“其它”类别中增加了“DLL命令调用转向”命令，以支持程序中对非固定文件名DLL中的输出命令进行调用。 28、编辑组件的文本型属性时可以编辑多行文本。 29、组件箱右上角增加一个按钮,可以在组件图标排列与组件名列表中切换。 30、“输出调试文本”命令支持通用数据类型。 31、编译使用了易模块的易程序时，由过去仅在易语言安装目录ECOM下寻找所需要的易模块文件改为首先在易程序所处目录下寻找，然后再去ECOM目录下寻找。 32、易模块管理对话框中新增了“创建指定易模块文件的接口程序集”按钮。 33、为规范编程,多个易语言打开同一个源代码时，将会提示切换到打开的程序中，否则请另存为新文件名后再打开，以保护程序。但如果你用新建方式打开程序时，不受此保护。 34、修改了用户程序当支持库不存在时弹出的出错信息。 35、所有带图片组属性的组件选索引时支持直接通过选取图片组的方式输入。在索引项目后多了一个按钮,点击按钮后弹出图片组预选窗口，直接选中图片即可。 36、扩展界面库一中的树型框增加了“右键单击项目”事件。 37、系统颜色配置里面新增了“窗体设计器背景”项。 38、编译时实施了严格的重复名称检查，编译选项中新增“严格的重复名称检查”选项，为了兼容以前的程序，默认为不选中，建议将其选中。 39、支持库列表中增加排序功能，可按拼音顺序排列支持库。具体是支持库面板的鼠标右键菜单中增加“排序”子菜单。 40、核心支持库中的“窗口”数据类型增加了“置父窗口”方法。 41、核心库中的“数值转换”类中新增了“到字节”、“到短整数”、“到整数”、“到长整数”、“到小数”命令。 42、核心库中的“位运算”类中新增了“左移”、“右移”、“合并整数”、“合并短整数”命令。 43、核心库中的“变体型”数据类型新增“取字节集”方法，并且其“赋值”方法支持置入字节集类型数据。 44、核心库中的“载入”命令被改进，当以对话框方式载入不可视窗口时，不再强制显示并等待，而直接返回， 然后可以通过设置该窗口的可视属性为真来显示该对话框。此改进后，可以进行以下操作： 载入 （窗口1, , 真） 窗口1.标题 = "演示" 窗口1.可视 = 真 45、核心库中的“从字节集转换”命令更名为“取字节集数据”，并增加一个参数，以支持从字节集中随意取出部分数据。 46、核心库中的“打印机”对象有所改进，并且增加了四个方法用作在Windows2000/NT/XP下设置自定义纸张类型。 47、“支持库配置”对话框上方加入了查找功能。 48、“支持库配置”对话框下方增加了删除支持库按钮。 49、“系统配置”对话框内“颜色配置”部分增加了“导入”按钮。 50、左侧支持库列表中数据类型部分列入了成员事件并加入了全面的提示。 51、属性表下方的事件组合框内对已有事件子程序的事件进行了标记，并将自有事件和固定事件分开。 52、鼠标指针属性新增“手型”类型。 53、对列表式组件箱进行了排序。 54、窗口设计器中右键单击组件后所弹出的菜单内新增了“查看数据类型定义”菜单项。 55、组件右键菜单中加入“锁定”和“解除锁定”菜单，锁定组件时只能使用键盘的光标键移动或使用SHIFT的组合改变大小。 56、当前系统正在编辑一份易程序时,双击打开新易程序时,会弹出询问对话框,用户可以选择重新启动一份易语言系统打开程序。 57、输入备注时不再有提示框出现。 58、单行编辑框文字垂直居中。 59、恢复了调试变量表。 60、恢复了在行尾回车时自动询问增加未定义的变量、子程序、常量名（仅当“输入新语句后自动检查语法错误”系统设置被选中时有效）。 61、打印机对象改正了默认纸张的设置问题。 62、核心支持库增加“置错误提示管理”命令，用作支持用户自行提示严重错误信息。 63、核心支持库中的“选择夹”组件增加了“是否填充背景”、“背景颜色”两个属性，用作解决“隐藏自身”属性为真时选择夹内 一些子组件的刷新问题。 64、系统的“程序”菜单中新增“重新名称关联”菜单项。 65、加入了源代码加密功能。 66、核心库中“服务器”组件的“取回客户”方法支持在“数据到达”事件中使用。 67、核心库中“媒体播放”类别中增强了对MP3播放的支持。 68、核心库中“系统处理”类别中增加了“多文件对话框 ”命令。 69、编译器所支持语法格式改进，返回值支持直接引用其成员，如“a.方法1 ().a1.方法2 ()”语句格式现在已经可以使用。 70、系统的“工具->系统配置”菜单中新增“目的程序安全”选项夹。 71、系统的“编辑”菜单中新增“到最近修改处”菜单项。 72、改进了各种编程语言对易语言DLL的调用支持。 73、新增扩展界面支持库六、DirectX3D支持库。 74、自定义鼠标指针支持彩色。 75、易模块管理功能被去除，支持新的易模块引入功能，且易模块公开支持项目增多。 76、系统自带易模块中新增3D图形引擎支持易模块。 -------------------------------------------------------------------------------- 易语言3.8正式版(修正第二版)相对于3.8测试版的改动部分： 1、支持开发并使用易语言向导程序，具体例程请见lib\ewizard\samples目录下的“应用程序向导.e”及“API助手.e”文件。 2、源程序编辑窗口右键菜单中新增“收缩屏蔽”功能，可以用作一次性屏蔽大段代码。 3、系统不再默认载入所有支持库，而必须在支持库配置中指定。 4、源程序的载入速度得到提高。 5、推出了以下新的支持库： 易向导支持库 农历日期支持库 远程服务支持库 扩展界面支持库三 互联网服务支持库 邮件接受支持库 多媒体支持库 表格支持库 超级菜单支持库 保密通讯支持库 办公组件支持库 另外，图表支持库和表格支持库现在支持和打印机对象合作打印。 -------------------------------------------------------------------------------- 易语言3.8测试版相对于3.7正式版的改动部分： 1、支持完全的面向对象编程，可以在程序中定义并使用对象。 2、编写DLL时其中的公开子程序可以接受文本数据类型参数，且可以返回文本和字节集型数据。 3、支持源程序代码的收缩和展开（操作方法：选中程序块后单击右键选“收缩”菜单项，在子程序头上可以直接左键单击子程序名左边的减号）。 附，易语言面向对象开发特性简要说明： 1、易语言支持类的构造、析构、继承、虚拟方法、多态、封装特性。 2、对象的构造： 构造顺序为：先构造基类对象，再构造其继承类对象，如果类中具有对象成员，则先于其所处对象构造。 3、对象的析构： 析构顺序为：先析构继承类对象，再析构基类对象，如果类中具有对象成员，则在其所处对象后析构。 4、继承： 任何类均可以指定另外一类作为其基类，继承层数不限。 5、虚拟方法： 在基类中的方法可以被其继承类中的同名方法覆盖，当调用此方法时，系统自动根据所调用的对象 实体去调用对应的方法。 6、多态性： 可以将一个继承类对象赋予到其基类数据类型变量中，此时对此基类对象变量进行操作，将反映出继承类对象的特性。 7、类的封装： A、类的所有成员数据变量只能由该类本身的方法代码所访问，属于私有性质。 B、在继承类中可以以“类名.方法名”的方式指定访问基础类中的方法。 C、只有标记为“公开”的方法才能在类代码外部通过该类的对象实体来访问。 -------------------------------------------------------------------------------- 易语言3.7正式版相对于3.7测试版的改动部分： 1、编辑环境可以打开未安装对应支持库的易语言源程序。 2、“内码转换”支持GBK与日文内码SJIS之间的转换。 3、核心支持库中的“对象”数据类型增加了“取接口”方法。 4、“到字节集”、“到文本”命令被增强。 5、“数值到人民币”改名为“数值到金额”。 6、“取系统语言”命令支持linux，并增加日文类别。 7、“取操作系统类别”命令支持linux。 8、所有COM封装对象的“取子对象”方法更改为“取接口”，并增加一参数以取出指定接口。 9、改进后的packcom工具，用3.7测试版中的packcom生成的npk请使用本版本中的packcom打开后保存，以进行转换。 10、对测试过程中发现的所有问题都已经纠正。 -------------------------------------------------------------------------------- 易语言3.7测试版 相对于 3.6 正式版的新增功能： 1、对微软COM技术的全面支持，包括ActiveX组件、OLE自动机、COM类型库等等，详细说明请见ESDN帮助 2、跨平台的网络通讯支持库 3、跨平台的Mysql数据库支持库,且功能全面加强 4、跨平台的多线程支持库 5、EXCEL2000支持库(直接操作Excel) 6、WORD2000支持库(直接操作Word) 7、PowerPoint2000支持库(直接操作PowerPoint) 8、数据图表支持库(柱形图，饼形图、曲线图) 9、脚本语言支持库(可以运行VB script Jave script等脚本) 10、文本语音支持库(提供对文本转语音输出以及语音识别的支持) 11、易语言支持库在运行时支持动态加载 12、枚举常量的支持(详细说明见ESDN帮助) 13、更新了setup安装程序（即菜单"编译生成安装软件"的功能改进，解决了反安装时删除全部目录的问题，添加额外文件时增加了批量添加，还有更多安装功能的增强!） 14、部分功能的加强(如：树型框可以高速批量加入项目、标准输入命令支持密码输入、启动多线程支持参数等等) 15、其他很多地方改进。 -------------------------------------------------------------------------------- 易语言 3.6 公司成立纪念版 相对于 3.5 正式版的新增功能： 1、增加了对Linux平台的支持，可以用易语言在Windows环境下编写Linux控制台程序 2、增加了Windows动态链接库(DLL)的编写，用易语言能编写出DLL供自己以及其他编程语言(VB,VC,Delphi等)调用。 3、增加了控制台操作的2个命令“标准输出”、“标准输入”， 4、增加了3个命令：“指针到文本”(文本操作)，“指针到字节集”(字节集操作)、“写到内存”(其他)，最佳使用场合在易语言回调子程序和易语言DLL公开子程序中用作对外输出数据。 5、增加了图形图像支持库 - 格式1.0版，支持多种图片格式的转换。 6、增加了XP风格界面库1.1版，支持部分控件的4种风格类型的转换。 7、增加了文件压缩/解压缩支持库1.0版，支持.zip格式的压缩解压，同时用本库压缩的.zip文件也可以被其他压缩软件使用 8、增加了多线程支持库1.1版，供对多线程的支持，并通过实现进入许可证机制以避免多线程冲突。 9、增加了数据库操作支持库1.0版，本支持库用来访问各种类型数据库。 10、增加了MySql支持库1.1版，本支持库实现对MySql的支持。 11、扩展界面支持库二1.1版中增加了“IP编辑框”窗口组件，支持对IP地址的输入和编辑。 12、修改了易模块的接口结构，在支持原有结构的基础上，增加了新的接口创建方式。 13、开发环境增加了即时输入提示。 14、全面增补帮助文档(esdn.chm)，增订图片及例程。 15、其他很多地方改进。 以上新增功能详细情况请看易语言新版esdn帮助文档(esdn.chm)，均有详细说明及例程。 -------------------------------------------------------------------------------- 易语言 3.5 正式版 相对于 3.39 版的新增功能： 1、增加了扩展界面支持库二，包含超级按钮、高级影像框、分隔条、 超级编辑框等窗口单元，包含图片组处理、文档格式转换等分类命令。 2、增加了端口访问支持库，以支持对计算机端口的直接访问。 3、图片组支持真彩且制作工具性能提升。 4、表格拖动选择闪烁的问题已经解决。 5、系统配置中可以设置不显示程序备注。 6、数据源支持设置基于单元格的只读属性。 7、组合框和列表框的数据绑定实现方式改变。 8、其他很多地方改进。 -------------------------------------------------------------------------------- 易语言 3.39 正式版相对 3.38 版的新增功能： 1、可以读取繁体版易语言编写的程序。 2、增加了 cncnv 内码转换支持库。 3、增加了树型框的事件和方法。 4、改进了打印预览。 5、运行时树型框的“项目”属性可以读出当前项目数据。 6、可以在“程序设置”对话框中设置程序版本号。 7、改正了读取SQL SERVER数据库出现的问题。 8、改正了xp下托盘图标弹出菜单单击桌面不消失的问题。 -------------------------------------------------------------------------------- 易语言 3.38 正式版相对 3.36 版的新增功能： 1、支持加密狗。 2、操作系统界面功能支持库中增加了“关闭系统”命令，支持重启、关机、注销、休眠、冬眠。 3、改进了扩展界面支持库中的透明标签单元。 4、其他改进。 -------------------------------------------------------------------------------- 易语言 3.36 正式版相对 3.3 版的新增功能： 1、开发环境支持源代码打印。 2、开发环境窗口单元箱增加了滚动按钮。 3、改进了安装卸载子系统。 4、改进了端口组件，添加了方法和属性。 5、改进了“操作系统界面功能支持库”中的“创建快捷方式”命令。 6、改进了OCX支持。 -------------------------------------------------------------------------------- 易语言 3.3 正式版相对 3.2 版的新增功能： 1、新增了“操作系统界面功能支持库”，支持Windows外壳功能。 2、试用限次在各版本之间不再累加。 3、支持数据库加密。系统核心支持库数据库类别中增加了“是否已加密”、 “置数据库密码”、“密码输入框”、“复制密码”命令。“打开”命令 的数据库密码参数已经启用，改进了数据库管理器和易之表以支持加密 数据库； 4、数据操作支持库一中增加了对RSA数字签名和验证的支持（提供了“数字 签名钥匙测试.e”例程），并增加了对RC4加密算法的支持； 5、系统核心支持库中的“文件读写”类别中增加了“打开加密文件”命令， 用作保存加密文件数据，并提供了“加解密工具.e”例程； 6、改进了安装程序的卸载功能。 -------------------------------------------------------------------------------- 易语言 3.2 正式版相对 3.1 版的新增功能： 1、增加了对OCX组件（即ActiveX组件）的支持。 易语言 3.1 正式版相对 3.0 版的新增功能： 1、支持独立编译，独立编译后的易语言程序可以脱离易语言系统单独运行。 易语言3.0 正式版相对测试五版的新增功能： 1、增加电子注册支持。 易语言3.0 测试五版本相对于测试版三新增功能： 1、“系统处理”命令类别中加入了对配置文件进行操作及取操作系统类别的命令。 2、改进了调试过程中查改容器的功能（移到了工具条上）。 3、完成了安装制作工具的开发，具体请见系统setup目录中的readme.txt文件说明。 只是由于目前编译功能尚未开放，所以暂时不能被使用。 易语言3.0 测试三版本相对于测试版二新增功能： 1、加入了程序调试支持系统。 易语言3.0 Beta版本相对于2.51版本新增加的功能和需要注意点: 一、新增功能： 建立了完全的易程序编译器系统，支持全编译，可以直接将程序编译为CPU指令码 运行，从而突破了长期以来的速度瓶颈。 二、新增特性： 1、子程序指针值为该子程序的内存代码地址，可以直接传递给DLL命令用作回调。 2、只有被使用到的代码和数据才会被编译到可执行文件中。 3、如果需要屏蔽子程序中的某段程序使之不会被编译输出，直接使用类似： “判断循环首（假）”或 “如果真（假）”括住该语句块即可。 4、程序配置中允许设置任
Qt数据库高级编程、SQLServer、MySQL、SQLite
Qt框架是由Qt Company开发的全球主流跨平台C++界面应用程序开发框架、是跨平台项目的主流解决方案，  Qt 5 框架是高效的跨平台C++框架,易扩展，组件丰富、允许真正地组件编程，既可以开发桌面应用程序，也可用于控制台工具、上位机软件、和高性能服务器的开发，目前国内Qt高级开发工程师的待遇也一直居高不下！本课程为黄强老师《Qt 5一站式编程》系列课程中的核心课、主要帮助学员熟练    数据库驱动ODBC介绍    QSqlDatabase核心类讲解    Qt使用ODBC对SQL Server数据库的增删改查    Qt使用ODBC对MySQL数据库的增删改查    Qt使用ODBC对Access数据库的增删改查    Qt数据库模块架构源码剖析    Qt使用MSVC、MinGW编译MySQL数据库驱动    Qt使用QMYSQL对MySQL数据库的增删改查    Qt使用QSQLITE对SQLite 数据库的增删改查
Foxpro 开发答疑160问
第1章　程序设计　1 1. 什么是主程序　2 2. 如何编写主程序　3 3. 如何加入READ EVENTS　6 4. 如何隐藏Visual FoxPro的主窗口　7 5. 如何处理“不能退出FoxPro”的情况　8 6. 如何设计错误捕捉程序　9 7. 如何实现程序的背景音乐　14 8. 如何把金额由数字变成大写　17 9. 如何制作拖动功能　19 10. 如何进行高级密码处理　23 11. 如何把文字转换成首位拼音码　27 12. 如何防止程序的多次开启　28 13. 如何以编程方式添加数据环境到表单　29 14. 如何使用HTML Help Workshop编写HTML帮助　31 15. 如何调用帮助文件　39 16. 如何为_Screen表单指定事件过程　42 第2章　界面设计　45 17. 如何从打印预览工具栏中移除按钮　46 18. 如何隐藏和显示系统工具栏　48 19. 如何制作自定义工具栏　50 20. 如何进行动态的菜单设计　55 21. 如何进行权限菜单的设计　60 22. 如何在顶层表单里使用自己的工具栏和菜单　70 23. 如何设计快捷菜单　74 24. 如何实现移动字幕　78 25. 如何制作异形表单　81 26. 如何制作类似Media Player的图形表单　88 27. 如何动态显示表单　94 28. 如何创建能保存大小和位置的表单　95 29. 如何实现在Grid中回车自动换行　99 30. 如何在Grid拆分窗口中取消拆分条　101 31. 如何利用Grid的动态属性进行动态设计　104 32. 如何生成一个具有滚动条的窗口来移动记录　108 33. 如何将程序图标放入系统托盘　111 第3章　数据处理　115 34. 如何使用GetFile()函数与宏替换打开表(.DBF)　116 35. 如何实现记录按笔画排序　117 36. 如何实现数据实时筛选　119 37. 如何利用Excel来创建统计图形　121 38. 如何利用Graph对象来创建统计图形　125 39. 如何实现数据的进制转换　133 40. 如何查找两个表中相同或不同的记录　140 41. 如何确定整数的奇偶数　142 42. 如何用低级函数转换TEXT文件到DBF　143 43. 如何使用数据库事件进行表加密　145 44. 如何在备注字段中搜索字符串　149 45. 怎样导入Microsoft Access 的表结构和数据　155 46. 如何将通用字段中的内容恢复成当前存储格式的物理文件　159 47. 如何用ADO Stream 对象来获取二进制数据　163 48. 如何正确使用SELECT-SQL查询语句　164 第4章　ActiveX控件　180 49. 如何注册ActiveX控件　181 50. 如何调用进度条控件　183 51. 如何使用状态栏控件　184 52. 如何使用滑尺控件　188 53. 如何用MSComm控件　189 54. 如何使用日历控件　191 55. 如何使用日期挑选器控件　193 56. 如何使用TreeView控件　199 57. 如何使用工具条控件　206 58. 如何使用图表控件　209 59. 如何使用格式文本框控件　216 60. 如何使用SysInfo控件　226 61. 如何使用动画控件　229 62. 如何使用多媒体控件　231 63. 如何使用Kodak图像扫描控件　234 64. 如何使用Animation GIF控件　237 第5章　文件处理　240 65. 如何删除文件到回收站　241 66. 如何获得文件属性和改变文件属性　242 67. 如何以相应的应用程序来打开已建立关联的文件　250 68. 如何将文件按扩展名与应用程序建立关联　253 69. 如何进行DOS/Windows文本文件与UNIX/Linux文本文件的相互转换　257 70. 如何遍历磁盘中的所有目录及文件　258 71. 如何使用低级函数读写文件　263 72. 如何为Visual FoxPro应用程序增加文件压缩功能　271 73. 如何利用SHFileOperation()函数进行文件复制与删除　275 74. 如何以编程方式读取和设置磁盘卷标　286 75. 如何在Windows NT中监视文件系统的改变　287 第6章　类应用与设计　291 76. 如何在子类中调用父类方法的程序代码　292 77. 如何屏蔽子类对其父类的自动继承　293 78. 如何让表单设计器使用自定义表单类　296 79. 如何设计能正确显示和存储下拉列表中不存在选项的组合框类　297 80. 如何利用Systray类将图标添加到系统托盘中　304 81. 如何使用_thermometer类来实现执行进度条　315 82. 如何使用_StopWatch类实现计时程序设计　317 83. 如何利用_ShortcutMenu类进行动态快捷菜单设计　321 84. 如何使用WinZip Manager类进行文件压缩和解压缩　325 第7章　网络应用　332 85. 如何获得本机IP地址　333 86. 如何获得局域网内网卡的物理地址　333 87. 如何使用Internet Transfer控件制作FTP工具　336 88. 如何使用WebBrowser控件编写Web浏览器　338 89. 如何映射和断开网络驱动器　343 90. 如何实现超级链接效果　349 91. 如何使用Winsock控件进行常用网络应用开发　352 92. 如何使用MAPI控件发送带附件的邮件　359 93. 如何判断计算机是否已经连接到网络　362 94. 如何通过编程运行拨号网络连接　364 95. 如何实现Ping操作　369 第8章　客户/服务器编程　373 96. 如何进行基于文件服务器的多用户编程　374 97. 如何建立ODBC数据源　383 98. 如何建立到ODBC数据源的连接　387 99. 如何使用视图设计器进行远程视图设计　389 100. 如何用视图指令和函数进行远程视图设计　399 101. 如何使用SPT扩展远程视图　406 102. 如何实现游离视图　416 103. 如何使用SQL-DMO枚举可用的SQL Server数据库服务器　419 104. 如何启动和停止SQL Server服务　421 105. 如何获得SQL Server中的可用数据库列表　425 106. 如何取得服务器的硬盘目录结构　427 107. 如何在SQL Server上创建数据库　431 108. 如何设置SQL Server数据库选项　433 109. 如何在SQL Server上增加、删除用户和设置用户权限　436 110. 如何在SQL Server中进行数据库备份和恢复　444 111. 如何使用SQL-DMO为SQL Server设置任务　447 112. 如何与NT服务器进行时间同步　449 113. 如何在SQL Server数据表中创建惟一值　450 第9章　Windows相关设计　452 114. 如何打开Windows控制面板功能选项　453 115. 如何在Visual FoxPro中调用Windows命令　455 116. 如何修改Windows的系统日期与时间　457 117. 如何实现重启或关闭本地计算机　458 118. 如何实现定时重启或关闭远程计算机　461 119. 如何锁定Windows NT/XP计算机　463 120. 如何获得Windows的安装目录　464 121. 如何获得Windows的系统目录　465 122. 如何获得应用程序的当前目录　467 123. 如何从Visual FoxPro中关闭指定的应用程序　468 124. 如何检测软驱中是否放入了磁盘　469 125. 如何检测软盘是否进行了写保护　470 126. 如何将一个长文件名转换为短文件名　471 127. 如何获得操作系统的语言设置　472 128. 如何管理开始菜单中文档中的内容　472 129. 如何用Windows Script Host创建桌面快捷方式　473 130. 如何用Windows Script Host进行磁盘碎片整理　475 131. 如何用Windows Script Host打开管理工具中的选项　476 132. 如何获得系统中的逻辑驱动器　476 133. 如何获得系统中的未使用的驱动器盘符　478 134. 如何调用磁盘格式化对话框　480 135. 如何获得磁盘的总大小与可用空间　481 136. 如何打开Windows关于对话框　483 137. 如何进行Windows外观颜色设置　484 138. 如何获得计算机名和用户名　487 139. 如何修改计算机名称　488 140. 如何获得Windows的开启时间　489 141. 如何获得当前系统中安装的打印机　491 142. 如何将打印机设置为Windows的默认打印机　492 143. 如何获取打印机设备的句柄　493 144. 如何获得计算机键盘的类型　496 145. 如何交换鼠标的左右键功能　497 146. 如何获得和设置鼠标的双击速度　498 147. 如何屏蔽Ctrl+Alt+Del组合键　500 148. 如何打开或关闭光盘驱动器　501 149. 如何获得计算机硬盘卷序列号　502 150. 如何隐藏Windows的任务栏　504 151. 如何在系统启动时自动运行指定程序　506 第10章　报表设计　507 152. 如何使用报表设计器的工具栏与菜单　508 153. 如何理解报表设计器各个带区的作用　513 154. 如何进行数据分组报表设计　514 155. 如何在报表运行时访问报表的数据环境　518 156. 如何检测报表的当前输出模式　518 157. 如何进行帐页格式的报表设计　519 158. 如何进行报表的打印设置　520 159. 如何在NT/XP系统中添加自定义纸张　521 160. 如何获得报表的总页数　530 161. 如何进行面向对象的程序化报表设计　530 162. 如何使用Excel来打印报表　536 第11章　程序安装　540 163. 如何使用Visual FoxPro 6.0的安装向导　541 164. 如何自动安装Visual FoxPro 6.0安装向导制作的安装程序　544 165. 如何卸载使用安装向导安装的应用程序　545 166. 如何为编译后的应用程序文件指定图标　545 167. 如何使用InstallShield制作安装程序　546 附录　558 附录1. 函数分类表　559 附录2. 命令分类表　570 附录3. Visual FoxPro系统变量　580 附录4. 系统菜单和菜单选项常数　581 附录5. INKEY()和LASTKEY()函数的返回值　584 附录6. Visual FoxPro变量命名约定　586 附录7. Visual FoxPro对象命名约定　586 附录8. Visual FoxPro表字段命名约定　587 附录9. Visual FoxPro系统容量　587
delphi通用函数单元一
//▎============================================================▎// //▎================① 扩展的字符串操作函数 ===================▎// //▎============================================================▎// //从文件中返回Ado连接字串。 function GetConnectionString(DataBaseName:string):string; //返回服务器的机器名称. function GetRemoteServerName:string; function InStr(const sShort: string; const sLong: string): Boolean; {测试通过} {* 判断s1是否包含在s2中} function IntToStrEx(Value: Integer; Len: Integer; FillChar: Char = '0'): string; {测试通过} {* 扩展整数转字符串函数 Example: IntToStrEx(1,5,'0'); 返回："00001"} function IntToStrSp(Value: Integer; SpLen: Integer = 3; Sp: Char = ','): string; {测试通过} {* 带分隔符的整数－字符转换} function ByteToBin(Value: Byte): string; {测试通过} {* 字节转二进制串} function StrRight(Str: string; Len: Integer): string; {测试通过} {* 返回字符串右边的字符 Examples: StrRight('ABCEDFG',3); 返回:'DFG' } function StrLeft(Str: string; Len: Integer): string; {测试通过} {* 返回字符串左边的字符} function Spc(Len: Integer): string; {测试通过} {* 返回空格串} function Replace(Str,s1,s2:string;CaseSensitive:Boolean):string; {测试通过} {* 返回将指定字符s1用字符串s2替换后的字符串，可支持大小写敏感由CaseSensitive操作} {example: replace('We know what we want','we','I',false) = 'I Know what I want'} function Replicate(pcChar:Char; piCount:integer):string; {在一个字符串中查找某个字符串的位置} function StrNum(ShortStr:string;LongString:string):Integer; {测试通过} {* 返回某个字符串中某个字符串中出现的次数} function FindStr(ShortStr:String;LongStrIng:String):Integer; {测试通过} {* 返回某个字符串中查找某个字符串的位置} function SubStr(psInput:String; BeginPlace,CutLeng:Integer):String; {测试通过} {* 返回从位置BeginPlace开始切取长度为CatLeng字符串} function LeftStr(psInput:String; CutLeng:Integer):String; {测试通过} {* 返回从左边第一为开始切取 CutLeng长度的字符串} function RightStr(psInput:String; CutLeng:Integer):String; {测试通过} {* 返回从右边第一为开始切取 CutLeng长度的字符串} function PadLStr(psInput:String; piWidth:Integer; pcPadWith:Char):String; {测试通过} {* 返回从psInput字符串左边开始用pcPadWith填充后总长度为PiWidth的字符串} function PadRStr(psInput:String; piWidth:Integer; pcPadWith:Char):String; {测试通过} {* 返回从psInput字符串右边开始用pcPadWith填充后总长度为PiWidth的字符串} function PadCStr(psInput:String; piWidth:Integer; pcPadWith:Char):String; {测试通过} {* 返回从psInput字符串两边开始用pcPadWith填充后总长度为PiWidth的字符串} function ChrTran(psInput:String; pcSearch:Char; pcTranWith:Char):String; {测试通过} {* 返回替换后字符串[替换单个字符] Examples: ChrTran('abCdEgdlkh','d','#')； 返回'abC#Eg#lkh'} function StrTran(psInput:String; psSearch:String; psTranWith:String):String; {测试通过} {* 返回替换后字符串[替换字符串] Examples: StrTran('aruyfbn','ruy','=====');； 返回'a=====fbn'} function Stuff(psInput:String; piBeginPlace,piCount:Integer; psStuffWith:String):String; { *返回替换后字符串[替换字符串] Examples: Stuff('ABCDEFGHI',3,4,'12345')；返回'AB12345GHI'} procedure SwapStr(var s1, s2: string); {测试通过} {* 交换字串} function LinesToStr(const Lines: string): string; {测试通过} {* 多行文本转单行（换行符转'\n'）} function StrToLines(const Str: string): string; {测试通过} {* 单行文本转多行（'\n'转换行符）} function Encrypt(const S: String; Key: Word): String; {* 字符串加密函数} function Decrypt(const S: String; Key: Word): String; {* 字符串解密函数} function varIIF(aTest: Boolean; TrueValue, FalseValue: Variant): Variant; function varToStr(const V: Variant): string; {* VarIIF及VartoStr为变体函数} function IsDigital(Value: string): boolean; {功能说明：判断string是否全是数字} function RandomStr(aLength : Longint) : String; {随机字符串函数} //▎============================================================▎// //▎================② 扩展的日期时间操作函数 =================▎// //▎============================================================▎// function GetYear(Date: TDate): Integer; {测试通过} {* 取日期年份分量} function GetMonth(Date: TDate): Integer; {测试通过} {* 取日期月份分量} function GetDay(Date: TDate): Integer; {测试通过} {* 取日期天数分量} function GetHour(Time: TTime): Integer; {测试通过} {* 取时间小时分量} function GetMinute(Time: TTime): Integer; {测试通过} {* 取时间分钟分量} function GetSecond(Time: TTime): Integer; {测试通过} {* 取时间秒分量} function GetMSecond(Time: TTime): Integer; {测试通过} {* 取时间毫秒分量} function GetMonthLastDay(Cs_Year,Cs_Month:string):string; { *传入年、月，得到该月份最后一天} function IsLeapYear( nYear: Integer ): Boolean; {*/判断某年是否为闰年} function MaxDateTime(const Values: array of TDateTime): TDateTime; {//两个日期取较大的日期} function MinDateTime(const Values: array of TDateTime): TDateTime; {//两个日期取较小的日期} function dateBeginOfMonth(D: TDateTime): TDateTime; {//得到本月的第一天} function DateEndOfMonth(D: TDateTime): TDateTime; {//得到本月的最后一天} function DateEndOfYear(D: TDateTime): TDateTime; {//得到本年的最后一天} function DaysBetween(Date1, Date2: TDateTime): integer; {//得到两个日期相隔的天数} //▎============================================================▎// //▎===================③ 扩展的位操作函数 ====================▎// //▎============================================================▎// type TByteBit = 0..7; {* Byte类型位数范围} TWordBit = 0..15; {* Word类型位数范围} TDWordBit = 0..31; {* DWord类型位数范围} procedure SetBit(var Value: Byte; Bit: TByteBit; IsSet: Boolean); overload; {* 设置二进制位} procedure SetBit(var Value: WORD; Bit: TWordBit; IsSet: Boolean); overload; {* 设置二进制位} procedure SetBit(var Value: DWORD; Bit: TDWordBit; IsSet: Boolean); overload; {* 设置二进制位} function GetBit(Value: Byte; Bit: TByteBit): Boolean; overload; {* 取二进制位} function GetBit(Value: WORD; Bit: TWordBit): Boolean; overload; {* 取二进制位} function GetBit(Value: DWORD; Bit: TDWordBit): Boolean; overload; {* 取二进制位} //▎============================================================▎// //▎=================④扩展的文件及目录操作函数=================▎// //▎============================================================▎// function MoveFile(const sName, dName: string): Boolean; {测试通过} {* 移动文件、目录，参数为源、目标名} procedure FileProperties(const FName: string); {测试通过} {* 打开文件属性窗口} function CreatePath(path : string) : Boolean; function OpenDialog(var FileName: string; Title: string; Filter: string; Ext: string): Boolean; {* 打开文件框} function FormatPath(APath: string; Width: Integer): string; {测试通过} {* 缩短显示不下的长路径名} function GetRelativePath(Source, Dest: string): string; {测试通过} {* 取两个目录的相对路径,注意串尾不能是'\'字符！} procedure RunFile(const FName: string; Handle: THandle = 0; const Param: string = ''); {测试通过} {* 运行一个文件} function WinExecAndWait32(FileName: string; Visibility: Integer = SW_NORMAL): Integer; {测试通过} {* 运行一个文件并等待其结束} function AppPath: string; {测试通过} {* 应用程序路径} function GetDiskInfo(sFile : string; var nDiskFree,nDiskSize : Int64): boolean; {测试通过} {* 取sFile 所在磁盘空间状态 } function GetWindowsDir: string; {测试通过} {* 取Windows系统目录} function GetWinTempDir: string; {测试通过} {* 取临时文件目录} function AddDirSuffix(Dir: string): string; {测试通过} {* 目录尾加'\'修正} function MakePath(Dir: string): string; {测试通过} {* 目录尾加'\'修正} function IsFileInUse(FName: string): Boolean; {测试通过} {* 判断文件是否正在使用} function GetFileSize(FileName: string): Integer; {测试通过} {* 取文件长度} function SetFileDate(FileName: string; CreationTime, LastWriteTime, LastAccessTime: TFileTime): Boolean; {测试通过} {* 设置文件时间 Example: FileSetDate('c:\Test\Test1.exe',753160662); } function GetFileDate(FileName: string; var CreationTime, LastWriteTime, LastAccessTime: TFileTime): Boolean; {测试通过} {* 取文件时间} function FileTimeToLocalSystemTime(FTime: TFileTime): TSystemTime; {测试通过} {* 文件时间转本地时间} function LocalSystemTimeToFileTime(STime: TSystemTime): TFileTime; {测试通过} {* 本地时间转文件时间} function GetFileIcon(FileName: string; var Icon: TIcon): Boolean; {测试通过} {* 取得与文件相关的图标，成功则返回True} function CreateBakFile(FileName, Ext: string): Boolean; {测试通过} {* 创建备份文件} function Deltree(Dir: string): Boolean; {测试通过} {* 删除整个目录} function GetDirFiles(Dir: string): Integer; {测试通过} {* 取文件夹文件数} type TFindCallBack = procedure(const FileName: string; const Info: TSearchRec; var Abort: Boolean); {* 查找指定目录下文件的回调函数} procedure FindFile(const Path: string; const FileName: string = '*.*'; Proc: TFindCallBack = nil; bSub: Boolean = True; const bMsg: Boolean = True); {* 查找指定目录下文件} procedure FindFileList(Path:string;Filter,FileList:TStrings;ContainSubDir:Boolean; lb: TLabel=nil); { 功能说明：查找一个路径下的所有文件。 参数： path:路径,filter:文件扩展名过滤,FileList:文件列表, ContainSubDir:是否包含子目录} function Txtline(const txt: string): integer; {* 返回一文本文件的行数} function Html2Txt(htmlfilename: string): string; {* Html文件转化成文本文件} function OpenWith(const FileName: string): Integer; {测试通过} {* 文件打开方式} //▎============================================================▎// //▎====================⑤扩展的对话框函数======================▎// //▎============================================================▎// procedure InfoDlg(Mess: string; Caption: string = SCnInformation; Flags: Integer = MB_OK + MB_ICONINFORMATION); {测试通过} {* 显示提示窗口} function InfoOk(Mess: string; Caption: string = SCnInformation): Boolean; {测试通过} {* 显示提示确认窗口} procedure ErrorDlg(Mess: string; Caption: string = SCnError); {测试通过} {* 显示错误窗口} procedure WarningDlg(Mess: string; Caption: string = SCnWarning); {测试通过} {* 显示警告窗口} function QueryDlg(Mess: string; Caption: string = SCnInformation): Boolean; {测试通过} {* 显示查询是否窗口} procedure SetWindowAnimate(Sender : TForm; IsSetAni : bool); //▎============================================================▎// //▎=====================⑥系统功能函数=========================▎// //▎============================================================▎// procedure MoveMouseIntoControl(AWinControl: TControl); {测试通过} {* 移动鼠标到控件} function DynamicResolution(x, y: WORD): Boolean; {测试通过} {* 动态设置分辨率} procedure StayOnTop(Handle: HWND; OnTop: Boolean); {测试通过} {* 窗口最上方显示} procedure SetHidden(Hide: Boolean); {测试通过} {* 设置程序是否出现在任务栏} procedure SetTaskBarVisible(Visible: Boolean); {测试通过} {* 设置任务栏是否可见} procedure SetDesktopVisible(Visible: Boolean); {测试通过} {* 设置桌面是否可见} procedure BeginWait; {测试通过} {* 显示等待光标} procedure EndWait; {测试通过} {* 结束等待光标} function CheckWindows9598NT: string; {测试通过} {* 检测是否Win95/98/NT平台} function GetOSInfo : String; {测试通过} {* 取得当前操作平台是 Windows 95/98 还是NT} function GetCurrentUserName : string; {*获取当前Windows登录名的用户} function GetRegistryOrg_User(UserKeyType:string):string; {*获取当前注册的单位及用户名称} function GetSysVersion:string; {*//获取操作系统版本号} function WinBootMode:string; {//Windows启动模式} type PShutType = (UPowerOff, UShutdown, UReboot, ULogOff, USuspend, UHibernate); procedure WinShutDown(ShutWinType:PShutType; PForce:Boolean); {//Windows ShutDown等} //▎============================================================▎// //▎=====================⑦硬件功能函数=========================▎// //▎============================================================▎// function GetClientGUID:string; { 功能描述：在本机上得到一个GUID.去掉两端的大括号和中间的横线 返回值：去掉两端的大括号和中间的横线的一个GUID 适用范围：windows } function SoundCardExist: Boolean; {测试通过} {* 声卡是否存在} function GetDiskSerial(DiskChar: Char): string; {* 获取磁盘序列号} function DiskReady(Root: string) : Boolean; {*检查磁盘准备是否就绪} procedure WritePortB( wPort : Word; bValue : Byte ); {* 写串口} function ReadPortB( wPort : Word ) : Byte; {*读串口} function CPUSpeed: Double; {* 获知当前机器CPU的速率（MHz）} type TCPUID = array[1..4] of Longint; function GetCPUID : TCPUID; assembler; register; {*获取CPU的标识ID号*} function GetMemoryTotalPhys : Dword; {*获取计算机的物理内存} type TDriveState = (DSNODISK, DSUNFORMATTEDDISK, DSEMPTYDISK, DSDISK_WITHFILES); function DriveState (driveletter: Char) : TDriveState; {* 检查驱动器A中磁盘是否有效} //▎============================================================▎// //▎=====================⑧网络功能函数=========================▎// //▎============================================================▎// function GetComputerName:string; {* 获取网络计算机名称} function GetHostIP:string; {* 获取计算机的IP地址} function NetUserChangePassword(Domain:PWideChar; UserName:PWideChar; OldPassword:PWideChar; NewPassword:PWideChar): LongInt; stdcall; external 'netapi32.dll' name 'NetUserChangePassword'; {* // 运行平台：Windows NT/2000/XP {* // Windows 95/98/Me平台：可以用该函数修改用户的Windows登录密码} //▎============================================================▎// //▎=====================⑨汉字拼音功能函数=====================▎// //▎============================================================▎// function GetHzPy(const AHzStr: string): string; {测试通过} {* 取汉字的拼音} function HowManyChineseChar(Const s:String):Integer; {* 判断一个字符串中有多少各汉字} //▎============================================================▎// //▎===================⑩数据库功能函数及过程===================▎// //▎============================================================▎// {function PackDbDbf(Var StatusMsg: String): Boolean;} {* 物理删除数据库(Db，Dbf)中的数据[着了删除标记的记录]} procedure RepairDb(DbName: string); {* 修复Access表} function CreateODBCCfgInRegistry(ODBCSourceName:WideString;ServerName, DataBaseDescription:String):boolean; {* 通过注册表创建ODBC配置[创建在系统DSN页下]} function ADOConnectSysBase(Const Adocon:TadoConnection):boolean; {* 用Ado连接SysBase数据库函数} function ADOConnectLocalDB(Const Adocon:TadoConnection;Const Dbname,DbServerName:string;ValidateMode:Integer):boolean; {* 用Ado连接数据库函数} function ADOODBCConnectLocalDB(Const Adocon:TadoConnection;Const Dbname:string;ValidateMode:Integer):boolean; {* 用Ado与ODBC共同连接数据库函数} function CreatTable(LpDataBaseName,LpTableName,LpSentence:string):Boolean; {* //建立新表} function AddField(LpFieldName:string; LpDataType: TFieldType; LpSize: Word):string; {*//在表中添加字段} function KillField(LpFieldName:string):String; {* //在表中删除字段} function AlterTableExec(LpDataBaseName,LpSentence:string):Boolean; {* //修改表结构} function GetSQLSentence(LpTableName,LpSQLsentence:string): string; {* /修改、添加、删除表结构时的SQL句体} //▎============================================================▎// //▎======================⑾进制函数及过程======================▎// //▎============================================================▎// function StrToHex(AStr: string): string; {* 字符转化成十六进制} function HexToStr(AStr: string): string; {* 十六进制转化成字符} function TransChar(AChar: Char): Integer; //▎============================================================▎// //▎=====================⑿其它函数及过程=======================▎// //▎============================================================▎// function TrimInt(Value, Min, Max: Integer): Integer; overload; {测试通过} {* 输出限制在Min..Max之间} function IntToByte(Value: Integer): Byte; overload; {测试通过} {* 输出限制在0..255之间} function InBound(Value: Integer; Min, Max: Integer): Boolean; {测试通过} {* 判断整数Value是否在Min和Max之间} procedure CnSwap(var A, B: Byte); overload; {* 交换两个数} procedure CnSwap(var A, B: Integer); overload; {* 交换两个数} procedure CnSwap(var A, B: Single); overload; {* 交换两个数} procedure CnSwap(var A, B: Double); overload; {* 交换两个数} function RectEqu(Rect1, Rect2: TRect): Boolean; {* 比较两个Rect是否相等} procedure DeRect(Rect: TRect; var x, y, Width, Height: Integer); {* 分解一个TRect为左上角坐标x, y和宽度Width、高度Height} function EnSize(cx, cy: Integer): TSize; {* 返回一个TSize类型} function RectWidth(Rect: TRect): Integer; {* 计算TRect的宽度} function RectHeight(Rect: TRect): Integer; {* 计算TRect的高度} procedure Delay(const uDelay: DWORD); {测试通过} {* 延时} procedure BeepEx(const Freq: WORD = 1200; const Delay: WORD = 1); {Win9X下测试通过} {* 只能在Win9X下让喇叭发声} procedure ShowLastError; {测试通过} {* 显示Win32 Api运行结果信息} function writeFontStyle(FS: TFontStyles; inifile: string; write: boolean):string; {* 将字体Font.Style写入INI文件} function readFontStyle(inifile: string): TFontStyles; {* 从INI文件中读取字体Font.Style文件} //function ReadCursorPos(SourceMemo: TMemo): TPoint; function ReadCursorPos(SourceMemo: TMemo): string; {* 取得TMemo 控件当前光标的行和列信息到Tpoint中} function CanUndo(AMemo: TMemo): Boolean; {* 检查Tmemo控件能否Undo} procedure Undo(Amemo: Tmemo); {*实现Undo功能} procedure AutoListDisplay(ACombox:TComboBox); {* 实现ComBoBox自动下拉} function UpperMoney(small:real):string; {* 小写金额转换为大写 } function Myrandom(Num: Integer): integer; {*利用系统时间产生随机数)} procedure OpenIME(ImeName: string); {*打开输入法} procedure CloseIME; {*关闭输入法} procedure ToChinese(hWindows: THandle; bChinese: boolean); {*打开中文输入法} //数据备份 procedure BackUpData(LpBackDispMessTitle:String); procedure ImageLoadGif(Picture: TPicture; filename: string); procedure ImageLoadJpg(Picture: TPicture; filename: string);
MS-SQL Server

34,590

社区成员

254,589

社区内容

发帖
与我相关
我的任务
社区描述
MS-SQL Server相关内容讨论专区
社区管理员
  • 基础类社区
  • 二月十六
  • 卖水果的net
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章