Создание файла

[BigRem]

Здравствуйте.
var
DeyList: TStringList;
Begin
Stroka := ...;
DeyList.Add(Stroka);
DeyList.SaveToFile(ImiaPath + ImiaFile);
end;

Прекрасно сохраняет в файл если файл создан. Но если файла нет код не работает. Подскажите, как файл создать?

[Jeni]

Не может такого быть - если файла нет, то он создается автоматически.
Или указано неверное имя файла (или недопустимый путь) или нет прав на создание/перезапись файла - для NTFS нужно проверить разрешения для данного каталога.

[BigRem]

FAT32.
раз 5 пробывал: несоздаётся

[Jeni]

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

[Air]

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

Здравствуйте.
var
DeyList: TStringList;
Begin
Stroka := ...;
DeyList.Add(Stroka);
DeyList.SaveToFile(ImiaPath + ImiaFile);
end;

Прекрасно сохраняет в файл если файл создан. Но если файла нет код не работает. Подскажите, как файл создать?

В переменной "ImiaPath" или "ImiaFile" есть знак "\", если нет, то надо

У Вас получается "ImiaPath + ImiaFile" = C:\123file.txt
А нужно "ImiaPath + ImiaFile" = C:\123\file.txt

DeyList.SaveToFile(ImiaPath +'\'+ ImiaFile);

[SunKnight]

function FileCreate(const FileName: string): Integer; - создайте файл перед записью.

Assignfile (f,'blabla\blabla.txt');
rewrite(f);
for i:=1 to Deylist.Count do
begin
        writeln(f,Deylist.Strings[i]);
end;
closefile(f);

Или чет типа такого.

Незнаю на FAT32 работать будет или нет.

[Air]

Да причём тут...

Человек использует "DeyList.SaveToFile" файл автоматически создаётся, если есть на это разрешение.

[SunKnight]

Было сказано "Если можно - пришлите исходный код или хотя-бы значимую часть, где происходит сохранение данных."
Было сделано.
P.S. На счет слеша я согласен. Бывает , сам с таким сталкивался.

[BigRem]

Всё дело было в слеше, спасибо.