Bien, con AdoConnection sería así:
//Funcion para obtener la cadena de conexión del archivo udl
function TdmGlobal.UDLToString(FileName: WideString): WideString;
var
DI: IDataInitialize;
CS: PWideChar;
begin
DI := CreateComObject(CLSID_DataLinks) as IDataInitialize;
OleCheck(DI.LoadStringFromStorage(PWideChar(FileName), CS));
Result := CS;
end;
//Asignar la cadena de conexion al componente AdoConnection
//considerando que el archivo udl siempre debera estar junto al ejecutable
AdoConnection1.Connected := false;
AdoConnection1.ConnectionString := UDLToString(ExtractFilePath(Application.ExeName)+'ArchivoUdl.udl');
AdoConnection1. Connected := true;
comúnmente los componentes de conexión están en un DataModule, así que esta ultima sección la puedes poner en el onCreate del datamodule.