39 lines
944 B
C
39 lines
944 B
C
/* DEWSERV.C */
|
|
|
|
#include <demo.g>
|
|
#include <hwim.h>
|
|
|
|
GLREF_D WSERV_SPEC *wserv_channel;
|
|
|
|
LOCAL_C INT StatusWindowWidth(VOID)
|
|
{
|
|
P_EXTENT ext;
|
|
|
|
wInquireStatusWindow(-1,&ext);
|
|
return(ext.width);
|
|
}
|
|
|
|
LOCAL_C VOID InitClientWindow(PR_DEWSERV *self)
|
|
{
|
|
W_WINDATA wd;
|
|
PR_WIN *cliwin;
|
|
|
|
wd.extent.tl.x=wd.extent.tl.y=0;
|
|
wd.extent.height=wserv_channel->conn.info.pixels.y;
|
|
wd.extent.width=wserv_channel->conn.info.pixels.x-StatusWindowWidth();
|
|
cliwin=f_newsend(CAT_DEMO_HWIM,C_BWIN,O_WN_CONNECT,NULL,W_WIN_EXTENT,&wd);
|
|
self->wserv.cli=cliwin;
|
|
cliwin->win.flags=PR_BWIN_CORNER_4|PR_BWIN_SHADOW_1;
|
|
p_send3(cliwin,O_WN_EMPHASISE,TRUE);
|
|
hInitVis(cliwin);
|
|
}
|
|
|
|
#pragma METHOD_CALL
|
|
|
|
METHOD VOID dewserv_ws_dyn_init(PR_DEWSERV *self)
|
|
{
|
|
wsSetList(W_STATUS_WINDOW_ICON,NULL,0);
|
|
wStatusWindow(W_STATUS_WINDOW_BIG);
|
|
InitClientWindow(self);
|
|
}
|