Программирование под Win32


Программирование для Windows с помощью библиотеки объектов OWL - стр. 77


char far* GetClassName();//Замещаем функцию для класса Quest

void GetWindowClass(WNDCLASS&);//Замещаем функцию для класса Quest

void Paint(TDC&dc,bool,TRect&);//Замещаем функцию для класса Quest

void EvLButtonDown(UINT,TPoint&);//Назначаем функцию отклика для класса Quest

DECLARE_RESPONSE_TABLE(Quest);//Объявляем таблицу откликов };

/*Функции-члены класса Quest*/ DEFINE_RESPONSE_TABLE1(Quest,TWindow)//Описываем таблицу откликов

EV_WM_LBUTTONDOWN,//Только сообщения от левой клавиши мыши END_RESPONSE_TABLE; char far* Quest::GetClassName(){

return "Quest";//Назначаем имя этому классу

} void Quest::GetWindowClass(WNDCLASS& wc){

TWindow::GetWindowClass(wc); //Вызываем замещенную функцию

wc.hCursor=GetApplication()->TModule::LoadCursor ("Hand"); //Назначаем курсор

} void Quest::Paint(TDC&dc,bool,TRect&){

dc.SetTextColor(TColor(0,128,0));//Назначаем вопросным строкам зеленый цвет

TRect rect=GetClientRect();//Получаем рабочую область

dc.DrawText//Выводим соответствующую строку текста (название главы)

(questStrings[questIndex],strlen(questStrings[questIndex]),rect,DT_LEFT);

}

/*Класс Contents всплывающих окон с содержанием глав, производный от Twindow*/ class Contents:public TWindow

{int сontIndex;//Номер объекта-окна для текста public:

Contents(TWindow* parent,const char far* title,int ind): TWindow(parent,title),contIndex(ind){

Attr.Style=WS_VISIBLE|WS_THICKFRAME|WS_SYSMENU|WS_POPUP|WS_CAPTION;}//Конструктор

void GetWindowClass(WNDCLASS&);//Замещаем функцию для класса Contents

void Paint(TDC&dc,bool,TRect&);//Замещаем функцию для класса Contents

};

/*Функции-члены класса Contents*/ char far* Contents::GetClassName(){

return "Contents";//Назначаем имя этому классу

} void Contents::GetWindowClass(WNDCLASS& wc){

TWindow::GetWindowClass(wc);//Вызываем замещенную функцию

wc.style=CS_VREDRAW|CS_HREDRAW;// Для перерисовки при изменении размеров

void Contents: :Paint(TDC&dc,bool,TRect&) {




Начало  Назад  Вперед