开发到财务方面的东西，往往需要把数值转换成大写金额输出。 网上找了一圈都没发现完美的，尤其是在XE系列下。 发现这个写法还是比较满意的，特分享。 function THxsdj.UPRMB(val: Double): string; {人民币转大写函数} var Dig, Dpos, retVal, retValjf: string; IntPart:
年度归档： 2016 年
关于装载teechart2015后一直报错的问题
继续重装后的一堆控件部署问题，删除掉原来的teechart自带版本。 点击安装最新的完整版，但是装上后打开其他程序时不时会出现Cannot load package A, it contains unit…错误。 总得想办法搞掉它，最后发现是安装完fastreport，要重编译下，编译时选择teechart的dcu一起编译。 问题解决！
关于Delphi10up1下装Abbrevia控件的解决方案
Abbrevia是个不错的解压控件，我的所有自动升级程序都是用的这个控件自解压到客户端的。 以前重装IDE后都是利用下getit装下，自动完成。 这几天getit抽风了，下载不了，只能去官网下载一份自己装了。 但是FMX版本能装上，遇到VCL的却始终报错，搞不懂啊，应该不是控件的问题啊，找了很多方法都不奏效。 最终发现是Abbreviavcld230.bpl的默认平台是64位，其他都是
安装MySQL时遇到无法启动服务的解决方案
今天在官方下载了最新版本的Mysql，5.7版吧，由于不是安装版，要自己设置环境和配置。 环境和配置都设置完毕，就等输入 net start mysql 启动服务时出现，无法启动的问题。 输入 mysqld –console 启动，显示缺少data文件夹，问题就在此了，千万别手动建立。 解决方法如下： 在命令行输入： mysqld ̵
关于kbmMW TDateTime转成TDate的bug修正
在昨天的项目中，想从服务器调用一个时间返回给客户端，但是明明查询的是datetime格式的，怎么就到了客户端变成date了，其他的一段被吃了？ 请教清幽傲竹，他说红鱼儿博客上有提及此错误。 遂到鱼儿的博客上翻找一二。 其解决方案原文如下： 最新版本的kbmMW,当表中有TDateTime字段时，客户端ClientQuery取的是TDate字段类型，这不对。解决方法是注释掉TkbmMWCustomUNIDACQuery.PerformRefreshDefinitions方法中的这一行： //ftD
关于在添加kbmMWClientQuery时出现连接失败的总结
最近由datasnap转移到Kbmmw,经过几天的琢磨，总算有点入门了。 经过折腾发现Kbmmw确实在实际中能省去很多的代码量，前提还是需要一定的时间去琢磨它的功能。 由于有时在客户端添加一个kbmMWClientQuery，点击会出现connection lost… 之类的提示，当初我以为是服务端和数据库都没连接的缘故，但是其实不是。 解决的方法是，将kbmMWClientConnectionPool1 连接池的状态变更下，再去点击query你会发现，连接上了。 这是一个小细节的问
关于对kbmMW返回流到客户端的修正
近期开始折腾Kbmmw,由于资料尚少，洞主 是引入Kbmmw的先驱，只能看他的文章了，但是看到例子kbmMW返回流到客户端，发现怎么都调试不成功。 一直报错！ 由于洞主写的代码较早，现在的Delphi版本较以前语法有差异。 原来问题有2处。 1.服务端： 将 fs:=Tfilestream.Create('D:\picture\'+args[1]); 改为 fs:=Tfilestream.Create('D:\picture\'+args[1],fmS