随笔分类 - Delphi
摘要:程序开发中,经常遇到一条记录有多个状态位,比如一条商品,他属于热门,新品,特卖。我们的数据库如何设计呢? 一般有几种方法 (1)建立关联表 关联表字段:关系Id,商品Id,属性Id 查询:使用关联表的方式,查询某属性的商品。 程序:写入时,写商品表和关联表; (2)将多个属性存在一个字段中,用|分割
阅读全文
摘要:雪花算法简单描述: + 最高位是符号位,始终为0,不可用。 + 41位的时间序列,精确到毫秒级,41位的长度可以使用69年。时间位还有一个很重要的作用是可以根据时间进行排序。 + 10位的机器标识,10位的长度最多支持部署1024个节点。 + 12位的计数序列号,序列号即一系列的自增id,可以支持同
阅读全文
摘要:nginx做TCP代理实现群集 nginx从版本1.9开始,既能做HTTP代理,又能做TCP代理,这就非常完美了。 配置nginx.conf。 在Nginx配置文件(nginx.conf)中最下面添加配置 ,并保存退出 与配置文件中的server并列 stream { upstream proxy_
阅读全文
摘要:快捷键对于提高编程速度有着很重要的影响,本文汇总整理了Delphi常用的快捷键,供大家参考之用: Ctrl+PageUp将光标移至本屏的第一行,屏幕不滚动。Ctrl+PageDown将光标移至本屏的最后一行,屏幕不滚动。Ctrl+↓向下滚动屏幕,光标跟随滚动不出本屏。Ctrl+↑向上滚动屏幕,光标跟
阅读全文
摘要:Delphi中有一个线程类TThread是用来实现多线程编程的,这个绝大多数Delphi书藉都有说到,但基本上都是对TThread类的几个成员作一简单介绍,再说明一下Execute的实现和Synchronize的用法就完了。然而这并不是多线程编程的全部,我写此文的目的在于对此作一个补充。 线程本质上
阅读全文
摘要:firedac数据集数据序列为JSON FIREDAC数据库引擎充分地考虑了跨平台和跨语言的支持。 因此,FIREDAC数据集可以序列为BIN\XML\JSON,三种格式。 firedac数据集数据序列为JSON字符串: 流导入到FDMEMTable时 必须把流指向起始的位置
阅读全文
摘要:RAD Studio 10.2.2 提供从 TDataSet 映射到 JSON ,增加了对JavaScript 客户端支持。 RAD Studio 10.2.2 为 FireDAC BatchMove 架构添加新组件的 :TFDBatchMoveJSONWriter。该组件可以轻松从TDataSet
阅读全文
摘要:链式写法有很多优点:连贯、语意集中、简洁、一气呵成、可读性强。比如要把 3.1415926 中的 59 提取为一个整数:Pi.ToString().Substring(5,2).ToInteger() 轻车熟路的感觉,让人觉得,哇!好帅的写法,牛x。 以前以为只有 TJSONBuilder 才支持链
阅读全文
摘要:1.在窗启动时创建ATOM;(aatom:ATOM;定义在private中) 2.定义处理热键的消息过程(定义在private中,下面二个处理消息的过程是一样的) 3.消息过程的处理(下面二个IF任选一个即可,如果msg在步骤2定义成TWMHotKey,则不用转换) 4.程序关闭时,刪除热键和原子
阅读全文
摘要:Delphi TStream 详细介绍Stream对象,又称流式对象,是TStream、THandleStream、TFileStream、TMemoryStream、TResourceStream和TBlobStream等的统称。它们分别代表了在各种媒介上存储数据的能力,它们将各种数据类型(包括对
阅读全文
摘要:官方原版下载链接:HTTP FTP 官方更新说明:http://docwiki.embarcadero.com/RADStudio/Rio/en/What's_New 【官方更新说明简译】1、Delphi 语言 支持内联变量和内联变量的类型推断,说明参考上一篇Linux 的内存管理已经不再使用 AR
阅读全文
摘要:青色:1、一类带绿的蓝色,中等深浅,高度饱和;2、本义是蓝色;3、一般指深绿色; 4、也指黑色;5、四色印刷中的一色;6、特指三补色中的一色。 绿色:1、在光谱中介于蓝与黄之间的那种颜色;2、本义是青中带黄的颜色; 3、引申为黑色,如绿鬓:乌黑而光亮的鬓发,代指为青春年少的容颜。 黑色:亮度最低的非
阅读全文
摘要:颜色名称 颜色效果 HexHTML clBlack $000000 #000000 clMaroon $000080 #800000 clGreen $008000 #008000 clOlive $008080 #808000 clNavy $800000 #000080 clPurple $800080 #800080 clTe...
阅读全文
摘要:delphi中有直接把10进制转换成16进制的函数: function IntToHex(Value: Integer; Digits: Integer): string; overload; function IntToHex(Value: Int64; Digits: Integer): str
阅读全文
摘要:如果要使用LeftStr,RightStr,MidStr必需引用系统单元StrUtils; 声明变量Str:string; Str:=HelloWorld; 1,LeftStr(Str,2)=He;//从Str字符串变量的最左边(第一个字符包括第一个字符)开始截取2个字符; 2,RightStr(S
阅读全文
摘要:Delphi数据类型与各数据库数据类型对比如下表,如有具体说明见表中脚注: Delphi Type Oracle Types SQL Server Types MySQL Types [1] InterBase Types PostgreSQL Types SQLite Types ftSmalli
阅读全文
摘要:HKEY_CURRENT_USER\SOFTWARE\Embarcadero\BDS\18.0\Known IDE Packages $(BDS)\Bin\CommunityToolbar240.bpl Embarcadero Community Toolbar Package 修改为_Embarc
阅读全文
摘要:DATASNAP远程方法返回TSTREAM正解 DATASNAP远程方法返回TSTREAM,如果数据大小超过32K是会报错的。许多DELPHIER栽在这个上头,甚至开始怀疑TSTREAM返回数据的可行性。 因为DATASNAP远程方法返回TSTREAM,数据包大小有最大32K限制。 怎么解决?客户端
阅读全文
摘要:project - options - version info lable改成中文名字就可以了
阅读全文
摘要:var aParams: TParams; aPar: TParam; I:Integer; begin aParams := TParams.Create(nil); aPar := aParams.CreateParam(ftVarBytes, '数据表1', ptInput); aPar.AsString:='aaaaa' ; aPar := aParams.CreateParam...
阅读全文