51349

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

Лабораторная работа

Информатика, кибернетика и программирование

Цель работы: Написать программу, осуществляющую запись массива в файл и чтение из файла в массив с помощью потоков. Рабочие данные выбрать самостоятельно.

Русский

2014-02-09

127 KB

2 чел.

Лабораторная работа 8

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

 Выполнил: Шуклецов М.А.

              ФРТ, гр. 2106

Цель работы: Написать программу,  осуществляющую запись массива в файл и чтение из файла в массив с помощью потоков. Рабочие данные выбрать самостоятельно.

Общий вид программы следующий: 

Здесь мы видим следующие элементы управления:

«Заполнение массива» - заполнение массива 10х10 случайными числами в интервале до 99

«Сохранение в фаил» - считывание в поток и сохранение в фаил *.txt

«Чтение из файла» - считывание из файла в поток и заполнение массива 2 из потока

Код программы:

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

       : TForm(Owner)

{

}

TStringList *fil = new TStringList();  //инициализация потока

int a[10][10];    //массив 1

int b[10][10];    //массив 2(можно и без него)

AnsiString S;    //строковая переменная

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)   //заполнение случайными числами

{   for(int x=0; x<10; x++)

 { for(int y=0; y<10; y++)

       {

        StringGrid1->Cells[x][y] = random(99);

        a[x][y]=StrToInt( StringGrid1->Cells[x][y]);

       }

 }

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)

{  fil = new TStringList();  //Открытие потока

for(int y=0; y<10; y++)

       {for(int x=0; x<10; x++)

               {S = IntToStr(a[x][y]);  //запоминание ячейки

                fil->Append(S);                } //добавление в конец нужной ячейки

       }

       fil->SaveToFile("Test.txt");  //Сохранение потока в файл

      fil->Free();    //закрытие потока

      S = "";    //Обнуление переменной

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button3Click(TObject *Sender)

{ fil = new TStringList();   //Открытие потока

fil->LoadFromFile("Test.txt");  //Загрузка потока из файла

for(int y=0; y<10; y++)

       {for(int x=0; x<10; x++)

               {

              b[x][y] =StrToInt( fil->Strings[y*10+x]);  //Заполнение массива 2

              StringGrid2->Cells[x][y] = b[x][y];  //Заполнение StringGrid2

               }

       }

}

//---------------------------------------------------------------------------

Вывод:  Мы научились использовать потоки


 

А также другие работы, которые могут Вас заинтересовать

24312. Разработка и реализация PR-акций и PR-кампаний 40.5 KB
  PRкампания постановка целей и задач общая концепция кампании определение ключевых проблем и профилей целевых аудиторий. Всякая масштабная кампания представляет собой скоординированные целенаправленные и осуществляемые на протяжении определенного периода времени усилия рассчитанные на решение одной или нескольких задач которые должны приблизить организатора кампании к стратегической цели обусловленной его общей социальной миссией. Кампании преимущественно планируются и проводятся ради того чтобы привлечь внимание общественности к...
24313. Практическая реализация PR-кампании 33 KB
  Практическая реализация PRкампании. Планирование типичной PRкампании включает этапы: Очерчивание проблемы. Определяется цель кампании которая разбивается на субцели показывающие что должно быть достигнуто. По сути это содержание плана кампании.
24315. Законы сохранения 311 KB
  Система взаимодействующих между собой тел, на которую не действуют внешние силы, называется замкнутой (изолированной). В замкнутых системах останется постоянным три физические величины
24316. Момент инерции. Основное уравнение динамики вращательного движения АТТ вокруг неподвижной оси 261.5 KB
  Моментом инерции материальной точки (частицы) относительно данной оси называется скалярная физическая величина, равная произведению массы материальной точки (частицы) на квадрат кратчайшего расстояния от частицы до оси вращения.
24317. Особенности деятельности PR-отделов (структур) с целевыми аудиториями 24 KB
  географический с учетом природных или административнотерриториальных единиц; демографический пол возраст образование; 3. с учетом скрытой власти во внимание берутся лидеры мнений; 5. с учетом статуса официальное положение индивида; 5. с учетом статуса официальное положение; 6.
24318. Методика оценки обстановки в очагах ядерного поражения, химического и бактериального заражения 212.5 KB
  В учебном пособии рассмотрены основные методики прогнозирования и оценки обстановки в очагах ядерного поражения, химического и бактериального заражения на основе данных полученных в результате разведки и знаний свойств оружия массового поражения и сильнодействующих ядовитых веществ...
24319. Понятие маркетинговых исследований. Предмет, объект и направления маркетингового исследования 24.5 KB
  Предмет объект и направления маркетингового исследования. Маркетинговые исследования систематическое определение круга данных необходимых в связи со стоящей перед фирмой маркетинговой ситуации их сбор анализ и отчет о результатах. Главная цель исследования уменьшение неопределенности которая всегда сопутствует принятию маркетинговых решений. Сам процесс маркетингового исследования включает три основных этапа.
24320. Создание Swing GUI в IDE Net Beans 736 KB
  В этом занятии приведено пошаговое описание процесса создания графического интерфейса пользователя для приложения с именем ContactEditor с помощью конструктора графического интерфейса пользователя IDE NetBeans. Целью является проектирование программы интерфейса пользователя, позволяющей просматривать и редактировать записи базы данных