Получить список провайдеров на ПК

Доброго дня господа !

Как получить динамически получить список провайдеров ОS

Т.е. объект\свойство = TADOConnection.Provider = здесь выпадающий список в окне редактора объектов
Можно ли его получить в TStringList в уже запущенном приложении


Признателен за код ....

Спасибо

https://docs.microsoft.com/en-us/previous-versions/windows/desktop/ms711269(v=vs.85)

Posted via ActualForum NNTP Server 1.5

http://www.delphigroups.info/2/43/158376.html

Posted via ActualForum NNTP Server 1.5

HOME_X
Доброго дня господа ! Как получить динамически получить список провайдеров ОS Т.е. объект\свойство = TADOConnection.Provider = здесь выпадающий список в окне редактора объектов Можно ли его получить в TStringList в уже запущенном приложении Признателен за код .... Спасибо

uses ADODB;
...
var
  fSL: TStringList;
begin
  fSL := TStringList.Create();
  GetProviderNames(fSL);
  ShowMessage(fSL.Text)

ёёёёё,

Спасибо - все находиться ПОВЕРХУ...но почему то поиск ведется самым сложным путем

Первопричина вопроса следующая
Error while trying to retrieve text for error ORA-010195


Делаю так
Windows 10 64-bit (сервер 12 64-bit )

Delphi7 (32-bit)
-> ADOConnection
(Provider=MSDAORA.1)
(ConnectionString=.....)
-> Ins Client Oracle Oracle 12.2 32-bit (Path-прописаны - коннект идет именно к этому каталогу - отследил)
-> коннект к базе Oracle

Но почему то одно приложение отрабатывает нормально
другое приложение дает ошибку (выше)

И одно и тоже работающее приложение в разных сеансах тонкого клиента сервера Win12
в одном работает в другом нет

Может кто-то сталкивался с таким поведением, изначально предположил что это наличие provider-ов
Теперь не знаю - особенно если учитывать что машина в целом одна и других провайдеров для отдельной сессии никто грузить не будет


Спасибо