Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

Народ подскажите как указать универсальный путь к базе данных   Найти похожие ветки 

 
Akella ©   (2004-06-29 09:49) [0]

Народ подскажите как указать универсальный путь к базе данных в Delphi 6, чтобы точкой отсчёта был каталог исполняемого файла - ???DB\Table.db


 
Соловьев ©   (2004-06-29 09:51) [1]

path := ExtractFilePath(Application.ExeName)+nameDB;


 
Anatoly Podgoretsky ©   (2004-06-29 09:54) [2]

Точка отсчета задается ТОЧКОЙ


 
Akella ©   (2004-06-29 10:00) [3]

ExtractFilePath - вещь хорошая - но она ведь работает как функция, а можно ли задать путь например как в виндузе типа %StartDir\DB\Table.db


 
Соловьев ©   (2004-06-29 10:07) [4]


> ExtractFilePath - вещь хорошая - но она ведь работает как
> функция,

это к чему?

> а можно ли задать путь например как в виндузе типа %StartDir\DB\Table.db

[1]


 
Akella ©   (2004-06-29 10:09) [5]

path := ExtractFilePath(Application.ExeName)+nameDB;


 
Sandman25 ©   (2004-06-29 10:15) [6]

procedure TForm1.FormCreate(Sender: TObject);
const
 cExtractFilePath = "ExtractFilePath";
var
 Path: array[0..Max_Path] of char;
begin
 SetEnvironmentVariable(cExtractFilePath, PChar(ExtractFilePath(Application.ExeName)));
 ExpandEnvironmentStrings(PChar("%"+cExtractFilePath + "%DB"), Path, Max_Path);
 ShowMessage(PChar(@Path));
end;



Страницы: 1 вся ветка

Текущий архив: 2004.07.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.029 c
4-1087044511
Delphins
2004-06-12 16:48
2004.07.25
Как узнать RAS пароли в Delphi?


1-1089271062
Term
2004-07-08 11:17
2004.07.25
TToolButton


4-1087052115
juiceman
2004-06-12 18:55
2004.07.25
клавиатурный шпионаж


11-1077899962
ALeX.B.
2004-02-27 19:39
2004.07.25
ICSовский FTPSRV просит 2 отсутствующих файла WinProc и WinTypes.


14-1089215993
rOOse
2004-07-07 19:59
2004.07.25
Компонент TEdit