jeeren的博客

Delphi 11 第三方组件包集合，适用于D7-D11版本，亲测可用。几大组件包几乎全在这里了，有需要的同学可以下载，不用再东找西找了，一次性全有了。

版本V9.1.1，支持D6-D11，Lazarus2.2.2，codetyphon7.8等Pascal语言的主流IDE。

适用于Codetyphon IDE的gif动画组件，官方地址：https://lazarus.developpez.com/telecharger/detail/id/6202/TGIFViewer-composant-visuel-pour-l-affichage-d-animations-au-format-GIF，Github开源地址：https://github.com/jdelauney/TGIFViewer。组件包文件是在开源Lazarus的包文件基础上修改的，亲测，在Codetyphon7.8上可用。在FileName处添加gif文件路径，设置AutoPlay属性为True即可。

Delphi利用WinAPI写的截图工具，支持热键，全屏、窗口、区域三种截图方式，借鉴多位前辈的代码，在此表示感谢。有需要的同学，请自行下载。

Delphi生成的汉字验证码图片代码。 for i := 1 to 4 do begin Randomize; strResult := strResult + trim(CodeChar[Random(563)]); end; vLeft := 10; img.picture := nil; //画随机直线 for i := 0 to 360 do begin Randomize; img.Canvas.Pen.Color := MakeColor(Random(256) and $C0, 200); img.Canvas.MoveTo(Random(177), Random(505)); img.Canvas.LineTo(Random(505), Random(177)); end;

sql server定时自动备份，压缩，发送邮件或上传FTP，自动删除本地备份文件，简单有效。

sql server数据库本地自动备份，可自定义时间，自动删除，自动压缩，自动发送邮件。