delphi自带的SHA1算法

【delphi自带的SHA1算法】的更多相关文章

delphi自带的SHA1算法

delphi自带的SHA1算法 uses IdHashSHA, IdGlobal; function SHA1(Input: String): String; begin with TIdHashSHA1.Create do try Result := LowerCase(HashBytesAsHex(TidBytes(Bytesof(Input)))); finally Free; end; end;…

DateTimePicker如何与Delphi自带Style同步

Delphi 的 DateTimePicker 组件有一个CalColors属性,可以设置 DropDown 打开的日历节目的风格.但如果不使用 Delphi 自带的 Style,在这里设置属性看不到期望的效果. 而使用了 delphi 自带的style,效果又存在瑕疵——日历面板大小有问题. 如果把自带 style 的 client 项关闭,大小倒是对了,之前设置的MonthBackColor属性在边框上也体现出来了,但是和窗体的风格又不统一了. 网上一搜,Stack Overflow 给出了…

Delphi 自带的那个 Hand 光标很难看？没关系，一行代码解决问题：

Delphi 自带的那个 Hand 光标很难看?没关系,一行代码解决问题: Screen.Cursors[crHandPoint] := LoadCursor(0, IDC_HAND);放在主窗体 OnCreate 事件里,或放在任意一个单元 initialization 节都可以.同样的方法还可以替换掉其它感觉不爽的默认光标.…

只看Delphi自带的WnAPI帮助似乎不够

比如,MessageBox在Delphi自带帮助的参数说明中,对其第四个参数的MB_类型说明只有最常见的6种类型,这么多年搞得我天经地义的以为MessageBox就是这么简单.今天看了一位前辈写的老代码,才发现,还有 MB_SETFOREGROUND和MB_SERVICE_NOTIFICATION_NT3X等等参数,比如可以这样调用: Result := MessageBox(0, lpText, lpCaption, uType or MB_SETFOREGROUND or MB_SERVIC…

Delphi 自带的 Base64 编解码函数

今天帮别人解决一个关于 Base64 编解码的问题,竟然发现 Delphi 自带了 Base64 编解码的单元,叫 EncdDecd,这名字很拗口而且不直观,估计这是一直很少人关注和知道的原因. 这个单元提供两套四个公开函数: 对流的编解码:procedure EncodeStream(Input, Output: TStream); // 编码procedure DecodeStream(Input, Output: TStream); // 解码 // 对字符串的编解码:function E…