Форум: "Базы";
Текущий архив: 2002.09.16;
Скачать: [xml.tar.bz2];
ВнизРабота С 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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c