- 博客(0)
- 资源 (4)
空空如也
FastReport 5 for VCL源码版
FastReport 5 for VCL源代码。已经测试可以安装在XE7上。
添加FastQB、FastScript、Sourrce及其下目录到Library目录里。
编译这些里的fs*21.dpk和安装dcl*21.dpk。(BDE的除外)。
切换中文需要把Res目录里的frcc更换掉。
2014-11-27
Delphi读取硬盘序列号源代码
之前传的没注意,丢了两个pas文件,这次肯定可以用了。而且不要分了。之前的不要下载了。
C++源码转换过来的
基本函数:
function ReadIdeDriveAsScsiDriveInNT(var Dest: tresults_array_dv): Boolean;
function ReadDrivePortsInWin9X(var Dest: tresults_array_dv): Boolean;
function ReadPhysicalDriveInNTWithZeroRights(var Dest: tresults_array_dv): Boolean;
function ReadPhysicalDriveInNTUsingSmart(var Dest: tresults_array_dv): Boolean;
function ReadPhysicalDriveInNTWithAdminRights(var Dest: tresults_array_dv): Boolean;
以上是几个不同环境下使用的函数,Win7下要以管理员身份运行才会有结果。Raid磁盘无法读取。
2013-06-27
Delphi读取硬盘物理序列号单元源码
C++源码转换过来的
基本函数:
function ReadIdeDriveAsScsiDriveInNT(var Dest: tresults_array_dv): Boolean;
function ReadDrivePortsInWin9X(var Dest: tresults_array_dv): Boolean;
function ReadPhysicalDriveInNTWithZeroRights(var Dest: tresults_array_dv): Boolean;
function ReadPhysicalDriveInNTUsingSmart(var Dest: tresults_array_dv): Boolean;
function ReadPhysicalDriveInNTWithAdminRights(var Dest: tresults_array_dv): Boolean;
以上是几个不同环境下使用的函数,Win7下要以管理员身份运行才会有结果。Raid磁盘无法读取。
2013-04-12
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人