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

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

Таблицы всегда с приложением. [D5, dBase, FoxPro]


interest ©   (2002-03-20 08:51:00) 

Здравствуйте уважаемые знатоки!
Как сделать чтобы пути к таблицам которые использует мое приложение(созданное для локальной машины)всегда изменялись автоматически если я копирую его(приложение) вместе с таблицами(которые находятся в папке DATA, которая в свою очередь находится в папке где и само приложение) на другое место на диске.


Korn   (2002-03-23 18:01:00) [1]

Используй в программе путь относительно твоего исполнимого модуля. Путь к исполнимому модулю получишь из
PathPro:=ExtractFilePath(ParamStr(0));


ALFA   (2002-03-20 21:25:00) [2]

Все просто!
Поставь в Table1
DatabaseName - "Data\"(Имя каталога + "\")

Я так пользуюсь для временных баз, все работает.


ppcat   (2002-03-20 10:47:00) [3]

Последнее не сработает, а для каждого dataset свой коннект ... , представляешь, если у тебя их несколько десятков и каждый коннект хочет есть...

Посмотри в справке вот про это:
Session.GetAliasNames(dbList);
Session.GetAliasParams(AliasName, list);
CreateAlias(AliasNameToCreate, PathToConnect);
if Session.ConfigMode <> cmAll then
Session.ConfigMode:= cmAll;
Session.AddStandardAlias(AliasName, DBpath, "Paradox");
Session.SaveConfigFile;


deleon   (2002-03-20 09:12:00) [4]

var
PATH_APPLICATION: string = "";

procedure FormCreate(Sender: TObject);
begin
PATH_APPLICATION := ExtractFilePath(Application.ExeName);
Table1.DatabaseName := PATH_APPLICATION + "DATA";
Table2.DatabaseName := PATH_APPLICATION + "DATA";
{ или }
Database1.DatabaseName := PATH_APPLICATION + "DATA";
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо