Создание папки

[GunSmoker]

Сообщение от Devolarium

насколько я понимаю, то должна создаваться папка в том же месте где расположен файл самой проги

Неправильно понимаешь.

Если ты указываешь относительный путь (т.е. не с начала, начинается не с буквы диска), то он считается относительно текущей папки. Текущая папка может быть какой угодно. Да, по умолчанию она равна папке программы, но это далеко не всегда так. Её может менять вызывающий, твой код и код функций, которые ты вызываешь.

Правило №1: никогда не использовать относительные пути в своих программах. Относительные пути НЕ предназначены для использования программистами. Они предназначены для использования пользователями.

Сообщение от Devolarium

ExtractFilePath(ParamStr(0))+'\HP\D emo')[/CODE]

Запомни правило: любая функция Delphi, заканчивающаяся на Path, возвращает путь с ведомым разделителем пути. А функция, заканчивающаяся на Dir - путь без ведомого разделителя. Т.е. в результате твой код выдаёт C:\Folder\\HP\Demo.

Правильно:

ExtractFilePath(ParamStr(0))+'HP\Demo'

Или:

ExtractFileDir(ParamStr(0))+'\HP\Demo')

Одно в другое превратить можно вызовом Include/ExcludeTrailingPathDelimiter

Но если сунуть прогу в Setup и установить, то при запуске через пуск не работает

Проставь ShowMessage по коду.

[s-andriano]

Сообщение от GunSmoker

Правило №1: никогда не использовать относительные пути в своих программах. Относительные пути НЕ предназначены для использования программистами. Они предназначены для использования пользователями.

Это неверное правило.
Относительные пути нужно использовать там, где нужны именно относительные пути. Абсолютные - во всех остальных случаях.

[GunSmoker]

Окей, приведи пример использования относительного пути в программе.

[Stilet]

приведи пример использования относительного пути в программе.

ChangeDir() еще не отменили, так что относительные пути местами вполне уместны.

[s-andriano]

Например, мне нужно просчитать несколько разных вариантов с разными исходными данными одной программой.
При этом существует файл, описывающий конфигурацию режима обработки (он располагается там же, где и exe файл) и файл, описывающий конфигурацию данных (он располагается там же, где ярлык к программе).
Вместе с тем необходимо, чтобы входные и выходные файлы располагались именно по относительным путям относительно ярлыка, и крайне желательно, чтобы при копировании ярлыка и конфигурационного фала в последнем не нужно было переписывать пути.

[GunSmoker]

ChangeDir() еще не отменили, так что относительные пути местами вполне уместны

ChangeDir('...');
TFileStream.Create('x.txt', ...);

Наводящий вопрос: что произойдёт, если запустить этот код в два потока одновременно?

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

Это и называется "пути для пользователя". Коду программы нет никакой необходимости оперировать относительными путями. Единственное, что он может с ними сделать: прочитать со входа и преобразовать в абсолютные.

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

[Stilet]

если запустить этот код в два потока одновременно?

Ну и, стесняюсь спросить, зачем это делать?
Я же не сказал что везде применять где попало.

вспомните историю

Я не знаю всей истории сего, но вспоминая скажем Фокспро могу сказать однозначно - относительные пути полезны в некоторых случаях, когда нужно локализовать источник данных для независимых разных модулей без необходимости передачи абсолютного пути в качестве параметров. Даже в наше время этот принцип для иерархических систем хранения и обработки данных применим.

[s-andriano]

Сообщение от GunSmoker

Это и называется "пути для пользователя". Коду программы нет никакой необходимости оперировать относительными путями. Единственное, что он может с ними сделать: прочитать со входа и преобразовать в абсолютные.

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

В принципе согласен - относительные пути в программе всегда можно преобразовать в абсолютные.
Вопрос лишь в том, насколько это удобно.
Но вопрос удобства вряд ли можно считать абсолютным правилом.
Поэтому не вижу никаких препятствий для использования именно относительных путей там, где это удобно.
Нужно только отчетливо понимать, что делаешь и зачем.

[Devolarium]

Ребят обьясните одну вешь:
1) сначал я должен узнать где распологается папка с прогой

ExtractFilePath(ParamStr(0));

2) затем создать папку используя этот путь:

CreateDir(ExtractFileDir(ParamStr(0))+'\HP\Test1\');

3) потом также создать файл:

 AssignFile(TF[1], ExtractFilePath(ParamStr(0))+'\HP\Demo\1.ini');

я хотя бы в правильном направлении мыслю? :D

[s-andriano]

Перед первым пунктом Вы должны решить, в каком именно месте Вы хотите создать папку.
Вся дальнейшая последовательность зависит от этого.

В частности, по поводу относительных путей: есть папка, в которой находится exe-шник, и есть рабочая папка программы. Это не одно и то же.