Windows Functions Specific to Comet

 

COS.GetFrameWnd - Returns a handle to the frame window

 

On Entry:

On Exit: <cosCWnd$> contains a handle to the application frame

(contains menu/toolbar) window

 

 

COS.GetViewWnd - Returns a handle to the view window

 

On Entry:

On Exit: <cosCWnd$> contains a handle to the application view

(contains QCRT screen) window

 

 

COS.GetAppWin - Same as COS.GetViewWnd

 

 

COS.SizeViewToWindow - Resizes the view/frame windows to fit a specified window

 

On Entry: <cosCWnd$> contains a handle to the window whose size

will be matched.

On Exit:

 

 

COS.SizeViewToDialog - Resizes the view/frame windows to fit a currently active dialog

 

On Entry:

On Exit:

 

 

COS.SetViewSize - Sets the size of the view/frame windows.

 

On Entry: <cosWidth> contains the desired window width

 

<cosHeight> contains the desired window height

On Exit:

 


COS.SetCaption - Sets the caption on the Frame window title bar

 

On Entry: <cosCtlText$> contains the text to be copied

 

<cosState> contains one the modifiers

0 - Show specified caption alone

1 - Include standard caption with specified caption

On Exit:

 

 

COS.SetStatusMessage - Displays a status message on the bottom status bar.

 

On Entry: <cosCtlText$> contains the text to be copied

On Exit:

 

 

COS.MapCoswRect - Converts a rectangle from COSW units to pixels

 

On Entry: A rectangle specified in COSW units by the variables:

<cosLeft>

<cosTop>

<cosRight>

<cosBottom>

 

On Exit: The same rectangle specified in screen units (pixels) by the variables:

<cosLeft>

<cosTop>

<cosRight>

<cosBottom>

 


COS.GetCoswBaseUnits - Returns the factor by which COSW units are measured.

 

Each horizontal base unit is equal to 4 horizontal COSW units; each vertical base unit is equal to 8 vertical COSW units. Therefore, to convert COSW units to pixels, use the following formulas:

 

pixelX = (templateunitX * baseunitX) / 4

pixelY = (templateunitY * baseunitY) / 8

 

Similarly, to convert from pixels to COSW units, use the following formulas:

 

templateunitX = (pixelX * 4) / baseunitX

templateunitY = (pixelY * 8) / baseunitY

 

The multiplication is performed before the division to avoid rounding problems if base units are not divisible by 4 or 8.

 

On Entry:

On Exit: <cosWidth> contains the horizontal base unit (X)

<cosHeight> contains the vertical base unit (Y)

 

 

COS.CreateStatic - Creates a "static" control in a window

 

 

COS.CreateEdit - Creates a "edit" control in a window

 

 

COS.CreateListBox - Creates a "listbox" control in a window

 

 

COS.CreateComboBox - Creates a "combobox" control in a window

 

 

COS.CreateButton - Creates a "button" control in a window

 

 

COS.CreateControl - Creates a pre-defined control in a window

 

 

COS.DestroyControl Destroys the specified Window control

 

 

COS.DestroyAllControls Destroys all Windows controls