Страница 1 из 1
Опять работа с папками...pascal'
Добавлено: 01 фев 2007, 21:51
Колядин Максим
"Опять эти каталоги!". Но теперь задача другая - написать программу, которая создаст файл, с расширемнием *.cop, а с именем выбранной вами папки. Здесь опять нужно использовать paramStr(1). Вот как я сделал, но выдаётся ошибка №2 - файл не найден. (Error 2: File not found. )
______
Код: Выделить всё
Var folder: file;
Fname: string;
Fname:= ParamStr(1)+'.cop';
assign(folder, fname); rewrite(folder);
end.
Вместо FName просто использовать assign(folder,paramSrt(1)+'.cop' я тоже пробывал - не работает.
Re: Опять работа с папками...pascal'
Добавлено: 02 фев 2007, 10:26
somewhere
А ты хоть параметры проге передаешь? Если да, то как и какие? Никому ведь не видно что находится в параметрах. А еще есть Debugger - позволяет найти 95% ошибок
Re: Опять работа с папками...pascal'
Добавлено: 02 фев 2007, 14:32
Игорь Акопян
напрасно ты называешь фаловую переменную которая будет ассоциирована с файлом "folder". Кстати, папка в которой фал создаёшь наверное уже существует?
Re: Опять работа с папками...pascal'
Добавлено: 02 фев 2007, 14:43
somewhere
" писал(а):Кстати, папка в которой фал создаёшь наверное уже существует?
А он в ней и не создает.
Paramstr(1) = 'D:\Temp'
Filename = Paramstr(1)+'.cop' = 'd:\temp.cop'
Re: Опять работа с папками...pascal'
Добавлено: 02 фев 2007, 15:40
Колядин Максим
Сообщение от Somewhere
А ты хоть параметры проге передаешь? Если да, то как и какие? Никому ведь не видно что находится в параметрах.
Нет. Я ничего не передаю. Как я уже говорил в другой теме, paramStr(1)=''; . Это только к папке, а к файлу paramstr(1) принимает нужное мне значение - путь к файлу.
Сообщение от Игорь Акопян
Кстати, папка в которой фал создаёшь наверное уже существует?
Somewhere правильно сказал (написал), какая разница создаю я
ФАЙЛ равный
ИМЕНИ папки, или нет. Программа будет заменять только тогда, когда полные имена файлов (имена вместе с расширением) будут равны друг другу.
Сообщение от Игорь Акопян
напрасно ты называешь фаловую переменную которая будет ассоциирована с файлом "folder"
Почему это напрасно? На указанном
somewhere примере можно полностью понять принцип рыботы программы... Только вот почему она не работает?...
Re: Опять работа с папками...pascal'
Добавлено: 05 фев 2007, 16:11
Игорь Акопян
Колядин Максим, во-первых, не надо ссылать что в другой теме ты что-то говорил, её могли читать давно или не читать вовсе. Если у тебя вопрос в пределах одной темы, не плоди их! Если же вопросы отличаются настолько, что заслуживают новую тему - опиши задачу и проблему в первом посте.
" писал(а):Почему это напрасно?
Потому что, если переменная содержит имя каталога и ты создаёшь каталог, надо использовать MkDir()
Если же имя файла у тебя совпадает с именем каталога - я бы завёл отдельную переменную и переприсвоил это имя, ибо ReWrite(folder) у меня вызывает ощущение что здесь ошибка (либо комент писать что создаётся файл идентичный имени каталога)
Вот кстати запустил - всё создалось...
Re: Опять работа с папками...pascal'
Добавлено: 05 фев 2007, 16:17
Игорь Акопян
тэкс, дальнейшее обсуждение ведём там. Закрыто