Относительный путь к БД Access в RAD 2010

@Storm114 · Регистрация: 15.01.2012

Студворк — интернет-сервис помощи студентам

Здравствуйте! Помогите пожалуйста с такой проблемой. Имеется БД в формате access dataB.accdb. Лежит в папке с программой. В RAD 2007 при указании пути к ней, я просто в ADOConnection указывал источник данных так: './dataB.accdb' или вообще просто dataB.accdb этого было достаточно. Но вот в RAD 2010 данный прием никак не хочет работать. По умолчанию указывает в Windows\system32, где естественно никакой базы нет. Абсолютный путь работает, но не устраивает т.к. дирректория проги кочует по разным компам. Как в RAD 2010 указать относительный путь к БД? Заранее спасибо!

@REALIST07 · 15.01.2012, 23:52

Delphi
1
2
3
var  
Path :string;
Path:=ExtractFilePath(paramstr(0))+'имя базы данных'

@Storm114 · 16.01.2012, 07:56 **[ТС]**

Спасибо большое за ответ. Я как понял, где нибудь в form1.create узнаем таким образом путь к БД и прописываем там же его в ConnectionString? Но все-таки, почему в RAD 2010 перестал работать путь в корень программы, если указывать ручками в настройках, почему ссылается в windows\system32. Где можно поменять данное умолчание? Вроде все настройки облазил - нифига найти не могу... Или это только у меня так?

@REALIST07 · 16.01.2012, 12:02

А зачем тебе такие муки?Кстати я сам набрал также и работает все=) посмотри project->options,tools-options

@Storm114 · 16.01.2012, 12:21 **[ТС]**

Сообщение от REALIST07

А зачем тебе такие муки?Кстати я сам набрал также и работает все=)

О блин, значит точно у меня косяк... А муки - ради интереса

@REALIST07 · 16.01.2012, 12:25

Я сделал так

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.FormCreate(Sender: TObject);
begin
   MyConnection.ConnectionString :='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
  ExtractFilePath(Application.Exename)+'Info.mdb;Mode=ReadWrite;Persist ' +
  'Security Info=False';
 
  try
   MyConnection.Connected:=true;
   showmessage('Успешное соединение!');
  MyTable.TableName:='Тип';
  MyTable.Active:=True;
  except
   showmessage('Не удалось соединиться!');
  end;
end;

И кстати записи

Delphi
1
ExtractFilePath(paramstr(0))

и

Delphi
1
 ExtractFilePath(Application.Exename)

равносильны!

@Fexys · 22.01.2012, 22:31

Чет не разобрался как тут ЛС писать.
Вопрос не по теме... Storm114, у вас крякнутый Rad или lic?

Если 1. Помогите, а то у меня не получается его победить.

@kwinto · 22.01.2012, 22:39

Зачем все это делать на создании главной формы??? Зачем Вам эта форма нужна после неудачного соединеия с БД???
Напишите функцию и вызовите ее до создания формы в файле проекта.
Если не соединились, то отругайтесь и уходите.
Ну включите голову-то хоть чуть-чуть!

@Storm114 · 23.01.2012, 09:47 **[ТС]**

Сообщение от Fexys

Чет не разобрался как тут ЛС писать.
Вопрос не по теме... Storm114, у вас крякнутый Rad или lic?

Если 1. Помогите, а то у меня не получается его победить.

Lic. Да и не у меня... Просто старый проект откомпилить пытался, а он (RAD 2010) мне такую свинью подложил. Отсюда и тема.

Добавлено через 2 минуты

Сообщение от kwinto

Зачем все это делать на создании главной формы??? Зачем Вам эта форма нужна после неудачного соединеия с БД???
Ну включите голову-то хоть чуть-чуть!

А если нужна? А если на самой БД свет клином не сошелся в моем случае?...

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

@Storm114 0 / 0 / 0 Регистрация: 15.01.2012 Сообщений: 4

	Относительный путь к БД Access в RAD 2010 15.01.2012, 21:05. Показов 7039. Ответов 8 Метки нет (Все метки) Здравствуйте! Помогите пожалуйста с такой проблемой. Имеется БД в формате access dataB.accdb. Лежит в папке с программой. В RAD 2007 при указании пути к ней, я просто в ADOConnection указывал источник данных так: './dataB.accdb' или вообще просто dataB.accdb этого было достаточно. Но вот в RAD 2010 данный прием никак не хочет работать. По умолчанию указывает в Windows\system32, где естественно никакой базы нет. Абсолютный путь работает, но не устраивает т.к. дирректория проги кочует по разным компам. Как в RAD 2010 указать относительный путь к БД? Заранее спасибо! 0

@Storm114 0 / 0 / 0 Регистрация: 15.01.2012 Сообщений: 4
	16.01.2012, 07:56 [ТС]
	Спасибо большое за ответ. Я как понял, где нибудь в form1.create узнаем таким образом путь к БД и прописываем там же его в ConnectionString? Но все-таки, почему в RAD 2010 перестал работать путь в корень программы, если указывать ручками в настройках, почему ссылается в windows\system32. Где можно поменять данное умолчание? Вроде все настройки облазил - нифига найти не могу... Или это только у меня так? 0

@REALIST07 Автор FAQ 644 / 199 / 21 Регистрация: 11.06.2010 Сообщений: 1,024
	16.01.2012, 12:02
	А зачем тебе такие муки?Кстати я сам набрал также и работает все=) посмотри project->options,tools-options 1

@Fexys 5 / 5 / 0 Регистрация: 22.01.2012 Сообщений: 25
	22.01.2012, 22:31
	Чет не разобрался как тут ЛС писать. Вопрос не по теме... Storm114, у вас крякнутый Rad или lic? Если 1. Помогите, а то у меня не получается его победить. 0

@kwinto 86 / 86 / 24 Регистрация: 27.02.2010 Сообщений: 397
	22.01.2012, 22:39
	Зачем все это делать на создании главной формы??? Зачем Вам эта форма нужна после неудачного соединеия с БД??? Напишите функцию и вызовите ее до создания формы в файле проекта. Если не соединились, то отругайтесь и уходите. Ну включите голову-то хоть чуть-чуть! 0