| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Список ODBC источников. [D7]

Saska ©   (2004-12-09 17:04:00) 

Подскажите плиз, как можно получить список ODBC источников.

Спасибо.

---

Saska   (2004-12-09 19:36:00) [1]

уже нашел, спасибо огромное!

---

Saska   (2004-12-09 19:35:00) [2]

file not found sql.dcu
где ж мне его взять то...?

---

DiamondShark   (2004-12-09 19:01:00) [3]

> Только я не могу понять, каке модули надо подключать, что
> бы использовать SQLDataSources, не подскажете?

Те, в которых описана трансляция ODBC API.
Например, отсюда:
http://mcc.md/acoulichev/odbc.zip

Модуль sql, понадобится ещё sqltypes.

Пример использования:


procedure TForm1.Button1Click(Sender: TObject);
var
 hEnv: SQLHENV;
 rc: SQLRETURN;
 Name: packed array[byte] of Char;
 NameLen: SQLSMALLINT;
 NameStr: string;
 Description: packed array[byte] of Char;
 DescriptionLen: SQLSMALLINT;
 DescriptionStr: string;
begin
 hEnv := 0;
 SQLAllocEnv(hEnv);
 rc := SQLDataSources(hEnv, SQL_FETCH_FIRST,
  Name, sizeof(Name), NameLen,
  Description, sizeof(Description), DescriptionLen);
 while SQL_SUCCEEDED(rc) do
 begin
   SetString(NameStr, Name, NameLen);
   SetString(DescriptionStr, Description, DescriptionLen);
   Memo1.Lines.Add(NameStr + #9 + DescriptionStr);
   rc := SQLDataSources(hEnv, SQL_FETCH_NEXT,
     Name, sizeof(Name), NameLen,
     Description, sizeof(Description), DescriptionLen);
 end;
 SQLFreeEnv(hEnv);
end;



> и еще,будет ли решение посредсвом реестра одинаково хорошо
> работь в Win 98, 2000, XP?

Не знаю. Лучше через API.

---

Saska   (2004-12-09 18:33:00) [4]

и еще,будет ли решение посредсвом реестра одинаково хорошо работь в Win 98, 2000, XP?

---

Saska   (2004-12-09 18:29:00) [5]

спасибо.
Только я не могу понять, каке модули надо подключать, что бы использовать SQLDataSources, не подскажете?

---

DiamondShark   (2004-12-09 18:13:00) [6]

Возможно.

Вариант 1.

Из реестра, рзаделы

HKCU\Software\ODBC\ODBC.INI\ODBC Data Sources
(User DSN)

HKLM\Software\ODBC\ODBC.INI\ODBC Data Sources
(System DSN)

Вариант 2.

Использовать функцию SQLDataSources из ODBC API.

---

Saska   (2004-12-09 17:41:00) [7]

это невозможно?

---

Наверх