获取 TUniConnection.SpecificOptions默认值和下拉框列表值

TUniConnection的SpecificOptions参数决定了数据库连接配置参数，但可惜的是，SpecificOptions设计器界面，Devart公司只能让它在设计期配置！

SpecificOptions参数为什么那么有用呢？举个例子讲，如果你要连接MSSQL，可能碰到老版本的OLEDB或者当下的NativeClient版本，具体参数可选为：prAuto、prSQL、prNativeClient、prCompact。

因此，我们如果自己做界面参数配置，必须获取SpecificOptions默认值和下拉框表列表值。

首先在界面上放TUniConnection，设置ProviderName为SQL Server；在界面上放置TSQLServerUniProvider。

代码如下

type   TMyConn = class(TUniConnection)   end;   procedure TForm7.btn1Click(Sender: TObject); var   OptionsList: TOptionsList;   i: Integer;   Msg: string;   List: TStringList; begin   mmo1.Clear;   List := TStringList.Create;   if TMyConn(UniConnection1).CanGetProvider then   begin     OptionsList :=   TMyConn(UniConnection1).GetProvider.GetConnectionOptions;     for i := 0 to OptionsList.Count - 1 do     begin       List.Clear;       OptionsList[i].GetValuesList(List);       Msg := Msg + OptionsList[i].OptionName +         ' - ' +         VarToStr(OptionsList[i].GetDefaultValue) + ' = ' +         OptionsList[i].GetAsString(OptionsList[i].GetDefaultValue) +         ':' + sLineBreak + List.Text + sLineBreak;     end;       mmo1.Lines.Add(Msg);   end;   List.Free; end;

默认的unidac配置参数界面