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

Вниз

GetFullPathName   Найти похожие ветки 

 
F$   (2010-04-08 17:00) [0]

из относительного пути получаю абсолютный (как я понял это зависит от места где лежит exe проекта).


procedure TMainForm.Button1Click(Sender: TObject);
var
SomeFile : array[0..MAX_PATH-1] of Char;
FullFileName : array[0..MAX_PATH-1] of Char;
FileName : PChar;
begin
SomeFile := ".\Database\New.dat";
GetFullPathName(@SomeFile, // Указатель на строку,содержащую реальное имя файла
  SizeOf(FullFileName), // Размер буфера,который получит полное имя файла(путь+имя)
  FullFileName,          // Указатель на буфер,который получит полное имя файла(путь+имя)
  FileName); // Указатель на буфер,который получит адрес (4 байта),указывающий на имя файла в буфере
  ShowMessage(FullFileName);
end;


Теперь собственно вопрос: как сделать так, чтобы абсолютный путь определялся исходя из заданной мною директории (скажем C:\),  а не места, где лижит exe.


 
Медвежонок Пятачок ©   (2010-04-08 17:01) [1]

а он и так определяется не с того места где лежит exe.
он определяется от текущего каталога процесса


 
Anatoly Podgoretsky ©   (2010-04-08 17:05) [2]

> F$  (08.04.2010 17:00:00)  [0]

Неверное использование функции, она для этого не предназначена. Тебе нужен ExpandFileName


 
Медвежонок Пятачок ©   (2010-04-08 17:06) [3]

делаешь expandfilename своему файлу.
делаешь тоже самое для начального каталога.
вычитаешь строки, получаешь искомый путь от начального каталога


 
F$   (2010-04-08 17:09) [4]


>  ExpandFileName


Функция добавляет к имени текущего каталога имя файла, указанное в параметре FileName.

а указать текущий каталог


 
F$   (2010-04-08 17:13) [5]

chDir. тему можно закрывать.


 
Медвежонок Пятачок ©   (2010-04-08 17:14) [6]

Функция добавляет к имени текущего каталога имя файла, указанное в параметре FileName.

Неужели?

ShowMessage(ExpandFileName("..\..\Test.txt"))


 
Anatoly Podgoretsky ©   (2010-04-08 19:35) [7]

> F$  (08.04.2010 17:09:04)  [4]

SetCurrentDir


 
Anatoly Podgoretsky ©   (2010-04-08 19:41) [8]

> Медвежонок Пятачок  (08.04.2010 17:14:06)  [6]

ExpandFileName converts the relative file name into a fully qualified path name.



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

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

Наверх




Память: 0.48 MB
Время: 0.05 c
15-1266247102
TStas
2010-02-15 18:18
2010.08.27
Программное разраривание


2-1270799708
berbegon
2010-04-09 11:55
2010.08.27
запись звука в Delphi


2-1269455858
plazmaser
2010-03-24 21:37
2010.08.27
строки в ексель


15-1273077614
Вася
2010-05-05 20:40
2010.08.27
Передача с компьютера на телевизор


15-1267870116
AlexDan
2010-03-06 13:08
2010.08.27
php и мат. функции..