残缺的碎碎念

燕舞樱，剑綄花，江山尽在青水间

日志

超级函数代码库SRTL

2007-11-27 00:14:11| 分类：严谨编程 | 标签： |字号大中小订阅

这两年来编写程序，着实接触了不少函数代码，遇到比较有收藏价值的或者应用比较广的就收集了起来，就形成了这个大杂烩 SRTL(Super Run Time Library)。这里面有除了一些是本人编写的代码，其他全非本人版权，只是希望各位在修改或者传播的过程中，保留作者的版权说明．另外由于是免费的完全开源的，所以本人不对使用SuperRTL所造成的后果有任何责任。

下面简单介绍一下单元的内容：
Win32.pas (本人编写)
API函数的简单调用，如建立进程，建立文件映射，建立、读取管道（可以捕捉DOS程序输出）等。
StrFuncs.pas (本人编写)
字符串处理单元，完全兼容宽字节处理（即使用wideString），特有的中文字符串处理函数（如简繁转换等等），经过多次优化，大多以编表的方式进行处理（一般来说是最快的处理方式）。
BiosHelp.pas　
读取Bios信息的单元，兼容各种windows系统。
Streams.pas　
流（TStream）输入输出处理单元，可以用来保存读取控件属性。
ShlFile.pas　
各种文件操作，包括获得系统特殊路径，获取文件图标等。
RegExpr.pas　
一个规则表达式类的单元。
ShareMemRep.pas　
一个可以用来替代Delphi本身的内存管理的单元。
MessageDlg.pas (本人编写)
提供了一个高制定性的消息对话框。
Lists.pas　
提供了很多个TList的扩展类，是学习很研究TList的好东西。
Calendar.pas　
公历与农历换算和时间处理的函数单元，具体看里面的说明。
Clipboards.pas (本人编写)
提供一个剪贴板增强类，可支持保存和载入剪贴板，支持多重剪贴板。
ComputerInfo.pas (本人编写)
完整的系统信息检测单元，从软件到硬件，从CPU到鼠标，很全面。
AccessCtrls.pas (本人编写)
一个Access数据库操作单元。
FastIniFile.pas　
可以用来替换DELPHI提供的慢吞吞的IniFiles单元，并且支持更多写入读出类型。
EnumStuff.pas
一个募举进程和窗口列表的单元，兼容各种Windows系统。
DES.pas　
DES加密算法单元。
AES.pas　
AES加密算法单元。
CryptoAPI.pas　
一个完整的Hash算法单元，如MD5、CRC之类等等。
FastMM.pas　
国外很著名的内存管理单元，Delphi2006的内存管理单元用的就是它。
FastStrings.pas　
一个快速字符串处理单元，一些函数用汇编写的，处理速度比DELPHI本身的字符串处理快很多，不过不支持WideString类型。
Idpacker.pas　
压缩文件类型检测单元。
ZLibEx.pas　
纯Pascal代码的快速压缩解压单元，压缩率和速度都不错。
FastStringFuncs.pas　
基于FastStrings.pas单元的应用。　　

此外还有一些单元一般不需要引用，所以没必要介绍了。

点击这里下载最新的SRTL

评论这张

转发至微博

0人 | 分享到：

阅读(3026)| 评论(7)| 引用 (0) |举报

实战DELPHI：远程线程插入（DLL注入）

疯子

历史上的今天

this.p={  m:2,
              b:2,
              id:'fks_087070083094080069083087083095086085082075084081095067',
              blogTitle:'超级函数代码库SRTL',
              blogAbstract:'<P\>这两年来编写程序，着实接触了不少函数代码，遇到比较有收藏价值的或者应用比较广的就收集了起来，就形成了这个大杂烩 SRTL(Super Run Time Library)。这里面有除了一些是本人编写的代码，其他全非本人版权，只是希望各位在修改或者传播的过程中，保留作者的版权说明．另外由于是免费的完全开源的，所以本人不对使用SuperRTL所造成的后果有任何责任。</P\>  <P\><STRONG\>下面简单介绍一下单元的内容：<BR\></STRONG\><U\>Win32.pas</U\> <FONT color=\"#3366ff\" \>(本人编写)<BR\></FONT\>API函数的简单调用，如建立进程，建立文件映射，建立、读取管道（可以捕捉DOS程序输出）等。<BR\><U\>StrFuncs.pas</U\> <FONT color=\"#3366ff\" \>(本人编写)<BR\></FONT\>字符串处理单元，完全兼</P\>',
              blogTag:'',
              blogUrl:'blog/static/23380790200710270141168',
              isPublished:1,
              istop:false,
              type:0,
              modifyTime:1316834255309,
              publishTime:1196093651068,
              permalink:'blog/static/23380790200710270141168',
              commentCount:7,
              mainCommentCount:7,
              recommendCount:0,
              bsrk:-100,
              publisherId:0,
              recomBlogHome:false,
              attachmentsFileIds:[],
              vote:{},
              groupInfo:{},
              friendstatus:'none',
              followstatus:'unFollow',
              pubSucc:'',
              visitorProvince:'未设置',
              visitorCity:'未设置',
              postAddInfo:{},
              mset:'000',
              mcon:'',
              srk:-100,
              remindgoodnightblog:false,
              isBlackVisitor:false,
              isShowYodaoAd:false,
              hostIntro:'催酒快马尘烟起,三千仇恨江湖尽。',
              hmcon:'',
              lofter_single:'<a hidefocus="true" target="_blank" href="http://www.lofter.com/touch"><img onload="var nimg = new Image(); nimg.src=\'http://blog.163.com/newpage/images/analyse.png?lofter_single&t=\'+new Date().getTime()" border="0" src="http://b2.bst.126.net/newpage/images/lofter_single4.jpg"/></a>'
            }

{list a as x}
    {if !!x}
    <div class="iblock nbw-fce nbw-f40">
      <a class="fc03 noul" target="_blank" hidefocus="true" href="http://blog.163.com/${x.visitorName}/">
      {if x.visitorName==visitor.userName}
      <img alt="${x.visitorNickname|escape}" onerror="this.src=location.f40" class="cwd bdwa bdc0" src="${fn1(x.visitorName)}&r=${visitor.imageUpdateTime}"/>
      {else}
      <img alt="${x.visitorNickname|escape}" onerror="this.src=location.f40" class="cwd bdwa bdc0" src="${fn1(x.visitorName)}"/>
      {/if}
      </a>
      <div class="cwd vname thide">
        {if x.moveFrom=='wap'}
          <a class="noul pnt" target="_blank" href="http://blog.163.com/services/wapblog.html?frompersonalbloghome"><span title="来自网易手机博客" class="iblock wapIcon"> </span></a>
        {elseif x.moveFrom=='iphone'}
          <a class="noul pnt" target="_blank"><span title="来自iPhone客户端" class="iblock iphoneIcon"> </span></a>
        {elseif x.moveFrom=='android'}
          <a class="noul pnt" target="_blank"><span title="来自Android客户端" class="iblock androidIcon"> </span></a>
        {elseif x.moveFrom=='mobile'}
          <a class="noul pnt" target="_blank" href="http://blog.163.com/services/emsblog.html?frompersonalbloghome"><span title="来自网易短信写博" class="iblock wapIcon"> </span></a>
        {/if}
        <a class="fc03 m2a"  target="_blank" hidefocus="true" href="http://blog.163.com/${x.visitorName}/">
          ${fn(x.visitorNickname,8)|escape}
        </a>
      </div>
    </div>
    {/if}
    {/list}

<#--最新日志，群博日志--> <#--推荐日志-->

<p class="fc06">推荐过这篇日志的人：</p>
    <div>
      {list a as x}
      {if !!x}
      <div class="iblock nbw-fce nbw-f40">
        <a class="fc03 noul" target="_blank" hidefocus="true" href="http://blog.163.com/${x.recommenderName}/">
        <img alt="${x.recommenderNickname|escape}" onerror="this.src=location.f40" class="cwd bdwa bdc0" src="${fn1(x.recommenderName)}"/>
        </a>
        <div class="cwd thide">
          <a class="fc03 m2a" target="_blank" hidefocus="true" href="http://blog.163.com/${x.recommenderName}/">
            ${fn(x.recommenderNickname,6)|escape}
          </a>
        </div>
      </div>
      {/if}
      {/list}
    </div>
    {if !!b&&b.length>0}
    <p  class="fc06">他们还推荐了：</p>
    <ul>
    {list b as y}
      {if !!y}
        <li class="rrb"><span class="iblock">·</span><a class="fc03 m2a" target="_blank" href="http://blog.163.com/${y.recommendBlogPermalink}/?from=blog/static/23380790200710270141168">${y.recommendBlogTitle|escape}</a></li>
      {/if}
    {/list}
    </ul>
    {/if}

<#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--相关文章--> <#--历史上的今天--> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->

页脚

公司简介 - 联系方法 - 招聘信息 - 客户服务 - 隐私政策 - 博客风格 - 手机博客 - VIP博客 - 订阅此博客

残缺的碎碎念

导航

日志

超级函数代码库SRTL

历史上的今天

相关文章

最近读者

评论

页脚