中国DOS联盟

/*
Example_1 - 对话窗口，按钮，文本编辑框 综合应用
使用自定义数据,SetObjVar,GetObjVar进行对象之间的信息交互
[url]www.ecub2006.com[/url]
*/
#include "gui.h"

typedef struct _MyWinData /* 自定义数据 */
{
char buf[256]; /* 用保存文本框的内容 */
HAND dlg_button;/* 对话窗口的OK按钮句柄*/
HAND dlg_textbox;/* 对话窗口的文本框句柄*/
}MyWinData,*PMyWinData;

void MyDialog(HAND hd,MESSAGE msg) /* 对话窗口的消息处理函数 */
{
PMyWinData pWin;/* 自定义数据的指针 */
HAND hdd=GetObjHost(hd); /* 获得主窗口的句柄*/
pWin=GetObjVar(hdd);/* 获得自定义数据 */
if(!pWin) return; /* 错误返回 */
if(msg.type == GM_SYSTEM) /* 系统类消息*/
        switch(msg.message)
        {
        case GM_Create:/* 创建文本框*/
                pWin->dlg_textbox=CreateObject(hd,TEXTBOX,4,1,"",10,40,150,60,0,0);
                /* 创建按钮 */
            pWin->dlg_button=CreateObject(hd,BUTTON,5,1,"OK",70,70,170,90,0,0);
                return;
        case GM_Destroy:
                return;
        default:
                return;
        }
if(msg.type == GM_COMMAND)/* 按钮消息*/
        switch(msg.message)
        {
        case 5:/* OK按钮 */
                efTextBox->Text(pWin->dlg_textbox,pWin->buf);/* 复制文本内容到buf*/
            efDialogWin->Quit(hd);/* 退出对话窗口 */
                return;
        default:
                return;
        }
}

void MyWin(HAND hd,MESSAGE msg)/* 主窗口消息处理函数 */
{
PMyWinData pWin;/* 自定义数据结构指针 */
if(msg.type == GM_SYSTEM) /* 系统类消息*/
        switch(msg.message)
        {
        case GM_Create:
                {
                /* 分配内存空间 */
                pWin=(PMyWinData)Gmalloc(sizeof(MyWinData),"");
                SetObjVar(hd,pWin);/* 设定对象的自定义数据 */
        /* 创建按钮 */
                CreateObject(hd,BUTTON,1,1,"输入",10,40,110,65,0,0);
                CreateObject(hd,BUTTON,2,1,"显示",10,70,110,95,0,0);
                }
                return;
        case GM_Destroy:
                {
                pWin=GetObjVar(hd);/* 获得自定义数据 */
                Gfree(pWin,sizeof(MyWinData));/* 释放内存空间 */
                }
                return;
        default:
                return;
        }
pWin=GetObjVar(hd);/* 获得自定义数据 */
if(!pWin) return;
if(msg.type == GM_COMMAND)
        switch(msg.message)
        {
        case 1:/* 启动一个对话窗口 */
                efDialogWin->Start(hd,3,1,"输入-对话窗口",10,40,200,140,MyDialog,0);
                return;
        case 2:/* 消息窗口 */
                MessageBox(hd,"信息",pWin->buf,MB_OK);
                return;
        default:
                return;
        }
}

int gmain(void *data)
{
        /* 创建窗口 */
        CreateObject(0,MAINWINDOW,1,1,"Ex1",10,10,630,300,MyWin,data);
        return 0;
}

/*
Dialog- 使用对话窗口，需要注意的地方。
[url]http://www.ecurb2006.[/url] com

当style 为 1 时，
如 ： CreateObject(0,MAINWINDOW,1,1,"Test",20,40,620,440,MyWin,0);
当对话窗口类的消息处理函数收到GM_Close时，回自动关闭窗口，销毁窗口。

需要说明的是，GUI的消息分发机制是
先将消息发送要对象类的消息函数，
再发送到对象的消息处理函数。

在这种情况下，产生GM_Close ，先发送对象类消息处理函数，
因为style为1，自动关闭窗口，销毁对象，会产生新的GM_Destroy消息。
这时，对象类的消息处理部分结束。(主窗口MAINWINDOW与对话窗口Dialog style 效果相同)

根据消息分发机制，这时对象的消息处理函数才收到GM_Close,接着收到GM_Destroy消息。
所以会造成 先收到 GM_Destroy 消息，再收到 GM_Close 消息。

这样会不会造成错误呢 ？答案是，只要正确使用就不会出问题。

如果希望接受GM_Close，再判断是否退出 对话窗口，只需将 style 设置为 3 就可以了。
当 style 为2 时，对话窗口类的消息处理函数，不处理GM_Close消息。

所以这时，在对话窗口的消息消息处理函数中，GM_Close 中使用 efDialogWin->Quit(HAND);来退出就可以了，
如果没有使用，那么对话窗口就不会退出，也不会销毁。


调用efDialogWin->Quit(HAND)后,会产生GM_Destroy消息。

可以修改下面这个例子中的style 值（第76行），来观察实际运行效果，更明确的理解如果使用对话窗口。

所以说，开始一个对话窗口后，GM_Create,GM_Destroy 只会产生一次。
当style 为2的时候，GM_Close 有可能多次产生(没有调用efDialogWin->Quit(HAND);来退出)

这样，当创建了分配空间，建立私有数据时，请在 GM_Create 里分配空间，在 GM_Destroy 里销毁（释放）.
*/

#include "../gui.h"

void MyDialog(HAND hd,MESSAGE msg)
{
void *buf;
if(msg.type == GM_SYSTEM)
switch(msg.message)
        {
        case GM_Create:
                MessageBox(hd,"GM_SYSTEM","GM_Create",0);
               
                return;
        case GM_Destroy:
                MessageBox(hd,"GM_SYSTEM","GM_Destroy",0);
                return;
    case GM_Close:
       MessageBox(hd,"GM_SYSTEM","GM_Close",0);
                return;
        default:
                return;
        }
}

void MyWin(HAND hd,MESSAGE msg)
{
if(msg.type == GM_SYSTEM)
switch(msg.message)
        {
        case GM_Create:
                CreateObject(hd,BUTTON,1,1,"Dialog",10,50,210,75,0,0);
                return;
        case GM_Destroy:
                return;
        default:
                return;
        }
if(msg.type == GM_COMMAND)
switch(msg.message)
        {
        case 1:/* 可以修改下面的style 值，来观察实际运行效果，更明确的理解如果使用对话窗口。 */
                efDialogWin->Start(hd,1,1,"MyDialog",10,30,180,200,MyDialog,0);
                /* efDialogWin->Start(hd,1,2,"MyDialog",10,30,180,200,MyDialog,0); */
                return;
        case 2:
                return;
        default:
                return;
        }
}

int gmain(void *data)
{
    CreateObject(0,MAINWINDOW,1,1,"Test",20,40,620,440,MyWin,0);
    return 0;
}