Currentdir взятие файла

[Оля2394]

Здравствуйте, подскажите пожалуйста, как с помощью getcurrentdir открывать файлы из текущей директории? т.е. папки где находится программа

[evg_m]

т.е. папки где находится программа

getcuurentdir не нужна и в некоторых случаях даже вредна, а надо так

f:=ExtractFilePath(Application.ExeName) +'myfilename.txt';

и далее любые операции по работе с файлом.

[ДралсяСошибками]

f:='myfilename.txt';

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

[Аватар]

так же тоже откроет, если фаил рядом с прогой

Ошибаешься. Только тогда, когда текущий каталог совпадает с каталогом проги. А вариантов не совпадения как в тысяче и одной ночи

нужно ли получать полный путь и в каких случаях

Нужно и во всех случаях, по крайней мере, что бы быть не зависимым от способа запуска проги

[min@y™]

нужно ли получать полный путь и в каких случаях?

рекомендую юзать полный путь всегда, но получать его один раз при запуске проги и хранить в переменной.

procedure GlobalInit; // Инициализация глобальных переменных
var
  Buffer: array[0..MAX_PATH - 1] of Char;
  Size: Cardinal;
begin
  GetWindowsDirectory(Buffer, MAX_PATH);
  WindowsDirectory:= Buffer;

  ProgramExeFile:=   ParamStr(0);
  ProgramDirectory:= ExtractFileDir(ProgramExeFile);

  Size:= MAX_PATH;
  GetUserName(Buffer, Size);
  UserName:= Buffer;
end;

[ДралсяСошибками]

Что нужно сделать, чтобы путь не совпал?

TFileStream.Create('test.txt', ...);

[Аватар]

Например запусти программу с ярлыка не указав в нем рабочий каталог. Или вызови в проге диалог открытия файлов, не настроив его как положено. Будешь очень удивлен, а программа будет иметь печальный вид. Сторонние компоненты. Есть уверенность, что в их коде не меняется каталог по умолчанию? А поменять его как два пальца об асфальт

[ДралсяСошибками]

Ясно))) Спасибо))

[phomm]

http://www.gunsmoker.ru/2015/01/neve...ile-paths.html