del88 - 博客园

2016年4月14日

摘要：阅读全文

posted @ 2016-04-14 11:19 del88 阅读(17) 评论(0) 推荐(0)

2016年4月13日

摘要：给结构体指针分配内存但在很多时候, 一些参数是结构指针; 特别是在接受数据时, 一般需要手动分配内存. 如果只使用一个单结构指针, 用 New 分配内存是最合适的, 譬如: var p: PPoint; {这是点结构 TPoint 的指针, 系统早定义好的}begin New(p); // p^. 阅读全文

posted @ 2016-04-13 19:06 del88 阅读(499) 评论(0) 推荐(0)

2016年4月12日

动画演示 - 定义变量不用来回移动鼠标！！！

摘要：动画剧本:第一个变量: 输入: var; 然后执行 Ctrl+J ... 回车第二个变量: 执行 Ctrl+J; 然后输入 v 后打空格键 ... 再 Tab ... 回车第三个变量: 先书写语句; 然后选定变量, 执行 Ctrl+Shift+V ...第四个变量: 同上. 我自己总结，我自已一般只阅读全文

posted @ 2016-04-12 09:40 del88 阅读(39) 评论(0) 推荐(0)

2016年4月7日

资源文件的优点，在分模块式开发的大环境下，资源文件几乎没有优势。。。小软件有优势。

摘要：阅读全文

posted @ 2016-04-07 14:46 del88 阅读(219) 评论(0) 推荐(0)

2016年3月29日

关于数据结构的赋值，最好不要直接赋值，而是采用构造函数、或其它函数来赋值，这样可以方便控制---我自己！

摘要：阅读全文

posted @ 2016-03-29 10:21 del88 阅读(250) 评论(0) 推荐(0)

2016年3月13日

AsBcd的意思

摘要：阅读全文

posted @ 2016-03-13 10:59 del88 阅读(319) 评论(0) 推荐(0)

2016年3月11日

FireDac 连接 SQL SERVER 2014 - LocalDB

摘要：易博龙官方的文档没有更新，官方的文档只能连接local-db2012 微软官方关于local-db 2012的描述如下：但是现在我开始使用SQL SERVER LOCAL-DB 2014了，因为今年是2016年，如果使用太新的版本可能老的系统上比如老的win7上运行可能会报错。所以也不能太阅读全文

posted @ 2016-03-11 12:15 del88 阅读(25) 评论(0) 推荐(0)

2016年3月3日

为什么32位系统最大支持4G内存？？我自己悟出来了终于。。。。。

摘要：今天突然开窍了，想通了。。。。。以下是我的抽象想法： 32位系统这个多少位指的是硬件的一次性发送过来的位数，一个字节等于8位，内存的一个存储单元就是一个字节，即8位。也可以这样来想这个位，就是栈中内存地址的二进制位数，那么 32位的意思是栈中内存地址最大是 32个11，即：你阅读全文

posted @ 2016-03-03 18:00 del88 阅读(1726) 评论(0) 推荐(1)

2016年2月27日

关于 Delphi 中流的使用(1) 用 TMemoryStream(内存流) 入门 &&& 关于指针的迷惑,我自己问的.

摘要：前言: 所谓"流", 就是一段数据或是一块内存;在进行流操作时, 我们不必关心流中的数据到底是什么; 只需要知道流的大小和当前的指针位置. 所以流只有两个属性: Size、Position.对流的操作, 不过就是读取和写入. 所以流最主要的方法就是 Read 和 Write.在很多控件的使用中, 读阅读全文

posted @ 2016-02-27 16:35 del88 阅读(598) 评论(0) 推荐(0)

2015年11月5日

bring to front 必须在右边的form上才生效。

摘要：右边form上一次后，左边的就可以了。。。。阅读全文

posted @ 2015-11-05 20:06 del88 阅读(637) 评论(0) 推荐(0)

2015年8月29日

Build 和 Compile 区别

摘要：阅读全文

posted @ 2015-08-29 17:50 del88 阅读(36) 评论(0) 推荐(0)

2015年8月17日

Adoquery.Refresh 慎用。。。。非常严重，会带来各种问题。

摘要： adoquery.refresh 各种问题，根本启不到刷新的作用。完全不刷新的节奏。修改成已经打印后，如果用adoquery.refresh的话，这两个订单并不会被刷新掉，惨吧。。。。。。阅读全文

posted @ 2015-08-17 17:16 del88 阅读(37) 评论(0) 推荐(0)

ADO 右键问题，当dbgrideh非只读的时候，会遇到这个问题

摘要：用法：阅读全文

posted @ 2015-08-17 16:51 del88 阅读(210) 评论(0) 推荐(0)

2015年8月8日

图像列表组件（TImageList）

摘要： TImageList 组件是一组同样尺寸的图像列表，每一个图像由它的Index值查询。 1.TImageList组件的典型用法图形列表用于建立和管理大量的图像，主要是配合菜单或者工具栏按钮的使用。图像列表中的所有图像的出场必须想通，每一个图像都有一个相异的序号。为什么要使用图像列表呢？以树状视图为阅读全文

posted @ 2015-08-08 18:13 del88 阅读(389) 评论(0) 推荐(0)

如何在Delphi TImageList 中使用透明 png 图标

摘要： Query: "Embarcadero Delphi ImageList does not show transparent PNG icons correctly. How to fix it?". Solution: If you want to use 32-bit (24-bit + alp 阅读全文

posted @ 2015-08-08 17:59 del88 阅读(41) 评论(0) 推荐(0)

2015年7月26日

记录元素初始化、类属性初始化、记录属性初始化区别【严重注意，使用记录类型的时候要严重注意】

摘要：严重注意：使用记录类型的时候要严重注意，记录类型的元素初始化并非我们想要的结果，如果是integer,currey当不赋值的时候，初始化并不为0,而是随机数， boolean 类型默认为true，所以当记录类型的元素用不到的时候，一定要注释掉，而不是放再那里不赋值，如果你不赋值，系统也会自动给你阅读全文

posted @ 2015-07-26 10:29 del88 阅读(21) 评论(0) 推荐(0)

2015年7月7日

ehlib 排序后滚动条不对问题

摘要：针对CDS的情况，作者的代码里好像也不知道什么原因必须写Cds.First但是，不写的话，就是不行，去掉作者的注释就可以了。阅读全文

posted @ 2015-07-07 10:23 del88 阅读(30) 评论(0) 推荐(0)

2015年7月6日

Delphi dbgrideh颜色设置

摘要： DBGridEh中分行分列、单元格的颜色设置（1）分行不同颜色设置；在DBGridEh1DrawColumnCell中写； if ADOQuery1.RecNo mod 2=0 then begin DBGridEh1.Canvas.Font.Color := clRed; DBGridEh1.De 阅读全文

posted @ 2015-07-06 11:57 del88 阅读(376) 评论(0) 推荐(0)

2015年4月10日

TfrxReport.Clear。尽量慎用。

摘要： for MyXuHaoKey in MyXuHaoJianRongSanJieKouDataDicApi.KeySortList do begin //标记下打印编号,吸入淘打的客户 MyTradeApi.MarkDayNoByXuhao(MyXuHaoKey); with MyShopAdq do 阅读全文

posted @ 2015-04-10 17:02 del88 阅读(22) 评论(0) 推荐(0)

2015年3月27日

今天才知道 Ping 命令的意义

摘要：当ping一个域名的时候可以知道这个域名的解析情况，也可以知道当前电脑是否联通了域名。可以看到 diandaxia.com 的域名解析是 112.124.182.113 ，而www.diandaxia.com 就不是了，由于用了阿里云的ace 所以是一个阿里云的负载均衡的IP 阅读全文

posted @ 2015-03-27 21:41 del88 阅读(22) 评论(0) 推荐(0)

2015年3月23日

Delphi判断一个字符串在另一个字符串中出现的次数 7个方法的效率对比。

摘要： unit Unit14; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, 阅读全文

posted @ 2015-03-23 16:57 del88 阅读(254) 评论(0) 推荐(0)

2015年3月22日

Delphi TStringList 有趣的CommaText和DelimitedText

摘要： CommaText 在没有指定StrictDelimiter=true的情况下,当列表中项中包含空格和逗号的时候就默认的在这个字符串上面增加双引号很智能吧例子1： var MyList: TStringList; begin MyList := TStringList.Create; 阅读全文

posted @ 2015-03-22 09:42 del88 阅读(329) 评论(0) 推荐(0)

2015年3月10日

使用Redis作为消息队列服务场景应用案例

摘要：一、消息队列场景简介 “消息”是在两台计算机间传送的数据单位。消息可以非常简单，例如只包含文本字符串；也可以更复杂，可能包含嵌入对象。消息被发送到队列中，“消息队列”是在消息的传输过程中保存消息的容器。在目前广泛的Web应用中，都会出现一种场景：在某一个时刻，网站会迎来一个用户请求的高峰期（比如：阅读全文

posted @ 2015-03-10 09:42 del88 阅读(45) 评论(0) 推荐(0)

2015年3月4日

delphi 下获取一个字符的 Unicode 编码

摘要：用 Ord('万') 可以得到 "万" 字的 UniCode 的编码. 阅读全文

posted @ 2015-03-04 19:33 del88 阅读(17) 评论(0) 推荐(0)

2015年3月3日

Delphi 安装ICS

摘要：下载完成后解压到你的指写目录！ 1、在library里加入ICS->Delphi->Vc32目录。 2、从File->Open中打开ICS->Delphi->Vc32->IcsDel110.dproj文件。(文件名在其它Delphi版本略有不同) 3、在项目管理器中，右键IcsDel110.bpl选阅读全文

posted @ 2015-03-03 16:09 del88 阅读(55) 评论(0) 推荐(0)

2015年2月23日

delphi 窗体透明详解TransparentColorValue，窗体透明控件不透明

摘要：关于窗体透明的做法 1.在Delphi中，设置窗体的AlphaBlend := true;AlphaBlendValue := 0-255; AlphaBlendValue越小窗体的透明度就越高。这种方法将会使窗体和窗体中控件都变成透明。 2.在Delphi中，设置TransparentColor 阅读全文

posted @ 2015-02-23 13:55 del88 阅读(1637) 评论(0) 推荐(0)

2015年2月5日

Label的背景色

摘要： Label的背景色是 color属性，但是这个属性是必须 Transparent 为 false的时候才生效，否则不生效阅读全文

posted @ 2015-02-05 15:06 del88 阅读(24) 评论(0) 推荐(0)

2015年1月12日

FDMemTable用法

摘要： procedure TForm1.FormCreate(Sender: TObject); Var i:integer; begin // i:=15; self.FDMemTable1.FieldDefs.Add('ID',ftstring,10); self.FDMemTable1.FieldD 阅读全文

posted @ 2015-01-12 11:27 del88 阅读(89) 评论(0) 推荐(0)

2014年12月29日

delphi中的退出程序的确认问题

摘要：在formclose中用if Application.MessageBox('你确认要退出吗？','请确认',MB_YesNo+MB_IconQuestion)=IDno then begin ........//这里写什么,程序才不会退出 end 纠正下不是在 Form 的 Close 事件里,因阅读全文

posted @ 2014-12-29 15:11 del88 阅读(43) 评论(0) 推荐(0)

2014年12月14日

京东服务市场电话

该文被密码保护。阅读全文

posted @ 2014-12-14 12:59 del88 阅读(7) 评论(0) 推荐(0)

2014年11月24日

淘宝菜鸟测试

该文被密码保护。阅读全文

posted @ 2014-11-24 18:03 del88 阅读(1) 评论(0) 推荐(0)

2014年10月16日

FormatDateTime 当前时间减去几小时的做法

摘要： top_start_modified := FormatDateTime('yyyy-mm-dd hh:mm:ss',(Now - ((1/24)*3))); top_end_modified := FormatDateTime('yyyy-mm-dd hh:mm:ss',Now); 阅读全文

posted @ 2014-10-16 15:54 del88 阅读(559) 评论(0) 推荐(0)

2014年10月9日

Delphi Vista,Win7,Win8 的 Uac,管理员身份运行

摘要：要用就用下面我自己总结的官方的做法： 1.首先搜到delphi 自带的manifest,然后在其基础上改一个单词 2.将里面的asInvoker改为requireAdministrator 3.修改为保存为uac.manifest 4.在project->options->application-> 阅读全文

posted @ 2014-10-09 15:57 del88 阅读(26) 评论(0) 推荐(0)

2014年8月28日

阻止关闭窗口，FormCloseQuery

摘要： procedure TfrmTopJdsMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);begin if MessageDlg('您好,关闭此插件,将导致【订单全链路】不能正常使用！请确认是否关闭？',mtConfirmati... 阅读全文

posted @ 2014-08-28 19:52 del88 阅读(909) 评论(0) 推荐(0)

2014年8月25日

frmClientDm.ItemInLogShowAdq.Delete 报【BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。】

摘要：当Adoquery 中只有一条数据库的时候，这个时候删除就会报：BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。这个错误导致这个错误的原因是ado的一个bug，这个问题遇到了很多次了，浪费了大量的时间也没有一个结果，今日终于测试出这个问题的原因了，如阅读全文

posted @ 2014-08-25 16:04 del88 阅读(41) 评论(0) 推荐(0)

2014年8月22日

delphi 自己用的加密解密算法

摘要： // 加密方法一(通过密钥加密解密)function EncryptString(Source, Key: string): string;function UnEncryptString(Source, Key: string): string;//加密方法二(通过移位加密解密)function 阅读全文

posted @ 2014-08-22 13:27 del88 阅读(201) 评论(0) 推荐(0)

2014年8月7日

DbgridEh 导出 Excel 如果字段长度超过255会截断，那如何导出，另一种神奇的方法

摘要：由于DbgridEh 导出 Excel 如果字段长度超过255会截断，所以必须换一种方法来导出，百度谷歌看了上百帖，都是有这句： xlApp := CreateOleObject('Excel.Application'); 由于这句代码是要求客户的电脑上必须有 Office 才行，利用的是OL 阅读全文

posted @ 2014-08-07 18:46 del88 阅读(111) 评论(0) 推荐(0)

切断数据感知控件，大大提升软件运行速度

摘要： ADOQuery1.DisableControls;ADOQuery1.EnableControls; 阅读全文

posted @ 2014-08-07 14:01 del88 阅读(183) 评论(0) 推荐(0)

2014年8月3日

当一个窗体上有PageControl 控件时，是先执行 FormShow呢，还是先执行PageControl 的 TabSheet2Show呢

摘要：答案是先执行TabSheet2Show ,总算知道了，顺便推理Onshow事件的执行顺序是从内到外，先执行容器内的控件的事件，再执行窗体的事件阅读全文

posted @ 2014-08-03 17:45 del88 阅读(165) 评论(0) 推荐(0)

2014年7月31日

公司路由器带宽控制

摘要：注意上面只是将了流程，但是上面的很多设置都是错的，经过试验发现，如果针对IP段进行设置，无论如何也设置不好，因为如果针对IP段进行设置的话，上下行带宽的设置很麻烦，需要判断上下行带宽的数量来填上下行带宽，算了不写了一头乱麻由于设置的各种麻烦性，终于想通了一个设置的方法，就是不设置限速规则，阅读全文

posted @ 2014-07-31 14:47 del88 阅读(275) 评论(0) 推荐(0)