BCX_ARC function

BCX_ARC function

Purpose: BCX_ARC draws an elliptical arc.

Syntax:


 RetVal% = BCX_ARC(hWnd, _
                    Left, _
                     Top, _
                   Right, _
                  Bottom, _
                     BCX, _
                     BCY, _
                     ECX, _
                     ECY  _
                  [, Pen] _
              [, DrawHDC])

Parameters:

hWnd Identifies the window where drawing takes place.
Left X-coordinate of the upper-left corner of a bounding rectangle.
Top Y-coordinate of the upper-left corner of a bounding rectangle.
Right X-coordinate of the lower-right corner of a bounding rectangle.
Bottom Y-coordinate of the lower-right corner of a bounding rectangle.
BCX X-coordinate of the starting point of the arc.
BCY Y-coordinate of the starting point of the arc.
ECX X-coordinate of the ending point of the arc.
ECY Y-coordinate of the ending point of the arc.
Pen [OPTIONAL] integer representing the RGB color code. The default is 0 which is a black pen.
DrawHDC [OPTIONAL] HDC(Handle to Device Context) pointing to an already open HDC. This is useful if a device context is to be written to many times. In this case the programmer is responsible for closing the HDC at the appropriate time.

Return Value:

RetVal% Nonzero integer if the function succeeds, zero if the function fails.

Example:


 GUI "BCX_ARC"
 
 SUB FORMLOAD
   GLOBAL Form1 AS HWND
   Form1 = BCX_FORM("BCX_ARC", 0, 0, 110, 110)
   BCX_SET_FORM_COLOR(Form1,QBCOLOR(14))
   CENTER(Form1)
   SHOW(Form1)
 END SUB
 
 
 BEGIN EVENTS
   SELECT CASE CBMSG
   CASE WM_PAINT
     CALL DrawStuff
   END SELECT
 END EVENTS
 
 
 SUB DrawStuff
   BCX_ARC(Form1,10,10,210,200,90,90,90,90,QBCOLOR(9))
   BCX_ARC(Form1,50,50,170,160,60,110,160,110,QBCOLOR(9))
   BCX_ARC(Form1,65,60,95,100,20,20,20,20,QBCOLOR(9))
   BCX_ARC(Form1,125,60,155,100,20,20,20,20,QBCOLOR(9))
 END SUB

Another example using the BCX_ARC function is BCX_GRAFX_DEMO.bas