Rolkey 小家

function GetMd5(AValue: AnsiString): string;var md5: TIdHashMessageDigest5;begin md5 := TIdHashMessageDigest5.Create; try Result := md5.HashStringAsHex(AValue, IndyTextEncoding(Tencoding.U...

以前在Delphig7下开发ActiveX Server时，运行exe之后，会自动注册控件，但是，使用Delphi10来开发后，发现无法自动注册，手动以管理员运行exe也无法进行注册。解决办法：以管理员运行cmd，进入exe所在目录，运行exe加参数 /RegServer，这样就可以注册进去了。...

1.导入打开EXCEL后，显示字段列表及数据2.允许导入扩展，通过导入扩展类来实现扩展功能  2.1 数据调整扩展  2.2 导入主Excel表数据时，同时也可以导入副Excel表的数据  2.3 导入后，进行的操作，如：对其他表进行处理，类似于触发器的性质，但用触发器影响性能时，用该扩展3.可批量清空字段4.可批量删除记录

放在EXE中继承TForm的对象，要RegisterClass之后，才能在RTTI中找到，而放在包中的TForm跟类不需要进行ResgisterClass

众所周知，系统需要进行多人并行开发时，应该把系统分拆成独立的模块，这样才能避免开发冲突。但如何进行分拆呢？在Delphi系统中，有很多种方法，下面来进行一一介绍与分享。1.把模块拆分成包(dpk)，直接在主程序中通过LoadPackage函数把包装载进来即可。不过这种方法也有些不便，所有的类必须继承自TPersistentClass，并且RegisterClass之后才能被GetClass从主程序

uses frxClass, frxChart, Series; var  page: TfrxPage;  band1: TfrxPageHeader;  charView1: TfrxChartView;  pieSerial: TPieSeries;begin  inherited;  page:=frxReport1.Pages[0];

前段做手持设备的程序，试了几回，感觉用string[xx]这样获取的字符串似乎正确一些，因为减少了代码的复杂内容，但这样引起了新的问题，与手持设备进行通讯时，几乎总是不成功，检查了一下代码，发现是由于数据长度不一致引起的问题，下面是发现长度不一致的代码： type  TType1 = string[6];  TType2 = array [0..5] of Char;  

在dll中使用FastReport会遇到以下内个问题：1.调用时变量出错，最普通的一个变量注入也是一样2.出现Cannot assign a TFieldList to a TStringList的错误3.Invalid pointer operation的错误，在函数中返回WideString引起的以下是解决办法：1.不要在DLL中直接引用FastReport的单元文件，最好用一个接口类来实现

有的朋友在做用户维护字段的界面时，肯定发现一个问题，当用脚本： ALTER TABLE 表名 DROP COLUMN 字段名进行删除字段的操作时，会出现“服务器: 消息 5074，级别 16，状态 1，行 1 ”的错误，这是因为字段有了默认值，不过可以通过清除掉默认值的存储过程来进行这个操作，但如果在删除字段前，强行运行 sp_unbindefault 表名.字段名这样的操作，

1.已经生成的报表保存到流中，再从流中取出  TfrxReport.PreviewPages.SaveToStream(TStream);  TfrxReport.PreviewPages.LoadFromStream(TStream);2.把变量添加到报表中  with frxReport1 do  begin    with Variables do    begin      Categor

使用svnsync的意义就不用我重复了吧？先试了一把svnsync init --username admin svn://我的机器 svn://公司服务器提示：svnsync: 档案库未激活接受修订版属性改变；请管理员创建一个 pre-revprop-change 外挂然后我按说明书上的试了，有一个svnsync.txt也看了，上面写的是Linux下如何操作的方法，不知道Win2k下如何设置？哪

首先来建立一个把数据转变成十六进制字符串输出的函数：CREATE FUNCTION s_hexadecimal     (@binvalue varbinary(255))RETURNS varchar(255)ASBEGIN       declare @charvalue varchar(255)       declare @i int       declare @length int  

在Delphi中提交一条SQL语句，系统出现了如下的错误：---------------------------Error---------------------------不正常地定义参数对象。提供了不一致或不完整的信息。UPDATE xtCxzb SET cxzbName=公户档案      ,cxzbCxlx=0      ,cxzbcxdx=GH30档案      ,cxzbBB

　　传说Borland IDE的交接不是这个月完成的吗？现在都到月中了，我们都不知道买家是谁，这样的日子好难过啊！！现在我还是感觉Delphi编起程序来方便快捷，即使是Web开发，也一样非常方便，由于其所占的资料比较少，相对于Visual Studio来说，我的机器也就够跑跑Delphi的，真不希望Delphi就这样倒下啊！如果Delphi倒下了，偶还得投资买机器，还不知道投资以后什么时候才赚得回