![]() |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
![]() |
Grabitel |
![]()
Сообщение
#1
|
![]() Группа: Пользователи Сообщений: 4 Репутация: ![]() ![]() ![]() |
Народ.
Никто не может объяснить как сделать следующее: IF файл_такой-то_в корневой_папке_существует THEN рабочий цикл ELSE так_создай_его_и_работай Может для этого следует подключить модуль dos? И, если не трудно, где можно слить модули. А то у меня какая-то общипанная версия Pascal'я - только crt. Grabitel. |
![]() ![]() |
SKVOZNJAK |
![]()
Сообщение
#2
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 930 Пол: Мужской Репутация: ![]() ![]() ![]() |
Сабж есть на сайте в разделах дистрибутивов и литературы.
|
Grabitel |
![]()
Сообщение
#3
|
![]() Группа: Пользователи Сообщений: 4 Репутация: ![]() ![]() ![]() |
а нельзя ли поточнее?
там столько лит-ры... и ещё (к админам): в статьях много битых ссылок... |
AlaRic |
![]()
Сообщение
#4
|
... ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 347 Пол: Мужской Репутация: ![]() ![]() ![]() |
Насчет ссылок знаем, ведется работа!
|
trminator |
![]()
Сообщение
#5
|
Четыре квадратика ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 579 Пол: Мужской Репутация: ![]() ![]() ![]() |
Существует ли файл:
Код var f: text; begin assign(f, 'c:qwe.rty'); {$I-} reset(f); {$I+} if IOResult<>0 then writeLn('File not found') end. -------------------- Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала |
Grabitel |
![]()
Сообщение
#6
|
![]() Группа: Пользователи Сообщений: 4 Репутация: ![]() ![]() ![]() |
я это знаю. мне надо как СОЗДАТЬ файл на Pascal
|
trminator |
![]()
Сообщение
#7
|
Четыре квадратика ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 579 Пол: Мужской Репутация: ![]() ![]() ![]() |
Код assign(f, 'c:qwe.rty'); rewrite(f) {Если файл существует, он будет перезаписан. Если нет - будет создан} -------------------- Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала |
Grabitel |
![]()
Сообщение
#8
|
![]() Группа: Пользователи Сообщений: 4 Репутация: ![]() ![]() ![]() |
спасибо.
|
![]() ![]() |
![]() |
Текстовая версия | 24.06.2025 13:57 |