随笔分类 -  Coding

工作也好,平时玩也好,接触到的关于程序编码相关记录
FireDac 与数据库连接时字符集及对应的字段类型问题
摘要:近日在一个过程调用时发生一个奇怪现象, 异常返回意思是说, 数据的长度是【6】, 而字段定义的长度是【3】。 分析后认为: 调用过程你不涉及到对返回数据集的字段手动定义问题, 出现这个问题应是两边的字符集出了问题。数据库字符集为 SIMPLIFIED CHINESE_CHINA.ZHS16GBK, ... 阅读全文

posted @ 2015-07-23 13:26 震撼起飞 阅读(953) 评论(0) 推荐(0)

FireDac 的数据库批量语句提交(高效)
摘要:FD提供了批量执行功能,称为ArrayDML。可以这么做:FDQuery1.SQL.Text := 'insert into MyTab values (:p1,:p2,:p3)';// here FDQuery1.Params collection is filled by 3 parameter... 阅读全文

posted @ 2015-07-13 21:22 震撼起飞 阅读(1915) 评论(0) 推荐(0)

Delphi XE的firemonkey获取当前文件所在路径的方法
摘要:DelphiXE的firemonkey获取当前文件所在路径的方法在之前,我们知道有三种方法: ExtractFilePath(ParamStr(0)) ExtractFilePath(Application.ExeName) GetCurrentDir + '\'在firemonkey中,Windo... 阅读全文

posted @ 2015-06-23 16:51 震撼起飞 阅读(646) 评论(0) 推荐(0)

启用 TStringGrid 的自画功能,并避免重影
摘要:FMX控件的TStringGrid下,有时为了让不同行或不同Cell的显示颜色、字体等有各种不同的颜色, 必须采用自画,即在其OnDrawColumnCell事件中写自己的控制代码显示。例如: s := sgrdLog.Cells[1,Row]; if s = 'info' then ... 阅读全文

posted @ 2015-06-18 17:34 震撼起飞 阅读(501) 评论(0) 推荐(0)

Delphi Xe 中如何把日期格式统一处理,玩转 TDatetime
摘要:日期格式的处理总是会很复杂,因为不同的环境日 期格式也不一样。为了程序统一处理, 最好把格式给统一了:可以在程序的初始化段: FormatSettings.ShortDateFormat := 'dd/mm/yyyy'; FormatSettings.DateSeparator := '/'; ... 阅读全文

posted @ 2015-06-14 11:16 震撼起飞 阅读(4736) 评论(0) 推荐(0)

Delphi 调用 Rest 服务的一些
摘要:1、关于数据接收的格式测试发现获取的json源数据中间汉字的地方是乱码,导致引号不配对,引发内存错误。TIdHttp在获取数据之前,要将定义的TStringStream的Encoding设置为UTF8,才可以。var b: TStringStream; //用于接收json数据的流 s1: Str... 阅读全文

posted @ 2015-05-22 23:31 震撼起飞 阅读(1484) 评论(0) 推荐(0)

Delphi 中将一些 Dll等生成资源文件打包成一个独立的EXE程序方法步骤
摘要:资源文件一般为扩展名为res的文件,其自带的资源编译工具BRCC32.EXE(位于/Delphi/BIN目录下)1.编写rc脚本文本 用记事本或其它文本编辑器编写一个扩展名为rc的文件,格式分别为在资源文件中的名称->类型->实际文件名称。例如:要将文件名 demo.Dll的文件打包成一个资源文件,... 阅读全文

posted @ 2015-05-16 23:41 震撼起飞 阅读(2832) 评论(0) 推荐(0)

Delphi Xe2 后的版本如何让Delphi程序启动自动“以管理员身份运行"
摘要:由于Vista以后win中加入的UAC安全机制,采用Delphi开发的程序如果不右键点击“以管理员身份运行”,则会报错。在XE2以上的Delphi版本处理这个问题已经非常简单了。右建点击工程,选择“Options”->“Applicaion”下,将Runtime themes项设置为“Use Cus... 阅读全文

posted @ 2015-05-05 11:35 震撼起飞 阅读(640) 评论(0) 推荐(0)

在Dll中使用 TFDQuery 的 LoadFromStream 方法注意问题
摘要:今天又遇到一怪事, FDQuery 在服务器 savestream 传回了客户端。 客户端接收后 loadfromstream 接收都正常。 但当我把客户端封装成 dll 时,loadfromstream 就会报错: Invalid class typecast .{----------------... 阅读全文

posted @ 2015-03-09 14:18 震撼起飞 阅读(891) 评论(0) 推荐(0)

在Win8下无法打开 hlp 帮助文件的问题
摘要:需要安装Win8针对该问题的补丁程序,并且修改注册表,详细的解决方案:http://support.microsoft.com/kb/917607/zh-cn#fixit4me 阅读全文

posted @ 2015-02-04 16:10 震撼起飞 阅读(259) 评论(0) 推荐(0)

D5转Xe点滴
摘要:1、 VarIsNull 函数已经被Variants 单元, 相应的 Var 相关都放在哪2、原本在SysUtils 下的部分格式函数或定义,例如 .DecimalSeparator; ShortDayNames 等,被搬到了FormatSettings 单元下, 只要在前面加FormatSetti... 阅读全文

posted @ 2015-01-04 22:54 震撼起飞 阅读(268) 评论(0) 推荐(0)

Delphi中使用@取函数地址的问题(转)
摘要:Delphi中使用@取函数地址的问题例如以下代码:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;type TForm1 = clas... 阅读全文

posted @ 2014-12-15 18:27 震撼起飞 阅读(836) 评论(0) 推荐(0)

Delphi xe 下快捷使用 FastMM 的内存泄露检测功能
摘要:Delphi xe 集成了FastMM,调试程序是的时候可以方便地检查内存泄露了。 使用方法:在project中,添加一行: ReportMemoryLeaksOnShutdown := DebugHook0;DebugHook0 目的是保证单独运行exe文件不会弹出内存泄漏框,源码可以不用注释... 阅读全文

posted @ 2014-11-18 16:39 震撼起飞 阅读(2147) 评论(0) 推荐(0)

使用 TFDConnection 的 pooled 连接池
摘要:从开始看到这个属性,就一直认为他可以提供一个连接池管理功能, 苦于文档资料太少, 甚至在帮助中对该属性的使用都没有任何介绍,如果你搜索百度,也会发现基本没资料。最后终于在其官方网站看到了其完整相关的英文资料,虽然没有正面介绍该属性,但却是要启用该属性的详细方法:Defining Connection... 阅读全文

posted @ 2014-11-18 13:27 震撼起飞 阅读(6623) 评论(2) 推荐(1)

DataSnap 的连接事件顺序图
摘要:无意看到这两幅图,虽然已经了解,还是转一份保留以备后用 阅读全文

posted @ 2014-11-11 14:17 震撼起飞 阅读(397) 评论(0) 推荐(0)

Delphi 的各版本定义,用于预编译参数中,避免忘记备忘之
摘要:DELPHI的版本宏: VER80 - Delphi 1 VER90 - Delphi 2 VER100 - Delphi 3 VER120 - Delphi 4 VER130 - Delphi 5 VER140 - Delphi 6 VER150 - Delphi 7 VER160 - Delph... 阅读全文

posted @ 2014-10-31 13:49 震撼起飞 阅读(537) 评论(0) 推荐(0)

FreeOnTerminate 的线程在线程管理类的Destroy释放时手工释放的问题
摘要:这个问题折腾了我整整一天。 有一个线程管理类,集中管理所有新建的线程, 线程统一在创建时标识FreeOnTerminate 为 True。 因为有的线程是不限次循环的,所以在管理类最后 Destroy 时必须对这些线程进行手工停止并释放。开始代码: FAllThread.Items[i].FOwne... 阅读全文

posted @ 2014-10-29 15:24 震撼起飞 阅读(710) 评论(0) 推荐(0)

使用 Delphi Xe 的 TDictionary
摘要:原本一直使用 TList, 将定义的一个个 Record 保存在TList 里面, 为了能把某些对象管理起来, 例如一个类的 n 多实例,可以进行索引、查找、释放等今天刚看到原来已经有了一个叫 TDictionary 对象,用起来挺方便。 挺像我们在DB中定义的 Dictionary 表,Key、V... 阅读全文

posted @ 2014-10-29 11:55 震撼起飞 阅读(15778) 评论(0) 推荐(0)

导航