Grabitel
16.01.2004 23:27
Народ.
Никто не может объяснить как сделать следующее:
IF файл_такой-то_в корневой_папке_существует THEN рабочий цикл
ELSE так_создай_его_и_работай
Может для этого следует подключить модуль dos?
И, если не трудно, где можно слить модули. А то у меня какая-то общипанная версия Pascal'я - только crt.
Grabitel.
SKVOZNJAK
17.01.2004 15:51
Сабж есть на сайте в разделах дистрибутивов и литературы.
Grabitel
18.01.2004 19:55
а нельзя ли поточнее?
там столько лит-ры...
и ещё (к админам): в статьях много битых ссылок...
Насчет ссылок знаем, ведется работа!
trminator
19.01.2004 14:59
Существует ли файл:
Код
var f: text;
begin
assign(f, 'c:qwe.rty');
{$I-}
reset(f);
{$I+}
if IOResult<>0 then writeLn('File not found')
end.
Grabitel
19.01.2004 22:42
я это знаю. мне надо как СОЗДАТЬ файл на Pascal
trminator
19.01.2004 22:44
Код
assign(f, 'c:qwe.rty');
rewrite(f) {Если файл существует, он будет перезаписан. Если нет - будет создан}
Grabitel
23.01.2004 22:11
спасибо.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста,
нажмите сюда.