网上文摘 最近更新 下载排行 资源分类 下载指南
经典编程资源 精彩不容错过
设为首页
加入收藏
联系我们
当前位置:Delphi园地精选控件其它 → Magic.CD/DVD.Burner.VCL. v1.23修改版
  本周下载排行
  本月下载排行
资源名称:Magic.CD/DVD.Burner.VCL. v1.23修改版
文件类型: RAR
适用版本:
发 布 者: 风铃夜思雨
资源类型: 免费
资源大小: 522 KB
资源等级:
整理时间: 2009-09-22 14:38:33
资源网址:
下载次数: 本 周:8 本月:8 总计:8494
下载链接:
资源简介: Magic.CD.DVD.Burner 1.23.1

修改:风铃夜思雨
主页:Http://Www.SkyGz.Com
日期:2008-08-22

说明:该控件由于很久没更新了,一直停留在1.23版本,而BUG一大堆,唯一的是简单容易上手,有源码方便修改。
所以本人对该控件进行了全面升级修正。

新增 TDeviceNotifier 类,设备监视

TMCDBurner 类
新增属性
NoUseLowerFile 是否允许文件名小写字母 True=不允许 Flase=允许
NoUseISOVersionNumber 是否省略ISO9660版本号 True=不省略 Flase=省略
MediumType 设置介质类型 mt_185MB, mt_210MB, mt_650MB, mt_703MB, mt_791MB, mt_870MB, mt_1_4GB, mt_2_8GB, mt_3_95GB, mt_4_7GB, mt_8_5GB, mt_9_4GB
UseDosCharset 是否使用DOS字符集 True=使用 Flase=使用
ISOLevel 文件名格式 ISOLevel01=DOS(8.3) ISOLevel02=Windows/Unix(31) ISOLevel_1999=Max(211)
BootPlatform 引导光盘系统类型 btpPC80_86, btpPowerPC, btpMac
BootImageType 引导映像文件类型 biAuto=自动识别 biNoEmulation=不模拟 biFloppy1_20MB=模拟1.2M的软盘 biFloppy1_44MB=模拟1.44M的软盘 Floppy2_88MB=模拟2.88M的软盘 HardDisc=模拟硬盘
JolietExpand110 Joliet文件格式扩展 True=扩展110 Flase=标准64
Optimized 是否优化储存 True=优化 Flase=不优化

新增函数
HiddenFileOrDir 隐藏文件或目录
Function HiddenFileOrDir(
SourceDir, 光盘源目录
SourceFileOrDir: String; 光盘源文件名或目录名
IsDir: Boolean; SourceFileOrDir 是否为目录
FileAttributes: TFileAttributes fa_Normal=正常 fa_Hidden=隐藏 fa_AdvHidden=高级隐藏 fa_All=隐藏+高级隐藏
): Boolean; Overload;

HiddenFileOrDir 隐藏文件或目录
Function HiddenFileOrDir(
SourceDir: PDirEntry; 光盘源目录
SourceFileOrDir: String; 光盘源文件名或目录名
IsDir: Boolean; SourceFileOrDir 是否为目录
FileAttributes: TFileAttributes fa_Normal=正常 fa_Hidden=隐藏 fa_AdvHidden=高级隐藏 fa_All=隐藏+高级隐藏
): Boolean; Overload;


ControlDevice 打开或关闭光驱设备
Function ControlDeviceDoor(
DriveLetter: Char; 光驱设备盘符
Status: TDevice_Status cr_Open=打开 cr_Close=关闭
): Boolean;

SaveISOBootimageToDisk 保存ISO中的引导文件到磁盘
Function SaveISOBootimageToDisk(
ISOFileName, ISO映像文件
BootOutputFileName: String 引导文件输出文件名
):Boolean;

RipDiskToISOImage 抓取光盘数据到ISO映像文件
Function RipDiskToISOImage(
ISOFileName: String; ISO映像文件
BackupISO: Boolean = false 是否备份已存中的ISO映像文件再继续执行
): Boolean;

RipAudioTrack 抓取音频CD光盘指定索引音频到指定目录
Function RipAudioTrack(
TrackIndex: Integer; 要抓取音频的Track 索引号
TracksOutPath: String 输出目录
): Boolean;

RipAllAudioTracks 抓取音频CD光盘全部音频到指定目录
Function RipAllAudioTracks(
TracksOutPath: String 输出目录
): Boolean;

GetFileSize 获取文件大小
Function GetFileSize(
Const FileName: String 要获取大小的文件
): Int64;

StrToSpeed 转换Str到速率
Function StrToSpeed(
SpeedStr: String 速率字符串,结合下面的函数使用
): Word;

GetSupportWriteSpeedList 获取支持的写速度列表
Function GetSupportWriteSpeedList(
Strings: TStrings;
DefaultItemIndex: Integer
): Integer;

新增事件
OnOptimizProgress 优化储存进度
OnRipDiskProgress 抓取光盘数据进度

修正 引导功能不能正常引导的BUG
修正 文件排序会引起部份可引导光盘不正常
修正 当引导属性开启后快速保存为ISO时的BUG
修正 区段排列方式,以完全兼容ISO文件格式,与UltraISO类软件保存的进行对比一模一样
修改 SaveToISOFile方法 增加是否备份现有ISO映像文件的参数
修正 ImportSession方法 含有中文文件名时缺少部份字符
其它细微修改就不一一描述了。


下载帮助() 下载链接错误报告或者意见反馈
下载说明:
关于我们 | 广告服务 | 发布资源 | 联系站长 Copyright 2001-2012 Delphi园地 All Rights Reserved