{--- SQLDMO ---} //主要使用SQLDMO
//检查是否已安装SQL
try
SQLServer := CreateOleObject('SQLDMO.SQLServer');
except
RaiseException('您还没有安装SQL数据库.'#13#13'(Error ''' + GetExceptionMessage + ''' occurred)');
end;
//连接SQL
SQLServer := CreateOleObject('SQLDMO.SQLServer');
SQLServer.LoginSecure := True;
SQLServer.Connect(‘LOCAL');
注:SQLServer.LoginSecure := True ,使用windows集成安全;SQLServer.LoginSecure := False, 使用sql server的验证模式。
SQLServer.Connect( [ServerName ] , [ Login ] , [ Password ]);
[ ServerName ]:可选。如果为空,会用电脑名字做为实例名
[ Login ] , [ Password ]:可选。用在SQL Server验证模式。如果为windows验证,这二个参数不用写,即使写了也会被忽略。
//创建SQL数据库文件
Database := CreateOleObject('SQLDMO.Database');
Database.Name := 'dbase'; //要创建的数据库名称
DBFile := CreateOleObject('SQLDMO.DBFile');
DBFile.Name := 'ISData1';
http://ponydph.blog.163.com/blog/static/49037394201042395325928/ 详细但不清楚