Класс CAktPoisk

1) Создание ресурса диалогового окна с идентификатором IDD_AKTPOISK.

Создать следующую форму диалогового окна поиска, замены, удаления записей файла Акт (рис. 10.7)

Акты-Поиск

Таб. номер Вид работы _ Разряд Объем _ Таб. номер-поиск _ Поиск Следующая Замена/Удаление

Рис. 10.7. Диалоговое окно поиска, замены, удаления записей файла Акт

- Создать шаблон диалогового окна.

Для этого выполнить команду Project-> Add Resource.

В появившемся окне Add Resource дважды щелкнуть на элементе

Dialog в списке Resource Type Появляется шаб-

лон диалогового окна с идентификатором IDD_DIALOG1 и заголовком Dialog, а также панели инструментов Dialog Editor и Toolbox. В окне имеются две кнопки OK и Cancel. Отмасштабировать окно.

- В окне свойств окна Properties изменить значение свойства ID с IDD_DIALOG1 на IDD_AKTPOISK, а также – значение свойства Caption с Dialog на Акты-Поиск/Замена/Удаление.

- Установить язык Русский. Для этого в окне Resource View щелкнуть на идентификаторе IDD_AKTPOISK. В появившемся окне свойств Properties щелкнуть на свойстве Language и в списке выбрать язык Русский.

- Добавить в диалоговое окно элементы управления: пять надписи (инструмент Static Text), пять текстовых полей (Edit Control) и три кнопки. Щелкнуть сначала на инструменте панели инструментов Toolbox, а затем - в выбранной области диалогового окна. Для изменения свойств элементов щелкнуть на элементе и в окне свойств Properties ввести значения: для надписей только в свойство Caption – Таб. Номер, Разряд, Вид работы, Объем, Таб. номер - поиск; для текстовых полей в свойство ID – IDC_TABN, IDC_RAZRJAD, IDC_VIDRAB, IDC_OBJEM, IDC_TABN_POISK; для кнопки Поиск в свойство ID – IDC_AKT_POISK и в свойство Caption - Поиск; для кнопки Следующая в свойство ID – IDC_AKT_SLED и в свойство Caption – Следующая;. для кнопки Замена/Удаление в свойство ID – IDC_AKT_ZAM_UD и в свойство Caption – Замена/Удаление.

2) Создание класса диалогового окна.

- Открыть шаблон диалогового окна при отсутствии его. Для этого щелкнуть на вкладке Resource View или выполнить команду View->Resource View и в появившемся окне Resource View открыть папки Pr, Pr.rc, затем – Dialog и дважды щелкнуть на идентификаторе IDD_AKTPOISK.

- Щелкнуть правой кнопкой мыши на пустом месте диалогового окна и выполнить команду контекстного меню Add Class. Откроется окно мастера MFC Class Wizard.

- Ввести в поле Class name имя нового класса CAktPoisk, в списке Base class выбрать имя CDialog, проверить наличие в свойстве Dialog ID идентификатора IDD_AKTPOISK, и затем щелкнуть на кнопке Finish.

3) Связывание элементов управления диалогового окна с

функциями-обработчиками сообщений

Связать кнопку Поиск.

- Открыть окно Class View и щелкнуть на имени класса CAktPoisk. Появится окно свойств Properties.

- Щелкнуть на кнопке Events и в появившемся списке идентификаторов раскрыть идентификатор IDC_AKT_POISK (щелкнуть на символе +). Появляется список сообщений

- Выбрать элемент BN_CLICKED, а в комбинированном списке справа щелкнуть на команде <Add> OnBnClickedAktPoisk(). Прототип новой функции-обработчика будет добавлен в файл AktPoisk.h, а ее текст – в файл AktPoisk.cpp.

- Аналогично связать кнопку Следующая (IDC_AKT_SLED) с функцией-обработчиком OnBnClickedAktSled().Прототип новой функции-обработчика будет добавлен в файл AktPoisk.h, а ее текст – в файл AktPoisk.cpp.

- Аналогично связать кнопку Замена/Удаление (идентификатор IDC_AKT_ZAM_UD) с функцией-обработчиком OnBnClicked-AktZamUd(). Прототип новой функции-обработчика будет добавлен в файл AktPoisk.h, а ее текст – в файл AktPoisk.cpp.

4) Связывание переменных класса с элементами окна

Связать с текстовым полем Таб. номер.

- Запустить мастер создания переменных класса Add Member Variable Wizard. Для этого открыть окно Class View и выделить имя класса CAktPoisk. Затем выполнить команду Project->Add Variable.

- В появившемся окне Add Member Variable Wizard-Pr выполнить следующее: установить флажок Control variable; в списке Control ID выбрать идентификатор текстового поля IDC_TABN; в списке Category выбрать значение value; в списке Variable type появится CString; ввести в поле Variable name строку m_strTabn; в списке Access проверить наличие элемента public; и наконец, щелкнуть на кнопке Finish. Появляется содержимое файла AktPoisk.cpp с функциями класса CAktPoisk.

- Аналогично связать с текстовыми полями Разряд (IDC_ RAZRJAD), Вид работы (IDC_VIDRAB), Объем (IDC_OBJEM), Таб. номер-поиск (IDC_TABN_POISK) переменные класса m_strRazrjad, m_strVidrab, m_strObjem, m_strTabnPoisk.

- Аналогично связать с кнопкой Замена/Удаление (IDC_AKT_ZAM_UD) переменную класса m_ctrlZamUd, причем в списке Category должно быть значение control, а в списке Variable type – CButton.

5) Добавление функции-обработчика OnInitDialog().

Необходимо создать функцию CAktPoisk::OnIninDialog(), которая вызывается непосредственно перед отображением диалогового окна.

- Открыть окно Class View и щелкнуть на имени класса CAkt-Poisk. Появится окно свойств Properties.

- Щелкнуть на кнопке Overrides (с изображением зеленого ромба) и в списке функций выбрать элемент OnInitDialog(), а в комбинированном списке справа щелкнуть на команде <Add> OnInitDialog(). Прототип новой функции-обработчика будет добавлен в файл AktPoisk.h, а ее текст – в файл AktPoisk.cpp.

- Заменить текст функции:

BOOL CAktPoisk::OnInitDialog()

{

CDialog::OnInitDialog(); //GetDlgItem-возвр. указатель на элем.

GetDlgItem(IDC_TABN)->EnableWindow(FALSE);//блокир.

GetDlgItem(IDC_RAZRJAD)->EnableWindow(FALSE);//элем.

GetDlgItem(IDC_VIDRAB)->EnableWindow(FALSE);//управл.

GetDlgItem(IDC_OBJEM)->EnableWindow(FALSE);

GetDlgItem(IDC_AKT_SLED)->EnableWindow(FALSE);

if (AktMode==3) //замена названия кнопки Зам/Уд на Удаление

m_ctrlZamUd.SetWindowText("Удаление");//присваив. кнопке

if (AktMode==1) //строковую константу

GetDlgItem(IDC_AKT_ZAM_UD)->ShowWindow(FALSE);

if ((AktMode==2)||(AktMode==3)) //Show-отсут. отображ. кнопки

GetDlgItem(IDC_AKT_ZAM_UD)->EnableWindow(FALSE);

return TRUE; //Enable – блокировка

}

6) Добавление текстов вспомогательных функций и функций-обработчиков в файл AktPoisk.cpp.

- Добавить:...

extern int AktMode; //объявление перем.,определение – в MainFrm

...

m_str...=_T(“”);

{

base.Init(); //вызов Init в конструкторе класса CAktPoisk

ind=0; //инициализ. индекса массива и

nomer=0; //инициализ. номера записи

} //в конструкторе класса CAktPoisk

- Добавить вспомогательные функции Output(), Input(), ClearForm(), CheckInput():

void CAktPoisk::Output(CAkt &base) //вывод записи в диалог. окно

{

m_strTabn=base.Tabn; //присваивание полей записи переменным

m_strRazrjad=base.Razrjad; //m_str…

m_strVidrab=base.VidRab;

m_strObjem=base.Objem;

UpdateData(FALSE); //значения перем. m_str… - в текстовые поля

}

void CAktPoisk::Input(CAkt &base) //ввод из текст. полей в запись

{

UpdateData(TRUE); //значения текст. полей – в переменные m_str…

base.Tabn=m_strTabn; //присваивание полям записи

base.Razrjad=m_strRazrjad; // значения m_str…

base.VidRab=m_strVidrab;

base.Objem=m_strObjem;

}

void CAktPoisk::ClearForm() //очистка окна

{

m_strTabn=""; //обнуление переменных m_str…

m_strRazrjad="";

m_strVidrab="";

m_strObjem="";

m_strTabnPoisk="";

UpdateData(FALSE); //значения перем. m_str… - в текстовые поля

}

BOOL CAktPoisk::CheckInput() //проверка ввода данных

{

UpdateData(TRUE); //значения текстовых полей – в перем. m_str…

if(m_strTabn=="")

{

MessageBox("Введите Таб. номер","Ошибка ввода",

MB_ICONEXCLAMATION); //выводимое значение,

return FALSE; //заголовок, восклицат. знак

}

if (m_strRazrjad=="")

{

MessageBox("Введите Разряд","Ошибка ввода",

MB_ICONEXCLAMATION);

return FALSE;

}

if (m_strVidrab=="")

{

MessageBox("Введите код работы","Ошибка ввода",

MB_ICONEXCLAMATION);

return FALSE;

}

if (m_strObjem=="")

{

MessageBox("Введите Объем","Ошибка ввода",

MB_ICONEXCLAMATION);

return FALSE;

}

return TRUE;

}

- Добавить для кнопки Поиск текст функции-обработчика OnBnClickedAktPoisk().

void CAktPoisk::OnBnClickedAktPoisk()

{

ind=0; //индекс найденного элемента индексного массива

nomer=0; //номер найденной записи

UpdateData(TRUE); //значение текстового поля – в перем. m_str…

if(m_strTabnPoisk=="")

{

MessageBox("Введите Таб. номер-поиск","Ошибка ввода",

MB_ICONEXCLAMATION); //выводимое значение,

return; //заголовок, восклицат. знак

}

ind = base.poisk_ind(m_strTabnPoisk,ind,nomer); //поиск в инд.

if (ind!=-1) //массиве номера записи (nomer) и индекса (ind)

{ //запись найдена

base.ChtenieZap(nomer); //чтение найденной записи

Output(base); //вывод записи в диалоговое окно

ind++;

GetDlgItem(IDC_TABN)->EnableWindow(TRUE);//доступн.

GetDlgItem(IDC_RAZRJAD)->EnableWindow(TRUE);//элем.

GetDlgItem(IDC_VIDRAB)->EnableWindow(TRUE);//управл.

GetDlgItem(IDC_OBJEM)->EnableWindow(TRUE);

GetDlgItem(IDC_AKT_SLED)->EnableWindow(TRUE);

GetDlgItem(IDC_AKT_ZAM_UD)->EnableWindow(TRUE);

}

else //запись не найдена

{

MessageBox("Запись не найдена","Ошибка",

MB_ICONEXCLAMATION);

ind=0;

nomer=0;

ClearForm(); //очистка формы

return;

}

}

- Добавить для кнопки Следующая текст функции-обработчика OnBnClickedAktSled().

void CAktPoisk::OnBnClickedAktSled()

{

ind = base.poisk_ind(m_strTabnPoisk,ind,nomer); //поиск в инд.

if (ind!=-1) //массиве номера записи (nomer) и индекса (ind)

{ //запись найдена

base.ChtenieZap(nomer); //чтение найденной записи

Output(base); //вывод записи в диалоговое окно

ind++;

}

else//запись не найдена

{

MessageBox("Запись не найдена","Ошибка",

MB_ICONEXCLAMATION);

ind=0;

ClearForm();

GetDlgItem(IDC_AKT_SLED)->EnableWindow(FALSE);

GetDlgItem(IDC_AKT_ZAM_UD)->EnableWindow(FALSE);

return; //блокировка кнопок

}

- Добавить для кнопки Замена/Удаление текст функции-обработчика OnBnClickedAktZamUd().

void CAktPoisk::OnBnClickedAktZamUd()

{

if (AktMode==2) //замена

{

int rez;

rez=MessageBox("Корректировать запись?","Корректировка",

MB_OKCANCEL | MB_ICONQUESTION);

if (rez==IDCANCEL) //если нажата клавиша CANCEL, то return

return; //если – OK, то продолжение

Input(base); //ввод из текстовых полей в запись

if (!CheckInput()) //CheckInput()-проверка ввода

return;

base.Zamena(nomer); //запись замененной записи в файл

ClearForm(); //очисткаформы, EnableWindow-блокировка кнопок

GetDlgItem(IDC_AKT_SLED)->EnableWindow(FALSE);

GetDlgItem(IDC_AKT_ZAM_UD)->EnableWindow(FALSE);

ind=0;

nomer=0;

}

if (AktMode==3) //удаление

{

int rez;

rez=MessageBox("Удалить запись?","Удаление",

MB_OKCANCEL | MB_ICONQUESTION);

if (rez==IDCANCEL)

return;

base.Udalenie(nomer); //удаление записи и коррек. инд. массива

ClearForm();//очисткаформы, EnableWindow-блокировка кнопок

GetDlgItem(IDC_AKT_SLED)->EnableWindow(FALSE);

GetDlgItem(IDC_AKT_ZAM_UD)->EnableWindow(FALSE);

ind=0;

nomer=0;

}

}

7) Добавление прототипов вспомогательных функций в файл AktPosk.h.

#include “Akt.h”

class CAktPoisk: public CDialog

{

public:

CAkt base; //объявление объекта класса CAkt в классе CAktPoisk

int ind; //индекс элемента индексного массива

int nomer; //номер записи

void Output(CAkt &base); //вывод записи в диалоговое окно

void Input(CAkt &base); //ввод из текстовых полей в запись

void ClearForm(); //очистка формы

BOOL CheckInput(); //проверка ввода данных с клавиатуры

...

8) Добавление текстов функций вызова диалоговых окон в файл MainFrm.cpp.

#include “AktPoisk.h”

void CMainFrame::OnAktpoisk()

{

AktMode=1;

CAktPoisk dlg;

dlg.DoModal();

}

void CMainFrame::OnAktzam()

{

AktMode=2;

CAktPoisk dlg;

dlg.DoModal();

}

void CMainFrame::OnAktud()

{

AktMode=3;

CAktPoisk dlg;

dlg.DoModal();

}