Сб, 26.05.2018, 01:14
Приветствую Вас Гость | RSS
Главная | Каталог статей | Регистрация | Вход
Меню сайта
Категории раздела
Windows [4]
Android [0]
Поиск
Наш опрос
Какие из моих программ вам порнавились?
Всего ответов: 6
Реклама
Счетчики
Рейтинг@Mail.ru

Яндекс.Метрика
Simply-Art
Главная » Статьи » Программирование » Windows

Элементарная работа с файлами

Копирование, удаление, переименование и перемещение файла.

Первое что я рассмотрю это копирование файлов:
begin
 CopyFile('Откуда\Имя файла','Куда\Новое имя файла',true)
 // если файл с таким же именем уже есть
 // то true - если заменять
 // или false если оставить прошлую копию файла
end;
Так-же с легкостью можно удалить файл:
begin
Delete('Откуда\Имя файла')
// просто удаляем файл
end;
В Delphi есть одна особенность, процедура переименования и перемещения это одна функция:
begin
RenameFile('Откуда\Имя файла','Куда\Новое имя файла')
// копирует исходный файл в новое место с новым именем
// и удаляет файл из старого места
end;

Работа с файлом на примере консольного приложения.

Я покажу пример записи и чтения файла, на примере консольной программы. Но все те же функции можно использовать и в коде обычного проекта Delphi.
Чтение и запись, точнее копирование текста из одного файла в другой:
Program ReadInput;
var
 infile, outfile: TextFile; // для работы с файлом
 line: string;
begin
 assign(infile, 'C:\INFILE.TXT');
 assign(outfile, 'C:\OUTFILE.TXT');
 reset(infile);  // перемещаем "указатель" в начало входного файла
 rewrite(outfile);  // очищаем содержимое выходного файла
 while not EoF(infile) do // EoF - тригер конца файла
  begin
   readln(infile, line); // читаем из файла
   writeln(outfile, line); // пишем в выходной файл
  end;
 close(infile); // обязательно закрываем файл
 close(outfile); // обязательно закрываем файл
end.
Assign(TempFile, 'Путь\Имя_файла') - задает связь переменной TempFile с файлом на компьютере.
Reset(TempFile) - используется чтобы читать файл TempFile с самого начала. По умалчиванию файл открывается как будто мы его уже прочитали. И если использовать read(TempFile, line), то читать нам будет нечего.
Rewrite(TempFile) - очищает содержимое и готовит файл TempFile для записи в него.
EoF(TempFile) - если файл TempFile закончился при чтении, то данная функция будет выдавать true. А если в файле есть еще что почитать, то выдаст false.
Read(TempFile, P) - читает данные из файла TempFile в переменную P.
Readln
(
TempFile, P) - читает данные из файла TempFile в переменную P c переходом на следующию строку.
Write(TempFile, P) - записывает переменную P в файла TempFile.
Writeln(TempFile, P) - записывает переменную P в файла TempFile и переходит на новую строку.

С чтением и записью в файл многое зависит от того, какой тип переменной P вы будете использовать. Если использовать string, то при использовании read() будут читаться слова из файла записанные через пробел. А при использовании readln() будет читаться вся строка. Но при записи такого-же эффекта не будет. Если использовать write() несколько раз, то данные будут записаны в одну строку без пробелов друг за другом.

На этом все, пробуйте, пишите в комментариях если возникнут вопросы.

copyright by Simply-Art
Категория: Windows | Добавил: Simply-Art (11.11.2013)
Просмотров: 175 | Комментарии: 1 | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *:
Хостинг от uCozCopyright Simply-Art © 2018