UDL链接数据库的方法

UDL 链接数据库给程序编写提供了很大的方便之处，方便于程序切换不同的数据库类型，下面简单介绍下连接方法：

新建一个文本文件改名为db.udl即可，双击即可运行。运行界面为：

在程序里链接数据库的那一步改为链接UDL，方法如下：

var dbStr : string;  

  dbStr := extractfilepath(paramstr(0))+'db.udl';
    dbStr := 'FILE NAME=' + dbStr;

    if con1.Connected then
       con1.Connected := False;
    con1.ConnectionString := '';
    con1.ConnectionString := dbStr;
    try
        con1.Connected := True;
    except
        Application.MessageBox('数据库连接失败.','提示',mb_ok);
        MainForm.Close;
        //MainForm.Destroy;
    end;