- •Кафедра вычислительных систем и программирования высокоуровневые методы информатики и программирования
- •Санкт-Петербург
- •1.Общие положения по организации
- •2. Программирование информационной мини-системы управления методом процедурно-ориентированного программирования (тема 2).
- •2.1. Постановка задачи и проектирование программы
- •2.2. Реализация программы
- •Vyvod(cout, client);
- •Vyvod(outprintf, client);
- •Void dobzap(fstream &dobf)
- •Int tabn;
- •Int operator!(); //элемент-функция класса
- •Int akt::operator!()
- •4. Блоки лабораторных работ по разделу «Объектно-
- •4.1. Блок по теме «Создание Windows-приложений»
- •4.2. Блоки по теме «Управление многооконными
- •4.2.1. Блок «Ввод/вывод информации»
- •Int k;//номер текущей вводимой строки
- •Invalidate();
- •If (!cursor)//если курсор еще не создан, надо создать.
- •Int X,y;//объявить переменные для хранения координат мыши
- •4.2.2. Меню, акселераторы, кнопки
- •Invalidate();
- •Invalidate(); }
- •4.2.3. Диалоговые окна
- •Invalidate();
- •4.2.4. Управление файловой обработкой
- •Invalidate(); //при вводе символа вид объявл. Не действительным
- •Void AddText(uint text) {data.AppendChar(text);} //доб. В конец стр.
- •Invalidate(); //при вводе символа вид объявл. Не действительным
- •Void Serialize(cArchive& archive);//прототип переопред. Функции
- •Void cData::Serialize(cArchive& archive)
- •If (archive.IsStoring())
- •Implement_serial(cData, cObject, 0)//класс,баз. Класс,номер
- •Invalidate();
- •Invalidate();
- •5.2. Блок по теме «Поддержка баз данных»
- •If (m_Add) //если true, то добавление записи
- •5.3. Блок по теме «Программирование для Internet»
- •If (!pIs) //2 проверка подключения компъютера к Internet
- •If (!pIs) //3 проверка подключения
- •If (!pFc) //5 проверка соединения с ftp-узлом
- •6. Рекомендуемая литература
- •7. Содержание
Invalidate();
}
}
- Вывести строку :
void ClabContView :: OnDraw (CDC* pDC)
{
ClabContDoc* pDoc = GetDocument();
ASSERT_VALID (pDoc);
if(!pDoc)
return;
pDC -> TextOut(0, 0, pDoc->StringData);}
Компиляция, запуск и тестирование приложения
- Скомпилировать приложение и запустить его на выполнение.
- Проверить алгоритм работы приложения-контейнера ActiveX: работу диалогового окна с кнопкой и текстовым полем с выводом строки.
- Вставить в контейнер диаграмму Excel.
Для этого запустить приложение Cont.
Выбрать команду Edit->Insert New Object. Появится диалоговое окно для внедрения или связывания объектов.
Выбрать новый объект Диаграмма Microsoft Excel и нажать OK. Диаграмма будет вставлена в контейнер.
Для отмены редактирования на месте нажать Esc. Диаграмма уменьшится и сдвинется влево. Все объекты помещаются в прямоугольник 200x200 пикселей.
labServ «Создание приложения-сервера»
Цель работы - создание приложения в виде сервера ActiveX. В качестве задачи возьмем приложение labCont, посвященное созданию диалогового окна с кнопкой и текстовым полем.
Для создания приложения–сервера ActiveX необходимо выполнить следующие этапы.
Создание проекта
Создать новый проект: задать имя проекта labServ, на 1-ом этапе выбрать MDI-приложение, на 2-ом этапе выбрать Full server, остальные – без изменений по умолчанию, щелкнув на Finish.
Сравнить меню приложения labServ с приложением lab3_2:
- Вызвать окно View->Resource View и открыть папку labServ.rc, затем - Menu. Появились два новых меню. Первое меню IDR_labServTYPE_SRVR_IP (SRVR – это согласные от слова server, IP – (in place) редактирование на месте). Это означает, что объект, содержащийся в контейнере, может быть отредактирован на месте. Для редактирования объединяются меню контейнера (например, из п.12.2 IDR_labContTYPE_CNTR_IP) и первое меню сервера. Второе меню IDR_labServTYPE_ SRVR_EMB (EMB – (embedded) встроенный) используется для редактирования в отдельном окне сервера.
- Щелкнуть дважды на втором меню. Появляется окно с командами нового меню. Это окно будет выводиться во время редактирования объекта в отдельном окне, т.е. в окне сервера. Открыть меню File. Появились новые 2 команды : Update вместо Save – модификация объекта; Save Copy As вместо Save As – копирование изменений объекта в файл, а не сохранение всего документа. Объект считается не самостоятельным документом, а объектом, внедренным в другой документ.
Включение новой команды Dialog в меню
- Открыть редактор меню, щелкнув на команде View->Resource View и открыв папку labServ.rc, затем – Menu. Дважды щелкнуть на строке IDR_labServTYPE. Выводятся команды нового меню.
- Добавить новую команду Dialog. Новая команда должна быть между командами View и Windows. Щелкнуть на пустой команде Type Here, ввести строку Dialog и нажать Enter. Перетащить с помощью мыши команду меню Dialog в позицию после View. Открыть окно Properties для новой команды меню Dialog, щелкнув сначала правой кнопкой на пункте Dialog, а затем - на Properties. Проверить наличие в свойстве Caption значения Dialog. Установить свойству Popup значение false и проверить идентификатор ID_Dialog.
- Подключить команду Dialog к приложению. Для этого открыть редактор меню, щелкнув на вкладке Resource View и открыв папку labServ.rc, затем – Menu. Дважды щелкнуть на строке IDR_labServTYPE. Выводятся команды меню. Щелкнуть правой кнопкой на команде Dialog и в открывшемся контекстном меню выбрать команду Add Event Handler (добавить обработчик события). Откроется окно Event Handler Wizard – labServ. Выбрать в списке Message Type сообщение Command, а в списке Class list – ClabServView. В поле Function handler name появится имя функции-обработчика OnDialog(). Щелкнуть на кнопке Add and Edit, и в окне редактора кода откроется шаблон созданной функции.
Создание ресурса диалогового окна
- Создать шаблон диалогового окна. Для этого выполнить команду Project-> Add Resource и в появившемся окне Add Resource дважды щелкнуть на элементе Dialog в списке Resource Type (или выбрать Dialog и щелкнуть на New). Появляется шаблон диалогового окна с именем IDD_DIALOG1 и панели инструментов Dialog Editor и Toolbox. В окне имеются 2 кнопки: OK и Сancel.
- Установить язык Русский. Для этого в окне Resource View открыть папку Dialog и щелкнуть на идентификаторе IDD_DIALOG1. В появившемся окне свойств Properties щелкнуть на свойстве Language и в списке справа выбрать значение Русский.
- Добавить в диалоговое окно элементы управления: текстовое поле и кнопку. Щелкнуть сначала на инструменте Edit Control (текстовое поле) панели инструментов Toolbox, а затем - в выбранной области диалогового окна. Появляется текстовое поле с надписью Sample edit box. Изменить размеры текстового поля, щелкнув в текстовом поле и пользуясь появившимися маркерами размеров (рамка с квадратами). Аналогично добавить кнопку, щелкнув на инструменте Button (кнопка), а затем в области диалогового окна. Появляется кнопка с надписью Button1.
- Изменить надписи элементов управления. Требуется изменить надпись кнопки Button1 на Output. Для изменения свойств диалогового окна открыть окно Properties (свойства), щелкнув правой кнопкой в свободной области окна, затем – на Properties. Щелкнуть на кнопке и ввести в качестве свойства Caption текст Output. Новая надпись вводится в кнопку.
- Проверить в свойстве ID идентификатор IDC_BUTTON1, присвоенный кнопке редактором диалоговых окон. Аналогично проверить идентификатор IDC_EDIT1, присвоенный текстовому полю.
Создание класса диалогового окна
- Открыть шаблон диалогового окна при отсутствии его. Для этого щелкнуть на вкладке Resource View или выполнить команду View->Resource View и в появившемся окне Resource View открыть папку labCont.rc, затем – Dialog и дважды щелкнуть на идентификаторе IDD_DIALOG1.
- Щелкнуть правой кнопкой мыши на пустом месте диалогового окна и выполнить команду контекстного меню Add Class. Откроется окно мастера MFC Class Wizard.
- Ввести в поле Class name имя нового класса CDlg, в списке Base class выбрать имя базового класса диалоговых окон CDialog, проверить наличие в поле Dialog ID идентификатора IDD _ DIALOG1, и затем щелкнуть на кнопке Finish.
Связывание элементов управления диалогового окна с
функциями-обработчиками сообщений
Требуется связать сообщение кнопки Output с функцией – обработчиком.
- Открыть окно Class View и щелкнуть правой кнопкой на имени класса CDlg. Появится окно свойств Properties.
- Щелкнуть на кнопке Event (с изображением желтой молнии) и в появившемся списке идентификаторов раскрыть узел IDC_ BUTTON1 (щелкнуть на символе +). Появляется список сообщений
- Выбрать элемент BN_CLICKED, а в комбинированном списке справа от идентификатора щелкнуть на команде <Add> OnBnClickedButton1. Прототип новой функции-обработчика OnBnClickedButton1() будет добавлен в файл Dlg.h, а ее текст – в файл Dlg.cpp. Функция OnBnClickedButton1() будет вызываться при нажатии кнопки Output.
Связывание переменных класса с элементами окна
- Запустить мастер создания переменных класса Add Member Variable Wizard. Для этого открыть окно Class View и выделить имя класса CDlg. Затем выполнить команду Project->Add Variable. Ибо щелкнуть правой кнопкой на имени класса Dlg и выполнить команду Add Add->Variable.
- В появившемся окне Add Member Variable Wizard-labServ выполнить следующее: установить флажок Control variable; в списке Control ID выбрать идентификатор текстового поля IDC_EDIT1; в списке Category выбрать значение value; в списке Variable type появится CString; ввести в поле Variable name строку m_text; в списке Access проверить наличие элемента public; и наконец, щелкнуть на кнопке Finish. Появляется содержимое файла Dlg.cpp с функциями класса CDlg.
- Задать содержимое текстового поля в функции-обработчике OnBnClickedButton1():
void CDlg :: OnBnClickedButton1 ()
{
m_text = “Диалоговое окно”;
}
- Обновить текстовое поле. Для чтения или записи содержимого элемента используется вызов функции UpdateData ():
void CDlg :: OnBnClickedButton1 ()
{
m_text = “Диалоговое окно”;
UpdateData (false);
}
Вызов функции UpdateData(false) с параметром false заносит в текстовое поле значение переменной m_text, вызов с параметром true присваивает переменной m_text содержимое текстового поля. Итак, строка перенесена в текстовое поле.
Переопределение функции для кнопки ОК
- Связать сообщение кнопки ОК с функцией-обработчиком.
Для этого открыть окно Class View и щелкнуть на имени класса CDlg. В окне свойств Properties щелкнуть на кнопке Event (События) и в появившемся списке идентификаторов раскрыть узел IDOK (щелкнуть на символе +). Появляется список сообщений. Выбрать элемент BN_CLICKED, а в комбинированном списке справа от идентификатора щелкнуть на команде <Add> OnBnClickedOk. Прототип новой функции-обработчика OnBnClickedOk() будет добавлен в файл Dlg.h, а ее текст – в файл Dlg.cpp. Функция OnBnClickedOk() будет вызываться при нажатии кнопки OK. На экране появится текст функции-обработчика OnBnClickedOk ().
- Занести в переменную m_text содержимое текстового поля. Для этого вызывается функция UpdateData (true):
void CDlg :: OnBnClickedOk ()
{//
UpdateData (true);
OnOK ();
}
Отображение диалогового окна
- Сообщить классу вида о существовании класса диалогового окна. Для этого включить в него файл заголовков класса CDlg - Dlg.h:
// labServView.cpp
# include “labServView.h”
# include “Dlg.h”
- Создать объект класса Dlg в классе вида:
void ClabServView :: OnDialog ()
{
CDlg dlg;
}
- Отобразить диалоговое окно на экране. Для этого вызвать функцию DoModal():
void ClabServView :: OnDialog ()
{//
CDlg dlg;
int result = dlg. DoModal(); //вызов диалогового окна и возврат
}//IDOK
- Проверить нажатие кнопки ОК:
void ClabServView :: OnDialog ()
{
CDlg dlg;
int result = dlg. DoModal();
if (result = = IDOK)
{ }
}
Получить указатель на документ:
void ClabServView :: OnDialog ()
{//...
if (result == IDOK)
{
ClabServDoc* pDoc = GetDocument();
ASSERT_VALID (pDoc);
}
}
- Создать в документе объект класса c именем StringData:
// labServDoc.h
class ClabServDoc :: public COleServerDoc
{ ...
public:
CString StringData;
}
- Поместить текст из переменной m_text в объект StringData:
void ClabServView :: OnDialog ()
{
if (result == IDOK)
{//...
ASSERT_VALID (pDoc);
pDoc -> StringData = dlg. m_text;
}
}
- Предусмотреть вызов Invalidate(). Вывод данных – в функции OnDraw (). Но сначала надо предусмотреть стирание прежней строки перед перерисовкой новой. Для этого – вызов функции класса вида Invalidate(). Эта функция и вызывает OnDraw ().
void ClabServView :: OnDialog ()
{//
if (
result == IDOK)
{//...
pDoc -> StringData = dlg. m_text;