BambooCaep的专栏

看到网上有人说indy的md5在64位下计算结果与32位下不一致。我测试了一下，确实如此，因此把自己用的64位计算结果正确的md5函数代码发出来。说明1：这个单元的代码是从indy的md5代码修改而来的。说明2：计算TBytes和String的MD5值可以使用TBytesStream或TStringStream。说明3：计算结果转换为HEX字符的代码请自行编写。 unit Ba

当创建一个TFileStream并顺序读取的时候，如果每次读取的字节比较少时，效率是相当低的。大家可以做一个测试：var  aStream: TStream;  B: Byte;  T: TDateTime;begin  if not OpenDialog1.Execute then    Exit;  Caption := '';  Application.P

把指针封装成Interface的泛型版实现

精简版，不解释。unit BambooInstenceCache;interfaceuses  System.Generics.Collections;type  TInterface_BambooInstenceCache = interface    function Dequeue: T;    function IdleCount: Inte