Delphi用SQLDMO实现带进度条的SQL Server数据库备份
Delphi用SQLDMO实现带进度条的SQL Server数据库备份<div id="cnblogs_post_body"> 1.首先，要导入对象库定义：
打开Delphi,Project菜单->Import Type Library...,在列表框中找到"Microsoft SQLDMO Object
Library”,然后生成一个Unit单元文件，默认为SQLDMO_TLB,然后在备份窗体中加入引用：SQLDMO_TLB,还有ComObj。
2.在窗体中加入一个进度条，将总进度设置为100（或在代码中设置）。
3.定义接口：
<div class="cnblogs_code">type
TBackupSink=class(TInterfacedobject,backupsink)//实现接口
function PercentComplete(const Message: WideString; Percent: Integer): HResult; stdcall;
function NextMedia(const Message: WideString): HResult; stdcall;
function Complete(const Message: WideString): HResult; stdcall;
页:
[1]