15 ghs79

尚未进行身份认证

暂无相关简介

等级
TA的排名 9w+

Delphi中BPL包的使用,个人经验

    用包可以分模块编写功能,方便开发阶段的组织,同时也便于后期的升级维护,使升级的粒度越来越少(也是用了C#的类库之后的感悟)。下面写几点经验一、不要用Delphi本身的bpl,把delphi自身的包中的单元取出来,合并成一个bpl。二、不要直接用三方控件的安装包,也要自己建一个包,把单元文件中加进去,编译成新包。以上两点可以有效避免包编译时的错误 Never-build package 'a...

2018-04-19 14:36:46

电子合同的实现 合同套打

合同电子化,以方便和规范对合同的管理,实现合同签订、审批的流程化管理,满足管理信息化的要求。将合同中变化的部分抽取出来,通过系统(用Delphi开发)录入数据库,借助审批流完成对合同的审批,最后转到打印管理员处打印、盖章。一、实现方法一:WORD方式用Word排版,将变化的部分用变量代替;在程序中通过COM操作Word,完成对变量的替换。保存成PDF文档,在客户端打印。优点:对WO

2018-01-07 18:03:30

cxGrid多表头实现

cxGrid实现多表头,在网上也有不少文章。但是总感觉不用着不顺手。结合DBGridEH的多表头实现方法,为了保持两者的兼容(还是个人习惯作祟吧)。主要代码如下:一、function AddGridColumn(aGrid: TcxGridTableView; aCaption, aField: string; aWidth: integer = 40;  aSumKind: stri

2018-01-02 11:56:57

delphi中string,pchar,array of char,pointer,Pbyte,array of byte之间的转化

写程序时,老是被几个数据类型搞的晕头转向,现在总结一下。基本上都是从网上查的,但又不是在一个地方,所以标记成‘转载’但又不好写从哪里转载的。有抄袭请见谅。vars:string;p:pchar;a:array[1..20] of char;那么三者之间的转换如下:1、字符串到PChar    p:=PChar(s);2、PChar到字符串    s:=p;

2017-11-06 11:58:41

cxGrid显示'合计'

之前看到有人用事件的方法实现了合计列显示‘合计’的实现方法,但觉得比较复杂,需要多写一个过程。对于动态创建字段的控件也比较难实现。看了源码,突发奇想,用Format格式字符串实现,特简单。方法一我没有实现成功,才找到方法二的。方法一:加一个Summary项,Column设为Grid的第一列,Kind设为skNone  在该Summary项的OnGetText事件中,输入:  p

2017-10-05 17:15:34

DEV控件编辑框录入内容消失的问题

DEV控件确实很漂亮,但是在TcxBarEditItem编辑框录入内容后,必须回车或者TAB键才有效,否则就会消失。解决办法1、输入之后按Enter或者TAB键。2、在onCurChange事件加这句行:cxBarEditItem1.EditValue := cxBarEditItem1.CurEditValue;3、设置你的 dxBarManager 的 AlwaysSaveTe

2017-09-03 17:27:01

给DBGridEh的data group增加比值(如毛利)

一、设置数据关系1、要利用DBGridEh的datagroup功能,必须是关联数据集MemTableEh1;不可是传统的ADOQuery,Clientdataset等。2、好在MemTableEh1有自动从其它数据集中取数据的功能,设置好对应关系,即可完成数据的转换。我是从ADO取的数据,所以关系如下。    ADOQuery1.connection := ADOconnnect1;

2017-06-23 10:53:31

解决reportmachine导出pdf有蓝色底色问题

用reportmachine导出PDF文件,背景是蓝色,试了好多版本的RM,都有这个问题。解决办法很简单,就是先给底色刷成白色。在事件OnExportPage中增加一句话。    lBmp.Width := FPageWidth;    lBmp.Height := FPageHeight;    lBmp.PixelFormat := FPixelFormat;    l

2017-06-20 11:34:52

解决Windows 7 (或Vista)远程桌面连接XP或2003缓慢的问题

在使用Windows 7之后发现一个问题,远程桌面连接XP或2003 Server时,在某些网络情况下存在连接后刷新缓慢的问题。1. 以管理员方式启动一个命令行窗口(Win+R 输入cmd按Ctrl+Shift+Enter)2. 在命令行窗口中输入:netsh interface tcp set global autotuninglevel=disabled后面那条

2017-04-19 14:26:48

cxGrid使用点滴

转自:http://blog.csdn.net/chelen_jak/article/details/7083994记录此地址,以建立资料库,方便查找。

2017-04-14 17:43:01

导出Excel的方法及困惑

我们在做项目时,难免要用到导出功能。将数据导出到Excel中做进一步加工,因为软件不可能把用户所有需求及后来的要求都做进去;多数情况下也不需要导出太多数据,如果数据导出太多就要调整需求。     但无论如何总会有需要导出大数据的时候。比如要把销售明细导出给尼尔森、商务部的信息部等,他们都需要的是大量的明细(要按店分明细,店号+条码)。   1、用cxGrid         当数据量小

2017-04-13 11:49:19

Dephi调用C#编写的WebService的一些问题与解决方法

http://blog.csdn.net/star_of_light/article/details/2315288问题1:服务端接收的所有中文都是"?????"(乱码) 解决:设置HTTPRIO控件的HTTPRIO.HTTPWebNode.UserUTF8InHeader属性为true问题2:Dephi编写的客户端在windows2003下调用WebService提示"A

2017-04-13 08:04:27

升级Win10后VMware虚拟机不能联网该怎么办?

高高兴兴的升级了win10正式版,升级的时候没有遇到任何问题,但是升级结束后,发现虚拟机不能联网了。下面分享解决办法,需要的朋友可以参考下。1、打开VMware虚拟机主页,点击“编辑——虚拟网络编辑器”。2、点击左下角的“恢复默认设置”,弹出对话框选确定。此步骤会重置虚拟网卡并安装相应的服务。如果‘恢复默认设置’是灰色的,不可点;请先点右边的‘更改设置’按钮。

2017-04-11 18:36:41

Delphi容器类之---TList、TObjectList、TComponentList、TClassList的使用

转载自:http://blog.csdn.net/iseekcode/article/details/4922001从Delphi5开始VCL中增加了新的Contnrs单元,单元中定义了8个新的类,全部都是基于标准的TList类。TList                         TList类实际上就是一个可以存储指针的容器类,提供了一系列的方法和属性来

2017-03-21 19:09:17

Delphi 中的 procedure of object

转自:http://www.cnblogs.com/ywangzi/archive/2012/08/28/2659811.html其实要了解这些东西,适当的学些反汇编,WINDOWS内存管理机制,PE结构,看下李维的VCL架构剖析可以很好理解type  TMyEvent = procedure of object;这是一种数据类型的定义,他定义了一个可以在类中使用的函数类型

2017-03-21 18:13:20

Dev打包问题

把DEV打包成一个BPL,供程序调用(虽然大了点,有38M,可以用ASPACK压缩到之前的一半)。下面是制作步骤:1、先建一个BPL,不包含任何DEV单元。2、按业务需要做窗体、写代码,当然是用包的形式编译,会提示一堆dev的包的引用(这是关键),按提示的顺序将用到的单元加到Dev包中。3、然后编译Dev包,再编译业务包。这时业务包会小很多,因为用到的单元都编译进dev包了。 

2017-03-18 16:31:48

Delphi写dll文件

从http://blog.csdn.net/km_afei/article/details/53218977这里看到,确实写的很好,作为资料保存之。一、开使你的第一个DLL专案  1.File->Close all->File->New﹝DLL﹞代码:  //自动产生Code如下  library Project2;  //这有段废话  uses  SysU

2017-03-03 19:33:35

微信支付

在做微信支付开发,完成付款很简单,但要完美运行却要付出不少努力。一、等待顾客输入支付密码    1、如果开通了免密支付,又在允许的条件下,支付最简单,调用一次“付款”接口就实现了。    2、如果不符合免密码支付条件(超过次数或者没有开通),在调用“付款”接口后还需要等待顾客输入密码。         文档中建议每三秒检查一次付款状态,在实际使用中两秒更合适,会带来更好的使用体验。

2017-03-03 19:18:55

运行期设置cxDBPivotGrid字段的统计类型

cxDBPivotGrid这么强大的控件,如果不能在运行期指定字段的统计类型,实在是太遗憾了(希望是我没有找到此功能),所以就动手添加。1、  首先寻找切入口。一种方法是改控件本身,第二种方法是在控件外部实现对控件增加功能。在看源码寻找切入点的过程中,发现还是直接改控件本身较简单。在单元中cxPivotGridAdvancedCustomization中有双击事件ListBoxDblCli

2017-02-23 19:10:15

dxNavBar获得右键菜单位置的dxNavBarItem。

1、应用场景:        右键点击dxNavBar1,更改所选TdxNavBarItem的图标。2、实现的方法      A、用dxNavBar1.HotTrackedLink.Item获取的就是dxNavBarItem1。      B、或者更通用的写法是TdxNavBar( PopupMenu1.PopupComponent).HotTrackedLink.Item。 

2017-02-22 18:27:17

查看更多

勋章 我的勋章
    暂无奖章