Текущий архив: 2002.09.16;
Скачать: CL | DM;

Вниз

Работа С ODBC   Найти похожие ветки 

← →
Igoryan   (2002-08-26 17:40) [0]

Уважаемые мастера, подскажите как программно изменить настройки ODBC соединения.

---

← →
Ученик ©   (2002-08-26 17:59) [1]

Это чтение, запись примерно тоже самое, название параметров зависит от драйвера, надо смотреть в реестре

const
ODBCKey = "Software\ODBC\ODBC.INI\";

function OdbcReadParam(const DataSource, ParamName : string) : string;
begin
Result := "";
with TRegistry.Create(KEY_READ) do try
RootKey := HKEY_CURRENT_USER;
if not OpenKey(ODBCKey + DataSource, False) then begin
RootKey := HKEY_LOCAL_MACHINE;
if not OpenKey(ODBCKey + DataSource, False) then Exit;
end;
try
Result := ReadString(ParamName);
finally
CloseKey
end
finally
Free
end
end;

---

← →
Igoryan   (2002-08-26 18:05) [2]

Thanks

---

Страницы: 1 вся ветка

Текущий архив: 2002.09.16;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.015 c