随笔分类 -  Delphi

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

点击右上角即可分享
微信分享提示