[delphi-br] Re: Capturar valor em arquivo UDL ... Até que fim resolvido

[alexsandro_qs]

Agora deu certo ..

Ricardo, 
Obrigado pela sua grande atenção velho...
Precisando estarei a disposição (Tenho experiência em redes linux, precisando 
!!!)

Fiz assim:

var
  StrList:TStringList;
  parte : TStringList;
  strlinha : string;
  aTexto : string;
  ArqIni: TIniFile; 

begin

try
 ArqIni := TIniFile.Create('c:\alex.udl'); //Pega o arquivo
 aTexto := ArqIni.ReadString('oledb', 'Provider', ''); // aqui ele vai pegar a 
linha que começa com Provider da coluna oledb

Strlist := TStringlist.Create;
parte := TStringlist.Create;

strlinha:= atexto;  // recebe o arquivo udl como texto, ele direto não 
reconhece...

ExtractStrings(['='],[  ], PChar(strLinha), parte);  
ShowMessage( Parte[ Pred( Parte.Count ) ] );   
 finally
StrList.Free; 
ArqIni.Free; 
StrListRecArq.Free;   

end;