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


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


#include <owl\dialog.h>

#include <owl\edit.h>

#include <owl\checkbox.h>

#include <owl\opensave.h>

#include "28-2.h"

#include <stdio.h>

/*Глобальная переменная*/

TSB tsbArray [MAXENTRIES];//Массив карточек

/*Класс приложения, производный от Tapplication*/

class MyApp:public TApplication{

public:

void InitMainWindowt);//Замещаем функцию InitMainWindow

/*Класс главного окна, производный от TframeWindow*/

class MyWindow:public TFrameWindow{

public:

MyWindow(TWindow*parent,char far*title);

void Paint(TDC&,bool,TRect&);//Замещаем функцию Paint ()

void CmInput();//Функция отклика на пункт "Ввод данных"

void CmOpen();//Функция отклика на пункт "Открыть"

void CmSave();//Функция отклика на пункт "Сохранить"

DECLARE_RESPONSE_TABLE(MyWindow);

};

/*Класс окна диалога, производный от Tdialog*/ class MyDialog:public TDialog{

int index;//Номер текущей карточки

TSB tsb;//Структурная переменная для буфера обмена

public:

MyDialog(TWindow*,TResId);

void CmAdd() ;

DECLARE_RESPONSE_TABLE(MyDialog) ;

};

/*Таблица откликов класса MyWindow*/ DEFINE_RESPONSE_TABLE1(MyWindow,TFrameWindow)

EV_COMMAND(CM_INPUT,CmInput),

EV_COMMAND(CM_OPEN,CmOpen),

EV_COMMAND(CM_SAVE,CmSave), END_RESPONSE_TABLE; /*Конструктор главного окна*/ MyWindow::MyWindow(TWindow*parent,char far*title):TFrameWindow(parent,title) {

AssignMenu("MainMenu");

}

/*Функция откликов класса MyWindow*/ void MyWindow::CmInput(){

memset(&tsbArray,0,sizeof(TSB)*MAXENTRIES);//Очистим массив карточек

new MyDialog(this,INPUTDLG)->Execute();//Выполняем диалог

Invalidate();//Активизируем сообщение WM_PAINT для перерисовки главного окна


Диалоговые окна                                         259

}

void MyWindow::CmOpen(){

TOpenSaveDialog::TData fileData(OFN_FILEMUSTEXIST|OFN_PATHMUSTEXIST|

OFN_HIDEREADONLY,"Базы данных (*.dbf)| *.dbf|"); int result= new TFileOpenDialog(this,fileData)->Execute(); if(result==IDCANCEL)return;




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