[日积月累]-2018-6-24:早期 Delphi 版本 Base64 解码需要注意的一点小问题

早期的 Delphi DecodeBase64 对于不是正常以 = 号结束的 Base64 编码内容进行解码时,结尾会解出乱码,造成程序运行时出问题,要解决这一问题,应对其进行补位,加上一定数量的 “=”,以解决此问题。需要补位的 “=” 个数的计算公式: n=( mod 4) n=0 :不需要补位 n>0:补

[日积月累]-20180623:W1037 FOR-Loop variable ‘Result’ may be undefined after loop

【译】 W1037 FOR 循环变量 Result 可能在循环后失去定义 【问题原因】 Result 被用在循环的初始值或结束值时会引发此警告:

就个人来看,用做循环的结束值是没有问题的,但下面的用法就有问题了: [crayon-5b54eb4454b9

[教程]为 Delphi 剪贴板加入 CF_HTML 数据支持

嗯,直接上代码,需要引用  QDAC 的 QString 单元,不支持太老版本的 Delphi,使用古董版的 Delphi 的请自己改写下:

用法是直接操作 Clipboard.AsHtml 属性就可以了,例如: [crayon-5b54eb4454f9

[日积月累]-20180622:前向声明关键字 forward

【格式】 函数声明;forward; 【用途】 forward 关键字用于前向声明一个局部函数,比如:

声明了一个 Calculate 函数,那么后面必需重新声明并实现这个函数,类似于下面: [crayon-5b54eb44551d6111944783/

[日积月累]-20180621:[Warning] W1000 Symbol ‘%1’ is deprecated: ‘Use %2’

【译】 [警告] W1000 符号 ‘%1′ 已经被废弃:’请使用 %2’ 【问题原因】 当前版的 Delphi 已经不再使用名为 %1 的函数/变量/常量,目前的代码仍可以正常运行,但最好改成使用 %2 的替代函数/变量/常量。官方的意思是相应的符号将在后续的某个版本中