создать каталог

[viks1]

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

Form4.Memo2.Lines.SaveToFile('D:\'+Form1.Edit1.text+'\'+Edit1.text+'note.txt');

не получилось, так как не найден каталог(

[SNUPY]

if not DirеctоrуЕxists(ЕxtrаctFilеPath(s)) then
 MkDir(s);

Хотя помоему это как-то делалось меньшим тело движением =)
А вообще пример:
http://www.delphibasics.ru/DirectoryExists.php

[viks1]

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

if not DirеctоrуЕxists(ЕxtrаctFilеPath(s)) then
 MkDir(s);

Хотя помоему это как-то делалось меньшим тело движением =)
А вообще пример:
http://www.delphibasics.ru/DirectoryExists.php

Спасибо за ссылку. То что надо)

[Serge_Bliznykov]

см. ForceDirectories

  stFullFileName := 'D:\'+Edit1.text+'\note.txt';
  stPath := ExtractFilePath(stFullFileName) + '\';
  if not DirectoryExists(stPath) then ForceDirectories(stPath);

замечания.
1-х. а почему у Вас ДВАЖДЫ прописан Edit1.Text ?!
2-х. Есть компонент TSaveDialog - рекомендую не выдумывать велосипед, а воспользоватьс им.

[viks1]

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

см. ForceDirectories

  stFullFileName := 'D:\'+Edit1.text+'\note.txt';
  stPath := ExtractFilePath(stFullFileName) + '\';
  if not DirectoryExists(stPath) then ForceDirectories(stPath);

замечания.
1-х. а почему у Вас ДВАЖДЫ прописан Edit1.Text ?!
2-х. Есть компонент TSaveDialog - рекомендую не выдумывать велосипед, а воспользоватьс им.

Два раза потому что эта операция проходит на Form4.
Моя программа поддерживает регистрацию.
Form1.Edit1.text это мой логин
Edit1.text это имя моей заметки
все что я хотел это что бы создавалась папка под именем моего логина, свойственно, туда сохранялись заметки.
Насчет второй ошибки.
Я хочу что бы все сохранения были в фоновом режиме, так будет сохранятся последовательность сохранения файлов.
У каждого своя учетка,и если все будут сохранять заметки кому куда захочется, то после того как программа заново запуститься, она не сможет загрузить заметки именно того пользователя, кто зашел в нее.

[Человек_Борща]

Используй ForceDirctories функцию.

[viks1]

Сообщение от Человек_Борща

Используй ForceDirctories функцию.

что она делает?

[SNUPY]

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

что она делает?

http://www.delphibasics.ru/ForceDirectories.php