Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Full screen window

1 view
Skip to first unread message

Alan Jones

unread,
May 22, 2008, 11:25:56 AM5/22/08
to
Using BCC 5.02 OWL. How do I create a window that completely fills the
screen and covers up the Windows menu bar of my application? Any window I
create now is a Child window and, apparently, must live within the Client
area.

Alan


Sebastian Ledesma [Solidyne Labs]

unread,
May 22, 2008, 11:37:07 AM5/22/08
to
Hola Alan:

Try this:

void TMyApp::InitMainWindow() {
TSDIDecFrame* frame = new TSDIDecFrame(0, GetName(), 0, false);
frame->SetFlag(wfShrinkToClient);

// Override the default window style for the main window.
frame->Attr.Style |= WS_CLIPCHILDREN | WS_VISIBLE | WS_POPUP ;
frame->Attr.Style &= ~(WS_BORDER | WS_CAPTION | WS_CHILD |
WS_MAXIMIZEBOX | WS_MINIMIZEBOX | WS_SYSMENU | WS_THICKFRAME);
...

SetMainWindow(frame);
}

void TSDIDecFrame::SetupWindow(){
TDecoratedFrame::SetupWindow();
// INSERT>> Your code here.
RECT desktopSize;
HWND hWndDesktop=GetDesktopWindow();
::GetWindowRect(hWndDesktop,&desktopSize);
SetWindowPos(NULL, 0, 0, desktopSize.right+4,desktopSize.bottom+1, 0);
}

Saludos
Sebastian


"Alan Jones" <Alan...@stny.rr.com> escribió en el mensaje
news:48359091$1...@newsgroups.borland.com...

0 new messages