![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Таблицы всегда с приложением. [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;