Последние записи
- Как запустить программу указанную в Edit.Text
- Скачать файл с использованием потока
- Поиск слова в Memo
- Распаковщик формата .img из GTA San Andreas
- Подсчет количества повторяющихся букв в файле
- Простейший скрипт загрузки картинки с помощью php
- Рассылка. Выпуск 154
- Получение картинки с веб-камеры
- Скопировать определённый кусок image
- Сделать printscreen экрана и сохранить
14th
Дек
Как проверить существует ли файл?
Posted by Chas under Пост-обзор
Подскажите пожалуйста как реализовать такой момент.
На событие FormCreate должен загружаться файл
TreeView1.LoadFromFile(‘c:\blablabl a.bla’);
Однако если такого файла нету, то программа выдает ошибку. Как прописать что если файла нету, то создать, иначе загрузить.
объявить текстовый файл:
Var f:System.Text;
это в OnCreate формы
if FileExists(‘c:\blablabla.bla’) then
TreeView1.LoadFromFile(‘c:\blablabl a.bla’)
else begin
AssignFile(f,‘c:\blablabla.bla’);
Rewrite(f);
CloseFile(f);
end;
TreeView1.LoadFromFile(‘c:\blablabl a.bla’)
else begin
AssignFile(f,‘c:\blablabla.bla’);
Rewrite(f);
CloseFile(f);
end;

