Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];




Вниз

Как прописать источник данных ODBC программно? 


Дмитрий Демиденков   (2001-12-18 10:39) [0]

Привет народ.
Как сабж сделать. У меня есть база данных Access 97. я прописываю ее так: /Настройки/Панель управления/Источники данных ODBC/ в разделе "Пользовательский DSN" выбираю добавить ввожу Alias выбираю базу данных и все... Этот Alias я могу использовать в TDatabase без проблем. B BDE Administrator я ничего не меняю он и так видит этот источник данных. Теперь мне нужно прописать все это автоматически программно. Как мне это сделать. Я нашел что этот Alias прописывается в реестре в ключах
HKEY_CURRENT_USER и HKEY_USERS, однако когда я программно прописываю это - не работает. Вернее, в ODBC и BDE Administrator мой Alias виден, но он не срабатывет. Когда я захожу в ODBC
и выбираю файл базы данных(который уже прописан точно так же) все работает. А програмно не получается. В чем дело, может еще где то надо прописать кроме реестра?
Вот!



Dick Gonsales   (2001-12-20 09:16) [1]

Вешаешь TDatabase
В нем DatabaseName пишешь alias по которому все твои TTable, TQuery будут обращаться к базе
В DriveName выбираешь MSAccess

Вешаешь OpenDialog откуда берешь имя файла базы.
Вызываешь примерно следующую функцию, где db_report TDatabase

function DBOpen(DBName:String):boolean;
begin
try
db_report.Params.Add("DATABASE NAME="+DBName);
db_report.Params.Add("USER NAME=");
db_report.Params.Add("PASSWORD=");
db_report.Connected:=True;
Result:=True;
except
ShowMessage("Не могу открыть базу "+DBName);
Result:=False;
end;
end;




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.04 c
1-75585           RealGrey              2002-01-04 15:31  2002.01.24  
Как записать в TDBGrid данные, но с Source ом их не связывать


1-75550           Анатолий              2002-01-06 06:19  2002.01.24  
Метка в центре формы


4-75717           Miwa                  2001-11-13 09:53  2002.01.24  
Windows Media Player


4-75709           Roman_                2001-11-22 21:59  2002.01.24  
Чертов PaintBox


1-75547           Yuraz                 2002-01-04 19:13  2002.01.24  
Не получается стереть рисунок с формы, делаю так: