Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
2 / 2 / 1
Регистрация: 23.11.2013
Сообщений: 71
1

Проверить наличие файла в директории программы, и, если его нет, создать его

27.04.2014, 17:38. Просмотров 1827. Ответов 2
Метки нет (Все метки)

Здравствуйте уважаемые форумчане. Сразу перейду к сути- рядом с основной программой есть файл *.ini , так вот при первом запуске программы, или когда файл пустой, программа начинает кидаться ошибками, есть ли код с помощью которого можно проверить наличие файла в директории программы, и если его нет, то создать его:?

Добавлено через 22 минуты
Выход найден:
Pascal
1
2
3
4
5
6
7
8
procedure TForm1.Button1Click(Sender: TObject);
begin
if not FileExists('WBOT.ini') then
    begin
     memo1.Lines.SaveToFile('WBOT.ini');
end;
 
  end;
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.04.2014, 17:38
Ответы с готовыми решениями:

Проверить наличие файла и при его отсутствии создать его
Напишите программу, которая работает в одном из двух режимов. Если в текущем каталоге имеется файл...

Проверить наличие файла и удалить его
Здравствуйте, подскажите как реализовать в bat такое ... Проверить наличие файла в папке d:\01 и...

Как проверить наличие элемента и если он есть удалить его по клику
Приветствую, у меня есть код: var modalbtn=document.querySelectorAll(".modal__btn"); for (var i =...

Если файла с фамилиями ещё нет, то создать его и добавить фамилии трех и потом двух студентов
Есть программа, которая создает файл с фамилиями 3-х студентов и после добавляет фамилии ещё 2-х....

2
√159201
1153 / 845 / 443
Регистрация: 16.10.2013
Сообщений: 2,688
Записей в блоге: 7
27.04.2014, 18:02 2
Лучший ответ Сообщение было отмечено dimao как решение

Решение

Цитата Сообщение от dimao Посмотреть сообщение
проверить наличие файла в директории программы, и если его нет, то создать его:?
Приведенный выше код, проверяет существование ини-файла и если его не существует - то сохраняет в него строки из memo. Это неправильно.
Надо так:

Delphi
1
2
3
4
5
6
7
procedure TForm1.Button1Click(Sender: TObject);
begin
if FileExists('WBOT.ini') then
     memo1.Lines.SaveToFile('WBOT.ini')
 else
showmessage('Нужного файла не существует. Создайте его для начала.');
  end;
0
2 / 2 / 1
Регистрация: 23.11.2013
Сообщений: 71
27.04.2014, 20:39  [ТС] 3
через функцию сохранения текста мемо я убиваю 2х зайцев сразу- создаю файл, и забиваю в него стартовые настройки программы- дабы она не ругалась что файл пустой!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.04.2014, 20:39

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Как правильно проверить папку на наличие файла и удалить его
Доброго времени суток! Помогите, пожалуйста, не могу разобраться, почему не проходит проверка на...

Как создать обычную проверку на наличие файла и его размер?
Всем доброе время суток! У меня возникло 2 небольших вопроса. 1) Как осуществить обычную проверку...

Создать копию файла в той же директории и добавить к его имени окончание
Здравствуйте, помогите с такой легкой задачкой. Собственно имеется программа с двумя кнопками и...

Проверить наличие файла в директории по шаблону
Добрый день. Я еще не волшебник, я только учусь :) мне требуется по нажатию кнопки проверить...

Проверить наличие файла или директории
Можно ли каким нибудь чудесным способом проверить наличие файла или директории? if exists ("") не...

Как проверить существует ли некое правило? Если нет, то добавить его
ДОбрый вечер. У меня создаются правила с помощью assert() И каждый раз программа создает одни и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.