Question : Valeurs de lecture d'UDL-dossier (fichier texte)

Bonjour, le

I voudrait avoir deux fonctions qui liront des valeurs suivantes d'un résultat de point d'émission du
du l'udl-dossier « myudl.udl » (comme ci-dessous) = 'résultat de catalogue du Br/>Initial de MYCOMPNAME \ ServerInstance'< = 'class= les " lineNumbers " >

1 de >

 [oledb]
; Tout après cette ligne est un VIEUX DB initstring
Provider=SQLOLEDB.1 ; =MYCOMPNAME \ ServerInstance de point d'émission ; Security=SSPI Integrated ; Persistent la sécurité Info=False ; Catalog=MyDBName initial ;
est-ce que class= >


How de 


class= de 

Réponse : Valeurs de lecture d'UDL-dossier (fichier texte)

c'est la ligne 3 d'allways du dossier
c'est fondamentalement une corde délimitée

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 :

nom de fichier de variété : corde ; Liste : TStrings ; ds, IC : corde ; commencer Nom de fichier : = « C:\yourfilename.udl » ; Liste : = TStringList.Create ; essai List.Delimiter : = « ;  » ; List.StrictDelimiter : = rectifier ; List.LoadFromFile (nom de fichier) ; List.DelimitedText : = liste [2] ; ds : = List.Values [« point d'émission »] ; IC : = List.Values [« catalogue initial »] ; ShowMessage (ds + ''+ IC) ; finalement List.Free ; extrémité ; extrémité ;