DEFINE MDI WINDOW

The multiple-document interface (MDI) is a specification that defines a user interface for applications that enable the user to work with more than one document at the same time.

SYNTAX

Mdi Windows:

DEFINE WINDOW <WindowName>
AT <nRow> ,<nCol>
WIDTH <nWindth>
HEIGHT <nHeight>
[ VIRTUAL WIDTH <nVirtualWindth> ]
[ VIRTUAL HEIGHT <nVirtualHeight> ]
[ TITLE <cTitle> ]
[ ICON <cIconName> ]
MAIN
MDI
[ NOSHOW ]
[ TOPMOST ]
[ NOAUTORELEASE ]
[ NOMINIMIZE ]
[ NOMAXIMIZE ]
[ NOSIZE ]
[ NOSYSMENU ]
[ NOCAPTION ]
[ CURSOR <CursorName> ]
[ ON INIT<InitProcedureName> | <bBlock> ]
[ ON RELEASE <ReleaseProcedureName> | <bBlock> ]
[ ON INTERACTIVECLOSE <InteractiveCloseProcedureName> | <bBlock> ]
[ ON MOUSECLICK<MouseClickProcedureName> | <bBlock> ]
[ ON MOUSEDRAG<MouseDragProcedureName> | <bBlock> ]
[ ON MOUSEMOVE<MouseMoveProcedureName> | <bBlock> ]
[ ON SIZE<WindowSizeProcedureName> | <bBlock> ]
[ ON MAXIMIZE <WindowMaximizeProcedureName> | <bBlock> ]
[ ON MINIMIZE <WindowMinimizeProcedureName> | <bBlock> ]
[ ON RESTORE <WindowRestoreProcedureName> | <bBlock> ]
[ ON PAINT<WindowPaintProcedureName> | <bBlock> ]
[ BACKCOLOR <anBackColor> ]
[ FONT <cFontName> SIZE <nFontSize> ]
[ NOTIFYICON <cNotifyIconName> ]
[ NOTIFYTOOLTIP <cNotifyTooltip> ]
[ ON NOTIFYCLICK <NotifyClickProcedure> | <bBlock> ]
[ ON GOTFOCUS <ProcedureName> | <bBlock> ]
[ ON LOSTFOCUS <ProcedureName> | <bBlock> ]
[ ON SCROLLUP <ProcedureName> | <bBlock> ]
[ ON SCROLLDOWN <ProcedureName> | <bBlock> ]
[ ON SCROLLLEFT <ProcedureName> | <bBlock> ]
[ ON SCROLLRIGHT <ProcedureName> | <bBlock> ]
[ ON HSCROLLBOX <ProcedureName> | <bBlock> ]
[ ON VSCROLLBOX <ProcedureName> | <bBlock> ]
[ HELPBUTTON ]

... Control Definitions...

END WINDOW

MdiChild Windows:

DEFINE WINDOW <WindowName>
WIDTH <nWindth>
HEIGHT <nHeight>
[ TITLE <cTitle> ]
MDICHILD
[ NOCAPTION ]
[ CURSOR <CursorName> ]
[ FONT <cFontName> SIZE <nFontSize> ]
[ FOCUSED ]
[ NOMINIMIZE ]
[ NOMAXIMIZE ]
[ NOVSCROLL ]
[ NOHSCROLL ]
[ ON INIT<InitProcedureName> | <bBlock> ]
[ ON RELEASE<ReleaseProcedureName> | <bBlock> ]
[ ON INTERACTIVECLOSE <InteractiveCloseProcedureName> | <bBlock> ]
[ ON MOUSECLICK<MouseClickProcedureName> | <bBlock> ]
[ ON GOTFOCUS <ProcedureName> | <bBlock> ]
[ ON LOSTFOCUS <ProcedureName> | <bBlock> ]
[ ON SIZE <WindowSizeProcedureName> | <bBlock> ]
[ ON MAXIMIZE <WindowMaximizeProcedureName> | <bBlock> ]
[ ON MINIMIZE <WindowMinimizeProcedureName> | <bBlock> ]

... Control Definitions...

END WINDOW

Commands for MDI CHILD Windows support:

FETCH ACTIVE MDICHILD TO <nHandle>

CLOSE ACTIVE MDICHILD

TILE MDICHILDS HORIZONTAL

TILE MDICHILDS VERTICAL

CASCADE MDICHILDS

ARRANGE MDICHILD ICONS

RESTORE MDICHILDS ALL

CLOSE MDICHILDS ALL

NOTE:

Any number of child windows can appear in the client window at any one time, but only one can be active. The active child window is positioned in front of all other child windows, and its border is highlighted.

WINDOW PROPERTIES:

WINDOW METHODS:

EXAMPLE: