Cuestión : Valores de la lectura del UDL-archivo (archivo de texto)

Hola, el

I quisiera tener dos funciones que leerán valores siguientes de un resultado de la fuente del
Data del udl-archivo “myudl.udl” (como below) = 'resultado del catálogo del Br/>Initial de MYCOMPNAME \ de ServerInstance'< = 'class= " lineNumbers " >
1 del >

 [oledb]
; Todo después de esta línea es un DB VIEJO initstring
Provider=SQLOLEDB.1; Datos Source=MYCOMPNAME \ ServerInstance; Security=SSPI integrado; Persiste la seguridad Info=False; Catalog=MyDBName inicial;
¿el class= >


How de 



  
  class= del

Respuesta : Valores de la lectura del UDL-archivo (archivo de texto)

es la línea 3 de los allways del archivo
es básicamente una secuencia delimitada
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

nombre de fichero del var: secuencia;
  Lista: TStrings;
  ds, ic: secuencia;
comenzar
  Nombre de fichero: = “C:\yourfilename.udl”;
  Lista: = TStringList.Create;
  intento
    List.Delimiter: = “; ”;
    List.StrictDelimiter: = verdad;
    List.LoadFromFile (nombre de fichero);
    List.DelimitedText: = lista [2];
    ds: = List.Values [“fuente de datos”];
    ic: = List.Values [“catálogo inicial”];
    ShowMessage (ds + ''+ ic);
  finalmente
    List.Free;
  extremo;
extremo;
Otras soluciones  
 
programming4us programming4us