РефератыИнформатикаРаРазработка многопоточных Windows-приложений в среде Borland C Builder

Разработка многопоточных Windows-приложений в среде Borland C Builder

МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ УКРАИНЫ


ДОНЕЦКИЙ НАЦИОНАЛЬНЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ


Кафедра АСУ


Отчёт


к индивидуальному домашнему заданию


по ТП


на тему:


«Разработка многопоточных

W

indows-приложений


в среде

Borland

C

++

Builder

»


Вариант №7


Выполнил студент группы ИУС-04б


Ващилко Валентин


Проверили Землянская С.Ю.


Петров А.В.


Донецк 2007


Цель работы:
Изучение способов создания и управления потоками в программах, разрабатываемых в среде BorlandC++ Builder. Изучение и использование методов взаимодействия потоков и визуальных компонентов библиотеки VCL.


Методические указания:


С использованием среды визуального программирования BorlandC++ Builder разработать и отладить многопоточное приложение, в котором необходимо предусмотреть следующее:


а) создать 3 вторичных объекта-потока, производных от класса TThread (1-й поток должен быть в запущенном состоянии, 2-й и 3-й – в приостановленном состоянии). В каждом из потоков описать функции вывода информации на соответствующие формы. Вызов этих функций будет производиться из метода Execute() соответствующего потока в бесконечном цикле, с помощью функции Synchronize() с периодичностью (задержкой) 0,1 сек;


б) разработать 3 формы (главную форму приложения и 2 формы) для взаимодействия с указанными потоками;


в) главная форма приложения должна быть размещена в центре экрана и состоять из 4-х частей: в верхней части должна быть надпись с информацией о данной работе (дисциплина, № работы, группа, ФИО студента), ниже постоянно выводится динамически изменяющаяся текстовая (числовая) информация или графическая фигура, выполняемые в 1-м вторичном потоке. В нижней половине формы должны располагаться 2 панели для управления 2-м и 3-м созданными потоками. Внизу формы помещается кнопка "Выход".


г) на каждой панели вверху помещается название потока, а ниже размещаются компоненты для отображения состояния и управления соответствующим потоком. Информация о потоке (запущен, приостановлен, завершен) выводится с помощью компонентов Label. Управление потоком производится с помощью кнопок с названиями "Запустить", "Приостановить", "Завершить". Изменение приоритета потока может производиться с помощью компонентов типа ComboBox, ListBox, RadioGroup по выбору студента.


д) при запуске приложения должна появиться главная форма, в верхней половине которой должны отображаться действия, выполняемые 1-м вторичным потоком согласно варианту задания. Два других потока должны находиться в приостановленном состоянии, о чем должны говорить надписи на панелях. При нажатии на любой панели кнопки "Запустить" должна появиться форма, на которой будет выводится динамически изменяющаяся текстовая (числовая) информация или графическая фигура, выполняемые в соответствующем потоке. При нажатии кнопки "Приостановить" работа соответствующего потока временно прекращается. При нажатии кнопки "Завершить" соответствующая форма закрывается, действие потока останавливается (без уничтожения объекта, для возможности повторного запуска потока).















Вар-та


Действия, выполняемые в потоках и отображаемые на формах
Поток 1 Поток 2 Поток 3
7 Компонент ScrollBar на форме циклически показывает плавное движение ползунка. Последовательность цифр, выведенная с помощью компонента Label циклически сдвигается справо-налево, образуя "бегущие числа". Графическая фигура одного вида (компонент Shape) на форме изменяет свои размеры от min до max, а потом наоборот.

Unit1.cpp


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


#include <vcl.h>


#pragma hdrstop


#include "Unit1.h"


#include "Unit2.h"


#include "Unit3.h"


#include "T2.h"


#include "T1.h"


#include "T3.h"


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


#pragma package(smart_init)


#pragma resource "*.dfm"


TForm1 *Form1;


T1 *Thread1=newT1(false); // Поток 1 создан и запущен


T2 *Thread2=newT2(true); // Поток 2 создан и не запущен


T3 *Thread3=newT3(true); // Поток 3 создан и не запущен


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


__fastcall TForm1::TForm1(TComponent* Owner)


: TForm(Owner)


{


}


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


void __fastcall TForm1::Button1Click(TObject *Sender)


{


Label9->Caption="Запущен";


Form2->Show();


Thread2->Resume();


}


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


void __fastcall TForm1::Button2Click(TObject *Sender)


{


Label9->Caption="Приостановлен";


Thread2->Suspend();


}


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


void __fastcall TForm1::Button3Click(TObject *Sender)


{


Label9->Caption="Завершён";


Thread2->Terminate();


Form2->Close();


}


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


void __fastcall TForm1::RadioGroup1Click(TObject *Sender)


{


switch (RadioGroup1->ItemIndex)


{


case 0: Thread2->Priority=tpLowest;


break;


case 1: Thread2->Priority=tpNormal;


break;


case 2: Thread2->Priority=tpHighest;


break;


}


}


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


void __fastcall TForm1::ComboBox1Change(TObject *Sender)


{


switch (ComboBox1->ItemIndex)


{

<
br />

case 0: Thread3->Priority=tpLowest;


break;


case 1: Thread3->Priority=tpNormal;


break;


case 2: Thread3->Priority=tpHighest;


break;


}


}


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


void __fastcall TForm1::Button4Click(TObject *Sender)


{


Label10->Caption="Запущен";


Form3->Show();


Thread3->Resume();


}


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


void __fastcall TForm1::Button5Click(TObject *Sender)


{


Label10->Caption="Приостановлен";


Thread3->Suspend();


}


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


void __fastcall TForm1::Button6Click(TObject *Sender)


{


Label10->Caption="Завершён";


Thread3->Terminate();


Form3->Close();


}


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


void __fastcall TForm1::Button7Click(TObject *Sender)


{


exit(1);


}


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


Unit2.cpp


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


#include <vcl.h>


#pragma hdrstop


#include "T2.h"


#include "Unit2.h"


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


#pragma package(smart_init)


#pragma resource "*.dfm"


TForm2 *Form2;


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


__fastcall TForm2::TForm2(TComponent* Owner)


: TForm(Owner)


{


}


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


Unit3.cpp


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


#include <vcl.h>


#pragma hdrstop


#include "Unit3.h"


#include "T3.h"


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


#pragma package(smart_init)


#pragma resource "*.dfm"


TForm3 *Form3;


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


__fastcall TForm3::TForm3(TComponent* Owner)


: TForm(Owner)


{


}


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


T1.cpp


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


#include <vcl.h>


#pragma hdrstop


#include "Unit1.h"


#include "T1.h"


#pragma package(smart_init)


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


__fastcall T1::T1(bool CreateSuspended)


: TThread(CreateSuspended)


{


}


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


void __fastcall T1::OutOnForm1()


{ static int i=2;


Form1->ScrollBar1->Position+=i;


if (Form1->ScrollBar1->Position == 100)


{Form1->ScrollBar1->Position=0;}


}


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


void __fastcall T1::Execute()


{


for (;;)


{


Synchronize(OutOnForm1);


Sleep(100);


}


}


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


T2.cpp


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


#include <vcl.h>


#pragma hdrstop


#include "Unit1.h"


#include "T2.h"


#include "Unit2.h"


#pragma package(smart_init)


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


__fastcall T2::T2(bool CreateSuspended)


: TThread(CreateSuspended)


{


}


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


void __fastcall T2::OutOnForm2()


{ static int i=10;


Form2->Label1->Left-=i ;


if (Form2->Label1->Left < -160)


{Form2->Label1->Left=370;}


}


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


void __fastcall T2::Execute()


{


for (;;)


{


Synchronize(OutOnForm2);


Sleep(150);


}


}


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


T3.cpp


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


#include <vcl.h>


#pragma hdrstop


#include "T3.h"


#include "Unit1.h"


#include "Unit3.h"


#pragma package(smart_init)


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


__fastcall T3::T3(bool CreateSuspended)


: TThread(CreateSuspended)


{


}


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


void __fastcall T3::OutOnForm3()


{ static int i=5;


static int k;


static int f=0;


if (f==0)


{


for (k=40;k<=100;k+=5);


{


Form3->Shape1->Width+=i;


Form3->Shape1->Height+=i;


if (Form3->Shape1->Width==100) {f=1;} ;


};


};


if(f==1)


{


for (k=100;k>=40;k-=5);


{


Form3->Shape1->Width-=i;


Form3->Shape1->Height-=i;


if (Form3->Shape1->Width==40) {f=0;} ;


};


};


}


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


void __fastcall T3::Execute()


{


for (;;)


{


Synchronize(OutOnForm3);


Sleep(150);


}


}


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

Сохранить в соц. сетях:
Обсуждение:
comments powered by Disqus

Название реферата: Разработка многопоточных Windows-приложений в среде Borland C Builder

Слов:972
Символов:14861
Размер:29.03 Кб.