Составление программы в C++ Builder 6 для расчета численности рабочих

Составление программы в C++ Builder 6 для расчета численности рабочих

1. Описание визуальных компонентов

1.1 Форма

Форма (Tform) — стандартное окно Windows, используемое для размещения в нем всех визуальных компонентов.

Свойства (Properties):

Name: String — внутреннее имя формы (не следует менять).

Caption: String — заголовок формы (показывается в строке заголовка окна).

Color: String — цвет фона формы.

Height: Integer — вертикальный размер в пикселях (высота).

Width: Integer — горизонтальный размер (ширина).

Left: Integer — расстояние от левой границы экрана монитора до формы.

Top: Integer — расстояние от верхней границы экрана монитора до формы.

1.2 Кнопка

Кнопка (Tbutton) — это визуальный компонент, используемый для управления процессом выполнения задачи или настройки ее интерфейса. У кнопки только два возможных состояния: не нажата, нажата.

Свойства Tbutton — Name, Height, Width, Left, Top — те же, что и для Tform.

Caption: String — заголовок кнопки (показывается на кнопке).

Default: Boolean — выбор по умолчанию.

Enabled: Boolean — доступность для выбора пользователем. Это свойство используется для защиты программы от некорректных действий.

Font: Tfont — шрифт заголовка.

TabOrder: Integer — порядковый номер компонента, которому передано управление (фокус ввода), при обходе всех компонентов формы с помощью клавиши Tab.

Tag: LongInt — ячейка памяти, используемая для хранения целого числа.

Visible: Boolean — видимость данного компонента.

1.3 Надпись

Надпись (Tlabel) — используется для оформления других визуальных компонентов, поясняющих их функции комментариями.

Свойства (Properties):

Caption: String — содержание надписи.

Font: Tfont — шрифт надписи.

1.4 Изображение

Изображение (TImage) используется для отображения статических картинок и создания различных анимационных эффектов.

Свойства (Properties):

Picture — описывает точечное изображение (.bmp) загружаемого файла.

Center — центрирование картинки внутри заданной рамки (если она меньше рамки). Если свойство Center = true, рисунок центрируется, в противном случае его верхний левый угол совмещается с верхним левым углом рамки. Transparent — определяет прозрачность фона изображения при значении, равном true.

1.5 Многостраничная панель

TPageControl — это набор листов с закладками TabSheet, используемый для размещения на каждом из листов набора элементов управления диалогом.

Свойства:

ActivePage:TtabeSheet — активная страница, используется только на этапе выполнения для листания страниц панели с помощью программного кода.

HotTrace:Boolean — выделение цветом текста закладки.

ImageList:TimageList — список изображений, используемых на закладках страниц.

MultiLine:Boolean — возможность многорядного размещения закладок.

PageCount:Integer — количество страниц на панели.

RaggedRight:Booltan — размещение закладок по всей ширине панели.

TabPosition — расположение закладок относительно панели.

События TpageControl:

OnChange — изменение структуры и свойств многостраничной панели.

1.6 Страница многостраничной панели

TtabSheet представляет собой отдельную закладку объекта TPageControl.

Свойства:

Caption: String — текс закладки.

ImageIndex: Integer — номер рисунка в списке панели, изображаемого на закладке данной страницы.

PageIndex: Integer — номер страницы в панели.

TabVisible: Boolean — видимость закладки у страницы.

1.7 Таблица строк

Таблица String Grid является экземпляром класса TString Grid и предназначена для отображения двухмерной информации, например, элементов матрицы. В таблице может находиться произвольное количество строк и столбцов. Если зафиксировать необходимое количество первых строк и столбцов, то можно задать заголовки строк и столбцов, постоянно присутствующие в окне компонента, в том числе при горизонтальном и вертикальном скроллинге.

На пересечении строк и столбцов находятся ячейки. Каждая ячейка может содержать символьную строку и произвольный объект, ассоциированный с ячейкой. Чаще всего таким объектом является некоторый рисунок. Если для ячеек задан режим редактирования, то на этапе выполнения программы разрешается вводить и редактировать данные, находящиеся в ячейке.

Нумерация строк и столбцов таблицы начинается с нуля. Координаты каждой ячейки таблицы задаются парой чисел, первое из которых является номером столбца, а второе — номером строки. Например, ячейка с координатами (3,5) расположена в четвертом столбце и шестой строке.

Класс TCustonGrid, являющийся предком класса TStrigGrid, содержит определение многих характеристик, общих для любых таблиц. Многие из них определяют внешний вид таблицы.

Свойства:

Col: Longint; - Задает столбец, в котором находится активная ячейка. Свойство доступно только на этапе выполнения программы.

ColСount: Longint; - Задает число столбцов в таблице.

СolWidths[Index: Longint]: Integer; - Задает ширину каждого столбца в таблице. Доступно только на этапе выполнения программы.

DefaultColWidth: Integer; - Задает исходную ширину всех столбцов. Для задания ширины отдельного столбца следует использовать свойство ColWidths.

DefaultDrawing: Boolean; - Если свойство имеет значение True, то прорисовка ячеек при рисовании таблицы будет происходить автоматически, в противном случае необходимо создать свои средства отображения.

DefaultRowHeight: Integer; - Задает исходную высоту всех строк. Для задания высоты отдельной строки следует использовать свойство RowHeights.

FixedColor: TColor; - Задает цвет фиксированных ячеек.

FixedCols: Integer; - Задает число фиксированных столбцов. По умолчанию задается один фиксированный столбец.

FixedRows: Integer; - Задает число фиксированных строк. По умолчанию задается одна фиксированная строка.

GridLineWidth: Integer; - Задает толщину линий между ячейками в пикселях.

Row: Longint; - Задает строку, в которой находится активная ячейка. Доступно только на этапе выполнения программы.

RowCount: Longint; - Задает число строк таблицы. RowHeights[Index: Longint]: Integer; - Задает высоту каждой строки таблицы. Доступно только на этапе выполнения программы.

Selection: TGridRest; - Указывает область текущего выделения. При выделении указываются номера строк и столбцов. Доступно только на этапе выполнения программы.

Рассмотрим теперь основные свойства класса TstringGird, позволяющие осуществлять доступ к данным, находящимся в ячейках таблицы. Все перечисленные ниже свойства доступны только на этапе выполнения программы.

Cells[ACol, ARow, Integer]: string; - Содержит двумерный массив символьных строк, каждая из которых принадлежит ячейке, находящейся в столбце AСol, и строке ARow.

Cols[Index: Integer]: Tstrings; - Содержит список строк, принадлежащих ячейкам столбца с индексом Index.

Objects[ACol, Arow: Integer]: TObject; - Содержит двумерный массив, элементами которого являются указатели на объекте, каждый из которых ассоциирован с соответствующей ему ячейкой, находящейся в столбце AСol, и строке ARow.

Rows[Index: Integer]: TStrings; - Содержит список строк, принадлежащих ячейкам строки с индексом Index. Событием по умолчанию для таблицы StrigGrid является событие OnClick.

2. Руководство пользователя

Для начало работы с программой необходимо открыть директорию «Программа» и запустить файл «Project 1. exe»

На экране появится интерфейс программы: закладка график сменности, плановый баланс, рабочие и закладка численность рабочих, которые представлены на рисунках 1, 2, 3 и 4 соответственно.

После запуска программы во второй закладке необходимо ввести исходные данные для расчета, а именно заполнить поля ввода «Отпуск очередной и дополнительный», «Болезни», «Выполнение государственных и общественных обязанностей». Аналогичные действия необходимо произвести и в третьей вкладке.

Расчет производится путем нажатия кнопки «Рассчитать» (рисунок 4). При этом если не будут заполнены все необходимые поля ввода, то расчет производиться не будет.

Рисунок 1- Интерфейс программы — «График сменности»

Рисунок 2- Интерфейс программы — «Плановый баланс»

Рисунок 3- Интерфейс программы- «Рабочие»

Рисунок 4- Интерфейс программы — «Численность рабочих»

Для того чтобы произвести расчет с использованием новых данных, необходимо заполнить поля ввода другими численными значениями, а именно заполнить поля ввода во второй и третьей вкладке, как это представлено на рисунке 2 и рисунке 3. После чего нажать кнопку «Рассчитать».

Заключение

В данной курсовой работе было разработано приложение для автоматизации расчета основных технико-экономических показателей производства колес на предприятии «K&K». Программа разработана на языке программирования С++ в интегрированной среде разработки С++ Builder 6.

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

Программа является актуальной как для студентов, так и для специалистов и служащих. Данная программа значительно экономит время, исключает возможность ошибки при расчетах технико-экономических показателей производства.

Список использованных источников

расчет численность рабочий программа

1. СТО 4.2−07−2008 Стандарт организации. Система менеджмента качества. Общие требования к построению, изложению и оформлению документов учебной и научной деятельности. — Введ. впервые; дата введ. 22.12.2008. — К.: СФУ, 2008. — 46с.

2. Организация и планирование производства: Метод. указания к дипломному проектированию для студентов специальности «Автоматизация производственных процессов» / С. Л. Парфенова. — К.: ГАЦМиЗ, 2003. — 52с

Приложение 1

Листинг программы

#include

#include

#pragma hdrstop

#include «Unit1.h»

#pragma package (smart_init)

#pragma resource «*.dfm»

TForm1 *Form1;

__fastcall TForm1: TForm1(TComponent* Owner): TForm (Owner)

{

}

void __fastcall TForm1: FormCreate (TObject *Sender)

{

StringGrid1->Cells[0][0]="Показатели" ;

StringGrid1->Cells[0][1]="Календарный фонд, дни" ;

StringGrid1->Cells[0][2]="Выходные и не рабочие дни по графику сменности, дни" ;

StringGrid1->Cells[0][3]="Номинальный фонд рабочего времени Тн, дни" ;

StringGrid1->Cells[0][4]="Невыходы по причинам:" ;

StringGrid1->Cells[0][5]="-отпуск очередной и дополнительный" ;

StringGrid1->Cells[0][6]="-болезни" ;

StringGrid1->Cells[0][7]="-выполнение гос. и общ. обязанностей" ;

StringGrid1->Cells[0][8]="Эффективный фонд рабочего времени Тэф" ;

StringGrid1->Cells[0][9]="-дни" ;

StringGrid1->Cells[0][10]="-часы" ;

StringGrid1->Cells[0][11]="Коэффициент перехода от штатной численности к списочной Ксп=Тн/Тэф" ;

StringGrid1->Cells[1][0]="Непрерывный режим (3 см. по 8 час.)" ;

StringGrid2->Cells[1][0]="2″ ;

StringGrid2->Cells[2][0]="3″ ;

StringGrid2->Cells[3][0]="4″ ;

StringGrid2->Cells[4][0]="5″ ;

StringGrid2->Cells[5][0]="6″ ;

StringGrid2->Cells[6][0]="7″ ;

StringGrid2->Cells[7][0]="8″ ;

StringGrid2->Cells[8][0]="9″ ;

StringGrid2->Cells[0][1]="Основные рабочие" ;

StringGrid2->Cells[0][2]="Оператор технолог" ;

StringGrid2->Cells[0][3]="Оператор щитов" ;

StringGrid2->Cells[0][4]="Литейщик" ;

StringGrid2->Cells[0][5]="Итого" ;

StringGrid2->Cells[0][6]="Вспомогательные рабочие" ;

StringGrid2->Cells[0][7]="Слесарь КИПиА" ;

StringGrid2->Cells[0][8]="Ремонтный слесарь" ;

StringGrid2->Cells[0][9]="Слесарь электрик" ;

StringGrid2->Cells[0][10]="Грузчик" ;

StringGrid2->Cells[0][11]="Крановщик" ;

StringGrid2->Cells[0][12]="Водитель" ;

StringGrid2->Cells[0][13]="Итого" ;

StringGrid2->Cells[0][14]="Всего" ;

}

void __fastcall TForm1: Button1Click (TObject *Sender)

{

// Переменные

int gf=365*24;

int nomfond=(365−52−11)*8;

int brigad= gf/nomfond;

int chfaktnvd=365*8*12/(16*52);

int np=abs ((40-chfaktnvd)*52/8);

int kvix=ceil (double (365*4)/double (16));

StringGrid1->Cells[1][1]="365″ ;

StringGrid1->Cells[1][2]=IntToStr (kvix);

StringGrid1->Cells[1][3]=IntToStr (365-kvix);

StringGrid1->Cells[1][5]=LabeledEdit1->Text;

StringGrid1->Cells[1][6]=LabeledEdit2->Text;

StringGrid1->Cells[1][7]=LabeledEdit3->Text;

StringGrid1->Cells[1][9]=FloatToStr (365-kvix-StrToInt (LabeledEdit1->Text)-StrToInt (LabeledEdit2->Text)-StrToInt (LabeledEdit3->Text));

StringGrid1->Cells[1][10]= FloatToStr ((365-kvix-StrToInt (LabeledEdit1->Text)-StrToInt (LabeledEdit2->Text)-StrToInt (LabeledEdit3->Text))*8);

// расчет коэффициента

double kk;

kk=double (StrToInt (StringGrid1->Cells[1][3]))/double (StrToInt (StringGrid1->Cells[1][9]));

kk=floor (kk*100)/100;

StringGrid1->Cells[1][11]=kk;

StringGrid2->Cells[1][2]=LabeledEdit4->Text;

StringGrid2->Cells[1][3]=LabeledEdit5->Text;

StringGrid2->Cells[1][4]=LabeledEdit6->Text;

StringGrid2->Cells[2][2]= Edit1->Text;

StringGrid2->Cells[2][3]= Edit2->Text;

StringGrid2->Cells[2][4]= Edit3->Text;

StringGrid2->Cells[3][2]= «3» ;

StringGrid2->Cells[3][3]= «3» ;

StringGrid2->Cells[3][4]= «3» ;

StringGrid2->Cells[4][2]= IntToStr (StrToInt (StringGrid2->Cells[1][2])*StrToInt (StringGrid2->Cells[2][2]));

StringGrid2->Cells[4][3]= IntToStr (StrToInt (StringGrid2->Cells[1][3])*StrToInt (StringGrid2->Cells[2][3]));

StringGrid2->Cells[4][4]= IntToStr (StrToInt (StringGrid2->Cells[1][4])*StrToInt (StringGrid2->Cells[2][4]));

StringGrid2->Cells[4][5]=IntToStr (StrToInt (StringGrid2->Cells[4][2])+ StrToInt (StringGrid2->Cells[4][3])+StrToInt (StringGrid2->Cells[4][4]));

StringGrid2->Cells[5][2]= IntToStr (StrToInt (StringGrid2->Cells[3][2])*StrToInt (StringGrid2->Cells[4][2]));

StringGrid2->Cells[5][3]= IntToStr (StrToInt (StringGrid2->Cells[3][3])*StrToInt (StringGrid2->Cells[4][3]));

StringGrid2->Cells[5][4]= IntToStr (StrToInt (StringGrid2->Cells[3][4])*StrToInt (StringGrid2->Cells[4][4]));

StringGrid2->Cells[5][5]=IntToStr (StrToInt (StringGrid2->Cells[5][2])+ StrToInt (StringGrid2->Cells[5][3])+StrToInt (StringGrid2->Cells[5][4]));

StringGrid2->Cells[6][2]=IntToStr (StrToInt (StringGrid2->Cells[4][2])+ StrToInt (StringGrid2->Cells[5][2]));

StringGrid2->Cells[6][3]=IntToStr (StrToInt (StringGrid2->Cells[4][3])+ StrToInt (StringGrid2->Cells[5][3]));

StringGrid2->Cells[6][4]=IntToStr (StrToInt (StringGrid2->Cells[4][4])+ StrToInt (StringGrid2->Cells[5][4]));

StringGrid2->Cells[6][5]=IntToStr (StrToInt (StringGrid2->Cells[6][2])+ StrToInt (StringGrid2->Cells[6][3])+StrToInt (StringGrid2->Cells[6][4]));

StringGrid2->Cells[7][2]=kk;

StringGrid2->Cells[7][3]=kk;

StringGrid2->Cells[7][4]=kk;

StringGrid2->Cells[8][2]= ceil (kk*double (StrToInt (StringGrid2->Cells[6][2])));

StringGrid2->Cells[8][3]= ceil (kk*double (StrToInt (StringGrid2->Cells[6][3])));

StringGrid2->Cells[8][4]= ceil (kk*double (StrToInt (StringGrid2->Cells[6][4])));

StringGrid2->Cells[8][5]= IntToStr (StrToInt (StringGrid2->Cells[8][2])+StrToInt (StringGrid2->Cells[8][3])+ StrToInt (StringGrid2->Cells[8][4]));

StringGrid2->Cells[3][7]="3″ ;

StringGrid2->Cells[3][8]="3″ ;

StringGrid2->Cells[3][9]="3″ ;

StringGrid2->Cells[3][10]="3″ ;

StringGrid2->Cells[3][11]="3″ ;

StringGrid2->Cells[3][12]="3″ ;

StringGrid2->Cells[4][7]=LabeledEdit7->Text;

StringGrid2->Cells[4][8]=LabeledEdit8->Text;

StringGrid2->Cells[4][9]=LabeledEdit9->Text;

StringGrid2->Cells[4][10]=LabeledEdit10->Text;

StringGrid2->Cells[4][11]=LabeledEdit11->Text;

StringGrid2->Cells[4][12]=LabeledEdit12->Text;

StringGrid2->Cells[4][13]=IntToStr (StrToInt (StringGrid2->Cells[4][7])+ StrToInt (StringGrid2->Cells[4][8])+StrToInt (StringGrid2->Cells[4][9])+StrToInt (StringGrid2->Cells[4][10])+StrToInt (StringGrid2->Cells[4][11])+StrToInt (StringGrid2->Cells[4][12]));

StringGrid2->Cells[5][7]= IntToStr (StrToInt (StringGrid2->Cells[4][7])*StrToInt (StringGrid2->Cells[3][7]));

StringGrid2->Cells[5][8]= IntToStr (StrToInt (StringGrid2->Cells[4][8])*StrToInt (StringGrid2->Cells[3][8]));

StringGrid2->Cells[5][9]= IntToStr (StrToInt (StringGrid2->Cells[4][9])*StrToInt (StringGrid2->Cells[3][9]));

StringGrid2->Cells[5][10]= IntToStr (StrToInt (StringGrid2->Cells[4][10])*StrToInt (StringGrid2->Cells[3][10]));

StringGrid2->Cells[5][11]= IntToStr (StrToInt (StringGrid2->Cells[4][11])*StrToInt (StringGrid2->Cells[3][11]));

StringGrid2->Cells[5][12]= IntToStr (StrToInt (StringGrid2->Cells[4][12])*StrToInt (StringGrid2->Cells[3][12]));

StringGrid2->Cells[5][13]=IntToStr (StrToInt (StringGrid2->Cells[5][7])+ StrToInt (StringGrid2->Cells[5][8])+StrToInt (StringGrid2->Cells[5][9])+StrToInt (StringGrid2->Cells[5][10])+StrToInt (StringGrid2->Cells[5][11])+StrToInt (StringGrid2->Cells[5][12]));

StringGrid2->Cells[6][7]= IntToStr (StrToInt (StringGrid2->Cells[4][7])+StrToInt (StringGrid2->Cells[5][7]));

StringGrid2->Cells[6][8]= IntToStr (StrToInt (StringGrid2->Cells[4][8])+StrToInt (StringGrid2->Cells[5][8]));

StringGrid2->Cells[6][9]= IntToStr (StrToInt (StringGrid2->Cells[4][9])+StrToInt (StringGrid2->Cells[5][9]));

StringGrid2->Cells[6][10]= IntToStr (StrToInt (StringGrid2->Cells[4][10])+StrToInt (StringGrid2->Cells[5][10]));

StringGrid2->Cells[6][11]= IntToStr (StrToInt (StringGrid2->Cells[4][11])+StrToInt (StringGrid2->Cells[5][11]));

StringGrid2->Cells[6][12]= IntToStr (StrToInt (StringGrid2->Cells[4][12])+StrToInt (StringGrid2->Cells[5][12]));

StringGrid2->Cells[6][13]=IntToStr (StrToInt (StringGrid2->Cells[6][7])+ StrToInt (StringGrid2->Cells[6][8])+StrToInt (StringGrid2->Cells[6][9])+StrToInt (StringGrid2->Cells[6][10])+StrToInt (StringGrid2->Cells[6][11])+StrToInt (StringGrid2->Cells[6][12]));

StringGrid2->Cells[7][7]=kk;

StringGrid2->Cells[7][8]=kk;

StringGrid2->Cells[7][9]=kk;

StringGrid2->Cells[7][10]=kk;

StringGrid2->Cells[7][11]=kk;

StringGrid2->Cells[7][12]=kk;

StringGrid2->Cells[8][7] = ceil (kk*double (StrToInt (StringGrid2->Cells[6][7])));

StringGrid2->Cells[8][8] = ceil (kk*double (StrToInt (StringGrid2->Cells[6][8])));

StringGrid2->Cells[8][9] = ceil (kk*double (StrToInt (StringGrid2->Cells[6][9])));

StringGrid2->Cells[8][10] = ceil (kk*double (StrToInt (StringGrid2->Cells[6][10])));

StringGrid2->Cells[8][11] = ceil (kk*double (StrToInt (StringGrid2->Cells[6][11])));

StringGrid2->Cells[8][12] = ceil (kk*double (StrToInt (StringGrid2->Cells[6][12])));

StringGrid2->Cells[8][13]=IntToStr (StrToInt (StringGrid2->Cells[8][7])+ StrToInt (StringGrid2->Cells[8][8])+StrToInt (StringGrid2->Cells[8][9])+StrToInt (StringGrid2->Cells[8][10])+StrToInt (StringGrid2->Cells[8][11])+StrToInt (StringGrid2->Cells[8][12]));

StringGrid2->Cells[8][14]=IntToStr (StrToInt (StringGrid2->Cells[8][13])+ StrToInt (StringGrid2->Cells[8][5]));

StringGrid2->Cells[6][14]=IntToStr (StrToInt (StringGrid2->Cells[6][13])+ StrToInt (StringGrid2->Cells[6][5]));

StringGrid2->Cells[5][14]=IntToStr (StrToInt (StringGrid2->Cells[5][13])+ StrToInt (StringGrid2->Cells[5][5]));

StringGrid2->Cells[4][14]=IntToStr (StrToInt (StringGrid2->Cells[4][13])+ StrToInt (StringGrid2->Cells[4][5]));

}