/////////////////////////////////////////////////////////////////////
// INDEX OF CLASSES
/////////////////////////////////////////////////////////////////////
CLASS HBPRINTER
DATA AFTERPRINT INIT {|| NIL}
DATA AHS INIT {}
DATA AOPISY INIT {}
DATA ATH INIT {}
DATA AZOOM INIT {0,0,0,0}
DATA BASEDOC INIT ""
DATA BEFOREPRINT INIT {|| .T.}
DATA BEFOREPRINTCOPY INIT {|| .T.}
DATA BINNAMES INIT {}
DATA BKCOLOR INIT 0XFFFFFF
DATA BKMODE INIT 1 // TRANSPARENT
DATA BRUSHES INIT {{},{}}
DATA CARGO INIT {0,0,0,0,0,0,0,0,0,0}
DATA CURPAGE INIT 1
DATA DEVCAPS INIT {0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0}
DATA DOCNAME INIT "HBPRINTER"
DATA DX INIT 0
DATA DY INIT 0
DATA ERROR INIT 0
DATA FONTS INIT {{},{},0,{}}
DATA HDC INIT 0
DATA HDCREF INIT 0
DATA ILOSCSTRON INIT 0
DATA IMAGELISTS INIT {{},{}}
DATA INMEMORY INIT .F.
DATA LABSOLUTECOORDS INIT .F.
DATA LGLOBALCHANGES INIT .T.
DATA MAXCOL INIT 0
DATA MAXROW INIT 0
DATA METAFILES INIT {}
DATA NCOPIES INIT 1
DATA NFROMPAGE INIT 1
DATA NGROUP INIT -1
DATA NOBUTTONOPTIONS INIT .F.
DATA NOBUTTONSAVE INIT .F.
DATA NPAGES INIT {}
DATA NTOPAGE INIT 0
DATA NWHATTOPRINT INIT 0
DATA OHBPREVIEW1 INIT NIL
DATA PAGE INIT 1
DATA PAPERNAMES INIT {}
DATA PENS INIT {{},{}}
DATA POLYFILLMODE INIT 1
DATA PORTS INIT {}
DATA PREVIEWMODE INIT .F.
DATA PREVIEWRECT INIT {0,0,0,0}
DATA PREVIEWSCALE INIT 1
DATA PRINTERDEFAULT INIT ""
DATA PRINTERNAME INIT ""
DATA PRINTERS INIT {}
DATA PRINTING INIT .F.
DATA PRINTINGEMF INIT .F.
DATA PRINTOPT INIT 1
DATA REGIONS INIT {{},{}}
DATA SCALE INIT 1
DATA TEXTCOLOR INIT 0
DATA THUMBNAILS INIT .F.
DATA TIMESTAMP INIT ''
DATA UNITS INIT 0
DATA VIEWPORTORG INIT {0,0}
METHOD ARC
METHOD ARCTO
METHOD CHORD
METHOD COMBINERGN
METHOD CONVERT
METHOD DEFINEBRUSH
METHOD DEFINEELLIPTICRGN
METHOD DEFINEFONT
METHOD DEFINEIMAGELIST
METHOD DEFINEPEN
METHOD DEFINEPOLYGONRGN
METHOD DEFINERECTRGN
METHOD DEFINEROUNDRECTRGN
METHOD DELETECLIPRGN
METHOD DRAWIMAGELIST
METHOD DRAWTEXT
METHOD DXCOLORS
METHOD ELLIPSE
METHOD END
METHOD ENDDOC
METHOD ENDPAGE
METHOD FILLRECT
METHOD FRAMERECT
METHOD GETBKCOLOR
METHOD GETBKMODE
METHOD GETOBJBYNAME
METHOD GETPOLYFILLMODE
METHOD GETTEXTALIGN
METHOD GETTEXTCHAREXTRA
METHOD GETTEXTCOLOR
METHOD GETTEXTEXTENT
METHOD GETTEXTJUSTIFICATION
METHOD GETVIEWPORTORG
METHOD INVERTRECT
METHOD LINE
METHOD LINETO
METHOD MODIFYBRUSH
METHOD MODIFYFONT
METHOD MODIFYPEN
METHOD NEW
METHOD PICTURE
METHOD PIE
METHOD POLYBEZIER
METHOD POLYBEZIERTO
METHOD POLYGON
METHOD PREVIEW
METHOD PREVPRINT
METHOD PREVSHOW
METHOD PREVTHUMB
METHOD PRINTOPTION
METHOD RECTANGLE
METHOD REPORTDATA
METHOD ROUNDRECT
METHOD SAVEMETAFILES
METHOD SAY
METHOD SELECTBRUSH
METHOD SELECTCLIPRGN
METHOD SELECTFONT
METHOD SELECTPEN
METHOD SELECTPRINTER
METHOD SETBKCOLOR
METHOD SETBKMODE
METHOD SETCHARSET
METHOD SETDEVMODE
METHOD SETPAGE
METHOD SETPOLYFILLMODE
METHOD SETRGB
METHOD SETTEXTALIGN
METHOD SETTEXTCHAREXTRA
METHOD SETTEXTCOLOR
METHOD SETTEXTJUSTIFICATION
METHOD SETUNITS
METHOD SETVIEWPORTORG
METHOD STARTDOC
METHOD STARTPAGE
METHOD TEXTOUT
ENDCLASS
*------------------------------------------------------------------------------*
CLASS OOHGRECORD
DATA CALIAS__
ERROR HANDLER FIELDASSIGN
METHOD APPEND
METHOD BOF
METHOD CLOSE
METHOD COMMIT
METHOD DBSTRUCT
METHOD DELETE
METHOD EOF
METHOD FIELD
METHOD FIELDBLOCK
METHOD FIELDGET
METHOD FIELDNAME
METHOD FIELDPOS
METHOD FIELDPUT
METHOD FILTER
METHOD FOUND
METHOD GOBOTTOM
METHOD GOTO
METHOD GOTOP
METHOD ISTABLEEMPTY
METHOD LOCATE
METHOD LOCK
METHOD NEW
METHOD ORDKEYCOUNT
METHOD ORDKEYGOTO
METHOD ORDKEYNO
METHOD ORDSCOPE
METHOD RECCOUNT
METHOD RECNO
METHOD SEEK
METHOD SETINDEX
METHOD SETORDER
METHOD SKIP
METHOD SKIPPER
METHOD UNLOCK
METHOD USE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS OOHG_TERRORHTML
DATA AMESSAGES INIT NIL
DATA CBUFFERFILE INIT ""
DATA CBUFFERSCREEN INIT ""
DATA CLANG INIT ""
DATA FILENAME INIT "ERRORLOG.HTM"
DATA PATH INIT ""
DATA POSTHEADER INIT '</P>'
DATA PREHEADER INIT '<HR>' + CHR( 13 ) + CHR( 10 ) + '<P CLASS="UPDATED">'
METHOD COPYLOG
METHOD CREATELOG
METHOD DELETELOG
METHOD ERRORHEADER
METHOD ERRORMESSAGE
METHOD FILEHEADER
METHOD NEW
METHOD PUTMSG
METHOD WRITE
METHOD WRITE2
ENDCLASS
*------------------------------------------------------------------------------*
CLASS OOHG_TERRORTXT FROM OOHG_TERRORHTML
DATA FILEHEADER INIT ""
DATA FILENAME INIT "ERRORLOG.TXT"
DATA POSTHEADER INIT CHR( 13 ) + CHR( 10 ) + CHR( 13 ) + CHR( 10 )
DATA PREHEADER INIT " " + CHR( 13 ) + CHR( 10 ) + REPLICATE( "-", 80 ) + CHR( 13 ) + CHR( 10 ) + " " + CHR( 13 ) + CHR( 10 )
METHOD WRITE2
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TACTIVEX FROM TCONTROL
DATA AAXEV INIT {}
DATA AAXEXEC INIT {}
DATA CPROGID INIT ""
DATA HATL INIT NIL
DATA HSINK INIT NIL
DATA NHEIGHT INIT NIL
DATA NWIDTH INIT NIL
DATA OOLE INIT NIL
DATA TYPE INIT "ACTIVEX" READONLY
DELEGATE GET TO OOLE
DELEGATE SET TO OOLE
ERROR HANDLER __ERROR
METHOD DEFINE
METHOD EVENTMAP
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TANIGIF FROM TCONTROL
DATA ADELAYS INIT {}
DATA AINFO INIT { "", 0, 0 }
DATA APICTURES INIT {}
DATA CURRENTFRAME INIT 0
DATA FILENAME INIT ""
DATA NHEIGHT INIT 100
DATA NWIDTH INIT 100
DATA OIMAGE INIT NIL
DATA OTIMER INIT NIL
DATA TYPE INIT "ANIGIF" READONLY
METHOD DEFINE
METHOD FRAMECOUNT BLOCK { |SELF| LEN( ::APICTURES ) }
METHOD FRAMEDELAY
METHOD FRAMEHEIGHT BLOCK { |SELF| ::AINFO[ 3 ] }
METHOD FRAMEWIDTH BLOCK { |SELF| ::AINFO[ 2 ] }
METHOD ISPLAYING BLOCK { |SELF| ::OTIMER:ENABLED }
METHOD LOAD
METHOD ONCLICK SETGET
METHOD PLAY BLOCK { |SELF| ::OTIMER:ENABLED := ( ::FRAMECOUNT > 1 ) }
METHOD RELEASE
METHOD SHOWNEXTFRAME
METHOD STOP BLOCK { |SELF| ::OTIMER:ENABLED := .F. }
METHOD VERSION BLOCK { |SELF| ::AINFO[ 1 ] }
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TANIMATEBOX FROM TCONTROL
DATA TYPE INIT "ANIMATEBOX" READONLY
METHOD CLOSE
METHOD DEFINE
METHOD OPEN
METHOD PLAY
METHOD RELEASE
METHOD SEEK
METHOD STOP
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TAPPLICATION
DATA ARGC INIT HB_ARGC()
DATA ARGS INIT GETCOMMANDLINEARGS()
DATA EXENAME INIT GETPROGRAMFILENAME()
METHOD BACKCOLOR SETGET
METHOD COL SETGET
METHOD CURSOR SETGET
METHOD DRIVE
METHOD ICON
METHOD MAINNAME
METHOD FORMOBJECT
METHOD HANDLE
METHOD HEIGHT SETGET
METHOD HELPBUTTON SETGET
METHOD NAME
METHOD PATH
METHOD ROW SETGET
METHOD TITLE SETGET
METHOD TOPMOST SETGET
METHOD WIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TBUTTON FROM TCONTROL
DATA AIMAGEMARGIN INIT {10, 10, 10, 10}
DATA AUTOFIT INIT .F.
DATA CPICTURE INIT ""
DATA HIMAGE INIT NIL
DATA IMAGESIZE INIT .F.
DATA LNO3DCOLORS INIT .F.
DATA LNODIBSECTION INIT .T.
DATA LNOTRANSPARENT INIT .F.
DATA LLIBDRAW INIT .F.
DATA NALIGN INIT 2
DATA NHEIGHT INIT 28
DATA NWIDTH INIT 100
DATA STRETCH INIT .F.
DATA TYPE INIT "BUTTON" READONLY
METHOD BUFFER SETGET
METHOD DEFINE
METHOD DEFINEIMAGE
METHOD EVENTS_NOTIFY
METHOD HBITMAP SETGET
METHOD IMAGEMARGIN SETGET
METHOD PICTURE SETGET
METHOD RELEASE
METHOD REPAINT
METHOD SETFOCUS
METHOD SIZEPOS
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TBUTTONCHECK FROM TBUTTON
DATA NHEIGHT INIT 28
DATA NWIDTH INIT 100
DATA TYPE INIT "CHECKBUTTON" READONLY
METHOD DEFINE
METHOD DEFINEIMAGE
METHOD EVENTS_COMMAND
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCALCPRINT FROM TPRINTBASE
DATA OCELL INIT NIL READONLY
DATA ODESKTOP INIT NIL READONLY
DATA ODOCUMENT INIT NIL READONLY
DATA OSCHEDULE INIT NIL READONLY
DATA OSERVICEMANAGER INIT NIL READONLY
DATA OSHEET INIT NIL READONLY
DATA NHORZRESOL INIT PIXELSPERINCHX() READONLY
DATA NVERTRESOL INIT PIXELSPERINCHY() READONLY
METHOD BEGINDOCX
METHOD BEGINPAGEX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD INITX
METHOD MAXCOL
METHOD MAXROW
METHOD PRINTDATAX
METHOD PRINTIMAGEX
METHOD RELEASEX
METHOD SELPRINTERX BLOCK { |SELF| SELF:CPRINTER := "CALC" }
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCHECKBOX FROM TLABEL
DATA CPICTURE INIT ""
DATA ICONWIDTH INIT 19
DATA LEFTALIGN INIT .F.
DATA LLIBDRAW INIT .F.
DATA NHEIGHT INIT 28
DATA NWIDTH INIT 100
DATA TABHANDLE INIT 0
DATA THREESTATE INIT .F.
DATA TYPE INIT "CHECKBOX" READONLY
METHOD DEFINE
METHOD EVENTS_COLOR
METHOD EVENTS_COMMAND
METHOD EVENTS_NOTIFY
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCHECKLIST FROM TGRID
DATA ALLOWEDIT INIT .F. READONLY
DATA FULLMOVE INIT .F. READONLY
DATA INPLACE INIT .F. READONLY
DATA LASTCHANGEDITEM INIT 0
DATA LCHECKBOXES INIT .T. READONLY
DATA TYPE INIT "CHECKLIST" READONLY
METHOD ADDCOLUMN BLOCK { || NIL }
METHOD ADDITEM
METHOD APPENDITEM BLOCK { || NIL }
METHOD CELL BLOCK { || NIL }
METHOD CHECKITEM SETGET
METHOD COLUMNAUTOFIT BLOCK { || NIL }
METHOD COLUMNAUTOFITH BLOCK { || NIL }
METHOD COLUMNBETTERAUTOFIT BLOCK { || NIL }
METHOD COLUMNCOUNT BLOCK { || NIL }
METHOD COLUMNHIDE BLOCK { || NIL }
METHOD COLUMNSAUTOFIT BLOCK { || NIL }
METHOD COLUMNSAUTOFITH BLOCK { || NIL }
METHOD COLUMNSBETTERAUTOFIT BLOCK { || NIL }
METHOD COLUMNSHOW BLOCK { || NIL }
METHOD COLUMNWIDTH BLOCK { || NIL }
METHOD DEFINE
METHOD DELETEALLITEMS
METHOD DELETECOLUMN BLOCK { || NIL }
METHOD DELETEITEM
METHOD DOCHANGE
METHOD DOWN BLOCK { || NIL }
METHOD EDITALLCELLS BLOCK { || NIL }
METHOD EDITCELL BLOCK { || NIL }
METHOD EDITCELL2 BLOCK { || NIL }
METHOD EDITGRID BLOCK { || NIL }
METHOD EDITITEM BLOCK { || NIL }
METHOD EDITITEM2 BLOCK { || NIL }
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD GOBOTTOM BLOCK { || NIL }
METHOD GOTOP BLOCK { || NIL }
METHOD HEADER BLOCK { || NIL }
METHOD HEADERIMAGE BLOCK { || NIL }
METHOD HEADERIMAGEALIGN BLOCK { || NIL }
METHOD INSERTITEM
METHOD ISCOLUMNREADONLY BLOCK { || NIL }
METHOD ISCOLUMNWHEN BLOCK { || NIL }
METHOD ITEM
METHOD ITEMCAPTION SETGET
METHOD ITEMIMAGE SETGET
METHOD ITEMVISIBLE
METHOD LEFT BLOCK { || NIL }
METHOD LOADHEADERIMAGES BLOCK { || NIL }
METHOD PAGEDOWN BLOCK { || NIL }
METHOD PAGEUP BLOCK { || NIL }
METHOD RIGHT BLOCK { || NIL }
METHOD SETRANGECOLOR
METHOD SORT
METHOD SORTCOLUMN BLOCK { || NIL }
METHOD TOEXCEL BLOCK { || NIL }
METHOD TOOPENOFFICE BLOCK { || NIL }
METHOD UP BLOCK { || NIL }
METHOD VALUE SETGET
METHOD WIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCOMBO FROM TLABEL
DATA AVALUES INIT {}
DATA CTEXT INIT ""
DATA IMAGELISTCOLOR INIT CLR_DEFAULT
DATA IMAGELISTFLAGS INIT LR_LOADTRANSPARENT + LR_DEFAULTCOLOR + LR_LOADMAP3DCOLORS
DATA IMAGESOURCE INIT NIL
DATA ITEMNUMBER INIT NIL
DATA LADJUSTIMAGES INIT .F.
DATA LDELAYLOAD INIT .F.
DATA LFOCUSED INIT .F.
DATA LINCREMENTAL INIT .F.
DATA LREFRESH INIT NIL
DATA NHEIGHT2 INIT 150
DATA NLASTFOUND INIT 0
DATA NLASTITEM INIT 0
DATA NTEXTHEIGHT INIT 0
DATA NWIDTH INIT 120
DATA OEDITBOX INIT NIL
DATA OLISTBOX INIT NIL
DATA ONLISTCLOSE INIT NIL
DATA ONLISTDISPLAY INIT NIL
DATA ONREFRESH INIT NIL
DATA SEARCHLAPSE INIT 1000
DATA SOURCEORDER INIT NIL
DATA TYPE INIT "COMBO" READONLY
DATA UFIELD INIT NIL
DATA UINITIME INIT 0
DATA UVALUESOURCE INIT NIL
DATA WORKAREA INIT ""
METHOD ADDITEM
METHOD AUTOSIZE SETGET
METHOD AUTOSIZEDROPDOWN
METHOD CARETPOS SETGET
METHOD DEFINE
METHOD DELETEALLITEMS
METHOD DELETEITEM
METHOD DISPLAYVALUE SETGET
METHOD EVENTS
METHOD EVENTS_COMMAND
METHOD EVENTS_DRAWITEM
METHOD EVENTS_MEASUREITEM
METHOD FIELD SETGET
METHOD FORCEHIDE
METHOD GETDROPDOWNWIDTH
METHOD GETEDITSEL
METHOD INSERTITEM
METHOD ITEM
METHOD ITEMBYSOURCE
METHOD ITEMCOUNT
METHOD ITEMHEIGHT
METHOD NHEIGHT SETGET
METHOD PRERELEASE
METHOD REFRESH
METHOD REFRESHDATA
METHOD SELECTFIRSTITEM
METHOD SETDROPDOWNWIDTH
METHOD SETEDITSEL
METHOD SHOWDROPDOWN
METHOD VALUE SETGET
METHOD VALUESOURCE SETGET
METHOD VISIBLE SETGET
METHOD VISIBLEITEMS
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCONTROL FROM TWINDOW
DATA AUXHANDLE INIT 0
DATA CTOOLTIP INIT ""
DATA HCURSOR INIT 0
DATA HELPID INIT 0
DATA ID INIT 0
DATA IMAGELISTCOLOR INIT CLR_NONE
DATA IMAGELISTFLAGS INIT LR_LOADTRANSPARENT
DATA LCANCEL INIT .F.
DATA OLDBACKCOLOR
DATA OLDCOLOR
DATA ONCHANGE INIT NIL
DATA ONENTER INIT NIL
DATA OTOOLTIPCTRL INIT NIL
DATA POSTBLOCK INIT NIL
DATA SETIMAGELISTCOMMAND INIT 0
DATA SETIMAGELISTWPARAM INIT TVSIL_NORMAL
DATA TRANSPARENT INIT .F.
DATA XOLDVALUE INIT NIL
METHOD ADDBITMAP
METHOD CLEARBITMAPS
METHOD COL SETGET
METHOD CONTAINERCOL
METHOD CONTAINERHWND
METHOD CONTAINERROW
METHOD CURSOR SETGET
METHOD DOCHANGE
METHOD DOEVENT
METHOD DOEVENTMOUSECOORDS
METHOD DOLOSTFOCUS
METHOD EVENTS
METHOD EVENTS_COLOR
METHOD EVENTS_COMMAND
METHOD EVENTS_DRAWITEM BLOCK { || NIL }
METHOD EVENTS_ENTER
METHOD EVENTS_MEASUREITEM BLOCK { || NIL }
METHOD EVENTS_NOTIFY
METHOD FOCUSEFFECT
METHOD FONTANGLE SETGET
METHOD FONTBOLD SETGET
METHOD FONTITALIC SETGET
METHOD FONTNAME SETGET
METHOD FONTSIZE SETGET
METHOD FONTSTRIKEOUT SETGET
METHOD FONTUNDERLINE SETGET
METHOD FONTWIDTH SETGET
METHOD FORCEHIDE
METHOD HEIGHT SETGET
METHOD INITSTYLE
METHOD MOVE
METHOD OTOOLTIP SETGET
METHOD REFRESH
METHOD REGISTER
METHOD RELEASE
METHOD ROW SETGET
METHOD SETFOCUS
METHOD SETFONT
METHOD SETFORM
METHOD SETVARBLOCK
METHOD SIZEPOS
METHOD TABINDEX SETGET
METHOD TOOLTIP SETGET
METHOD WIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCONTROLGROUP FROM TCONTROL
DATA TYPE INIT "CONTROLGROUP" READONLY
METHOD ADDCONTROL
METHOD DEFINE
METHOD ENABLED SETGET
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TCSVPRINT FROM TPRINTBASE
DATA APRINTCSV INIT {} READONLY
METHOD BEGINDOCX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD INITX
METHOD PRINTDATAX
METHOD PRINTIMAGE BLOCK { || NIL }
METHOD SELPRINTERX BLOCK { |SELF| SELF:CPRINTER := "CSV" }
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TDATEPICK FROM TCONTROL
DATA NHEIGHT INIT 24
DATA NWIDTH INIT 120
DATA TYPE INIT "DATEPICK" READONLY
METHOD DEFINE
METHOD EVENTS_NOTIFY
METHOD SETRANGE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TDOSPRINT FROM TPRINTBASE
DATA CBUSCA INIT "" READONLY
DATA CSTRING INIT "" READONLY
DATA NOCCUR INIT 0 READONLY
METHOD BEGINDOCX
METHOD BEGINPAGEX
METHOD CONDENDOSX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD INITX
METHOD NEXTSEARCH
METHOD NORMALDOSX
METHOD PRINTDATAX
METHOD PRINTIMAGE BLOCK { || NIL }
METHOD PRINTLINEX
METHOD PRINTMODEX
METHOD SEARCHSTRING
METHOD SELPRINTERX
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*-----------------------------------------------------------------------------*
CLASS TDYNAMICVALUES
DATA OWND
ERROR HANDLER Error
METHOD NEW
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TEDIT FROM TTEXT
DATA NONFOCUSPOS INIT -4
DATA ONHSCROLL INIT NIL
DATA ONVSCROLL INIT NIL
DATA TYPE INIT "EDIT" READONLY
data nWidth
data nHeight
METHOD DEFINE
METHOD EVENTS_COMMAND
METHOD EVENTS_ENTER
METHOD LOOKFORKEY
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TEDITRICH FROM TEDIT
DATA LDEFAULT INIT .T.
DATA LSELCHANGING INIT .F.
DATA NHEIGHT INIT 240
DATA NWIDTH INIT 120
DATA ONSELCHANGE INIT NIL
DATA TYPE INIT "RICHEDIT" READONLY
METHOD BACKCOLOR SETGET
METHOD DEFINE
METHOD EVENTS BLOCK { || NIL }
METHOD EVENTS_NOTIFY
METHOD FONTCOLOR SETGET
METHOD GETSELTEXT
METHOD HIDESELECTION
METHOD LOADFILE
METHOD MAXLENGTH SETGET
METHOD RICHVALUE SETGET
METHOD SAVEFILE
METHOD SETSELECTIONBACKCOLOR
METHOD SETSELECTIONTEXTCOLOR
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TEXCELPRINT FROM TPRINTBASE
DATA OEXCEL INIT NIL READONLY
DATA OBOOK INIT NIL READONLY
DATA OHOJA INIT NIL READONLY
METHOD BEGINDOCX
METHOD BEGINPAGEX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD INITX
METHOD MAXCOL
METHOD MAXROW
METHOD PRINTDATAX
METHOD PRINTIMAGEX
METHOD RELEASEX
METHOD SELPRINTERX BLOCK { |SELF| SELF:CPRINTER := "EXCEL" }
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORM FROM TWINDOW
DATA ACHILDPOPUP INIT {}
DATA ACTIVATECOUNT INIT { 0, NIL, .T. }
DATA AUTORELEASE INIT .F.
DATA CNOTIFYICONNAME INIT ""
DATA CNOTIFYICONTOOLTIP INIT ""
DATA FOCUSED INIT .T.
DATA FORCECOL INIT NIL
DATA FORCEROW INIT NIL
DATA GRAPHCOMMAND INIT NIL
DATA GRAPHCONTROLS INIT {}
DATA GRAPHDATA INIT {}
DATA GRAPHTASKS INIT {}
DATA HBACKIMAGE INIT NIL
DATA HWNDCLIENT INIT NIL
DATA LASTFOCUSEDCONTROL INIT 0
DATA LDEFINED INIT .F.
DATA LENTERSIZEMOVE INIT .F.
DATA LFORM INIT .T.
DATA LINTERNAL INIT .F.
DATA LSHOWED INIT .F.
DATA LSTRETCHBACK INIT .T.
DATA LTOPMOST INIT .F.
DATA MAXHEIGHT INIT 0
DATA MAXWIDTH INIT 0
DATA MINHEIGHT INIT 0
DATA MINWIDTH INIT 0
DATA NHEIGHT INIT 300
DATA NOTIFYICONDBLCLICK INIT NIL
DATA NOTIFYICONLEFTCLICK INIT NIL
DATA NOTIFYICONMDBLCLICK INIT NIL
DATA NOTIFYICONMIDCLICK INIT NIL
DATA NOTIFYICONRDBLCLICK INIT NIL
DATA NOTIFYICONRIGHTCLICK INIT NIL
DATA NOTIFYMENU INIT NIL
DATA NVIRTUALHEIGHT INIT 0
DATA NVIRTUALWIDTH INIT 0
DATA NWIDTH INIT 300
DATA OMENU INIT NIL
DATA ONHSCROLLBOX INIT NIL
DATA ONINIT INIT NIL
DATA ONINTERACTIVECLOSE INIT NIL
DATA ONMAXIMIZE INIT NIL
DATA ONMINIMIZE INIT NIL
DATA ONMOVE INIT NIL
DATA ONPAINT INIT NIL
DATA ONRELEASE INIT NIL
DATA ONRESTORE INIT NIL
DATA ONSCROLLDOWN INIT NIL
DATA ONSCROLLLEFT INIT NIL
DATA ONSCROLLRIGHT INIT NIL
DATA ONSCROLLUP INIT NIL
DATA ONSIZE INIT NIL
DATA ONVSCROLLBOX INIT NIL
DATA OTOOLTIP INIT NIL
DATA OWNDCLIENT INIT NIL
DATA RANGEHEIGHT INIT 0
DATA RANGEWIDTH INIT 0
DATA SPLITCHILDLIST INIT {}
METHOD ACTIVATE
METHOD ADJUSTWINDOWSIZE
METHOD AUTOADJUST
METHOD BACKCOLOR SETGET
METHOD BACKIMAGE SETGET
METHOD CENTER
METHOD CHECKINTERACTIVECLOSE
METHOD CLIENTSPOS
METHOD CLOSABLE SETGET
METHOD COL SETGET
METHOD CURSOR SETGET
METHOD DEFINE
METHOD DEFINE2
METHOD DEFWINDOWPROC
METHOD DELETECONTROL
METHOD DOEVENT
METHOD ENDWINDOW
METHOD EVENTS
METHOD EVENTS_DESTROY
METHOD EVENTS_HSCROLL
METHOD EVENT_NCDESTROY
METHOD EVENTS_VSCROLL
METHOD FLASH
METHOD FOCUSEDCONTROL
METHOD GETWINDOWSTATE
METHOD HASSTATUSBAR
METHOD HEIGHT SETGET
METHOD HELPBUTTON
METHOD HELPTOPIC
METHOD HIDE
METHOD INSPECTOR
METHOD MAXIMIZE
METHOD MESSAGELOOP
METHOD MINIMIZE
METHOD NOTIFYICON SETGET
METHOD NOTIFYTOOLTIP SETGET
METHOD ONHIDEFOCUSMANAGEMENT
METHOD PROCESSINITPROCEDURE
METHOD REFRESHDATA
METHOD REGISTER
METHOD RELEASE
METHOD RESTORE
METHOD ROW SETGET
METHOD SCROLLCONTROLS
METHOD SETACTIVATIONFOCUS
METHOD SHOW
METHOD SIZEPOS
METHOD TITLE SETGET
METHOD TOOLTIPAUTOPOPTIME
METHOD TOOLTIPICON
METHOD TOOLTIPINITIALTIME
METHOD TOOLTIPMULTILINE
METHOD TOOLTIPRESETDELAYS
METHOD TOOLTIPRESHOWTIME
METHOD TOOLTIPTITLE
METHOD TOOLTIPWIDTH
METHOD TOPMOST SETGET
METHOD VIRTUALHEIGHT SETGET
METHOD VIRTUALWIDTH SETGET
METHOD VISIBLE SETGET
METHOD WIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORMINTERNAL FROM TFORM
DATA FOCUSED INIT .F.
DATA LADJUST INIT .F.
DATA LINTERNAL INIT .T.
DATA TYPE INIT "I" READONLY
METHOD COL SETGET
METHOD CONTAINERCOL
METHOD CONTAINERROW
METHOD DEFINE
METHOD DEFINE2
METHOD ROW SETGET
METHOD SIZEPOS
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORMMDICHILD FROM TFORMINTERNAL
DATA TYPE INIT "L" READONLY
METHOD DEFINE
METHOD DEFWINDOWPROC
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORMMDICLIENT FROM TFORMINTERNAL
DATA NHEIGHT INIT 0
DATA NWIDTH INIT 0
DATA TYPE INIT "D" READONLY
METHOD ACTIVECHILD
METHOD CASCADE
METHOD DEFINE
METHOD DEFWINDOWPROC
METHOD EVENTS_SIZE
METHOD ICONARRANGE
METHOD RELEASE
METHOD TILEHORIZONTAL
METHOD TILEVERTICAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORMMAIN FROM TFORM
DATA LFIRSTACTIVATE INIT .F.
DATA TYPE INIT "A" READONLY
METHOD ACTIVATE
METHOD CHECKINTERACTIVECLOSE
METHOD DEFINE
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORMMODAL FROM TFORM
DATA LOCKEDFORMS INIT {}
DATA OPREVWINDOW INIT NIL
DATA TYPE INIT "M" READONLY
METHOD ACTIVATE
METHOD DEFINE
METHOD ONHIDEFOCUSMANAGEMENT
METHOD RELEASE
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFORMSPLIT FROM TFORMINTERNAL
DATA TYPE INIT "X" READONLY
METHOD DEFINE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TFRAME FROM TCONTROL
DATA NHEIGHT INIT 140
DATA NWIDTH INIT 140
DATA TABHANDLE INIT 0
DATA TYPE INIT "FRAME" READONLY
METHOD CAPTION SETGET
METHOD DEFINE
METHOD EVENTS_COLOR
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRID FROM TCONTROL
DATA AEDITCONTROLS INIT NIL
DATA AEDITKEYS INIT NIL
DATA AHEADCLICK INIT NIL
DATA AHEADERIMAGE INIT {}
DATA AHEADERIMAGEALIGN INIT {}
DATA AHEADERS INIT {}
DATA AHIDDENCOLS INIT {}
DATA AJUST INIT NIL
DATA ALLOWAPPEND INIT .F.
DATA ALLOWCHANGESIZE INIT .T.
DATA ALLOWDELETE INIT .F.
DATA ALLOWEDIT INIT .F.
DATA ALLOWMOVECOLUMN INIT .T.
DATA ASELECTEDCOLORS INIT {}
DATA AWHEN INIT {}
DATA AWIDTHS INIT {}
DATA BAFTERCOLMOVE INIT NIL
DATA BAFTERCOLSIZE INIT NIL
DATA BBEFOREAUTOFIT INIT NIL
DATA BBEFORECOLMOVE INIT NIL
DATA BBEFORECOLSIZE INIT NIL
DATA BCOMPAREITEMS INIT NIL
DATA BDELWHEN INIT NIL
DATA BHEADRCLICK INIT NIL
DATA BONENTER INIT NIL
DATA BPOSITION INIT 0
DATA CEDITKEY INIT "F2"
DATA CLICKONCHECKBOX INIT .T.
DATA CROWEDITTITLE INIT NIL
DATA CTEXT INIT ""
DATA DELMSG INIT NIL
DATA DYNAMICBACKCOLOR INIT {}
DATA DYNAMICFORECOLOR INIT {}
DATA EDITCONTROLS INIT NIL
DATA FULLMOVE INIT .F.
DATA GRIDBACKCOLOR INIT {}
DATA GRIDFORECOLOR INIT {}
DATA GRIDSELECTEDCOLORS INIT {}
DATA HEADERFONTHANDLE INIT 0
DATA HEADERIMAGELIST INIT 0
DATA IMAGELISTCOLOR INIT CLR_DEFAULT
DATA IMAGELISTFLAGS INIT LR_LOADTRANSPARENT + LR_DEFAULTCOLOR + LR_LOADMAP3DCOLORS
DATA INPLACE INIT .F.
DATA LAPPENDMODE INIT .F.
DATA LAPPENDONALTA INIT .F.
DATA LATFIRSTCOL INIT .T.
DATA LBEGINTRACK INIT .F.
DATA LBUTTONS INIT .F.
DATA LCALLEDFROMCLASS INIT .F. PROTECTED
DATA LCHANGEBEFOREEDIT INIT .F.
DATA LCHECKBOXES INIT .F.
DATA LDIVIDERDBLCLICK INIT .F.
DATA LEDITMODE INIT .F.
DATA LENDTRACK INIT .F.
DATA LEXTENDDBLCLICK INIT .F.
DATA LFIXEDCONTROLS INIT .F.
DATA LFOCUSRECT INIT .T.
DATA LLIKEEXCEL INIT .F.
DATA LNESTED INIT .F.
DATA LNESTEDEDIT INIT .F.
DATA LNODELMSG INIT .F.
DATA LNOGRID INIT .F.
DATA LNOMODAL INIT .F.
DATA LNONEUNSELS INIT .F.
DATA LPLM INIT .F.
DATA LSCROLLBARUSESCLIENTAREA INIT .F.
DATA LSHOWITEMATTOP INIT .F.
DATA LSILENT INIT .F.
DATA LTRACKING INIT .F.
DATA NCOLPOS INIT 0 PROTECTED
DATA NDELAYEDCLICK INIT { 0, 0, 0, NIL } PROTECTED
DATA NEDITROW INIT 0 PROTECTED
DATA NHEIGHT INIT 120
DATA NROWPOS INIT 0 PROTECTED
DATA NVISIBLEITEMS INIT 0
DATA NWIDTH INIT 240
DATA ONABORTEDIT INIT NIL
DATA ONAPPEND INIT NIL
DATA ONBEFOREEDITCELL INIT NIL
DATA ONCHECKCHANGE INIT NIL
DATA ONDELETE INIT NIL
DATA ONDISPINFO INIT NIL
DATA ONEDITCELL INIT NIL
DATA ONEDITCELLEND INIT NIL
DATA ONINSERT INIT NIL
DATA PICTURE INIT NIL
DATA RCLICKONCHECKBOX INIT .T.
DATA READONLY INIT NIL
DATA SEARCHCOL INIT 0
DATA SEARCHLAPSE INIT 1000
DATA SEARCHWRAP INIT .T.
DATA SETIMAGELISTCOMMAND INIT LVM_SETIMAGELIST
DATA SETIMAGELISTWPARAM INIT LVSIL_SMALL
DATA TYPE INIT "GRID" READONLY
DATA UINITIME INIT 0
DATA VALID INIT NIL
DATA VALIDMESSAGES INIT NIL
METHOD ADDBITMAP
METHOD ADDCOLUMN
METHOD ADDITEM
METHOD ADJUSTRESIZE
METHOD APPEND SETGET
METHOD APPENDITEM
METHOD BACKCOLOR SETGET
METHOD CELL
METHOD CELLCAPTION
METHOD CELLIMAGE
METHOD CHECKITEM SETGET
METHOD COLUMNAUTOFIT
METHOD COLUMNAUTOFITH
METHOD COLUMNBETTERAUTOFIT
METHOD COLUMNCOUNT
METHOD COLUMNHIDE
METHOD COLUMNORDER SETGET
METHOD COLUMNSAUTOFIT
METHOD COLUMNSAUTOFITH
METHOD COLUMNSBETTERAUTOFIT
METHOD COLUMNSHOW
METHOD COLUMNWIDTH
METHOD COMPAREITEMS
METHOD COUNTPERPAGE
METHOD DEFINE
METHOD DEFINE2
METHOD DEFINE4
METHOD DELETEALLITEMS
METHOD DELETECOLUMN
METHOD DELETEITEM
METHOD DOWN
METHOD EDITALLCELLS
METHOD EDITCELL
METHOD EDITCELL2
METHOD EDITGRID
METHOD EDITITEM
METHOD EDITITEM2
METHOD EVENTS
METHOD EVENTS_ENTER
METHOD EVENTS_NOTIFY
METHOD FIRSTCOLINORDER
METHOD FIRSTSELECTEDITEM
METHOD FIRSTVISIBLECOLUMN
METHOD FIRSTVISIBLEITEM
METHOD FIXCONTROLS SETGET
METHOD FONTCOLOR SETGET
METHOD GOBOTTOM
METHOD GOTOP
METHOD HEADER
METHOD HEADERHEIGHT
METHOD HEADERIMAGE
METHOD HEADERIMAGEALIGN
METHOD HEADERSETFONT
METHOD INSERTBLANK
METHOD INSERTITEM
METHOD ISCOLUMNREADONLY
METHOD ISCOLUMNWHEN
METHOD ITEM
METHOD ITEMCOUNT
METHOD ITEMHEIGHT
METHOD JUSTIFY
METHOD LASTCOLINORDER
METHOD LEFT
METHOD LOADHEADERIMAGES
METHOD NEXTCOLINORDER
METHOD ONENTER SETGET
METHOD PAGEDOWN
METHOD PAGEUP
METHOD PRIORCOLINORDER
METHOD RELEASE
METHOD RIGHT
METHOD SCROLLTOCOL
METHOD SCROLLTOLEFT
METHOD SCROLLTONEXT
METHOD SCROLLTOPRIOR
METHOD SCROLLTORIGHT
METHOD SETCOLUMN
METHOD SETCONTROLVALUE
METHOD SETITEMCOLOR
METHOD SETRANGECOLOR
METHOD SETSELECTEDCOLORS
METHOD SORTCOLUMN
METHOD SORTITEMS
METHOD TOEXCEL
METHOD TOOPENOFFICE
METHOD UP
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDBYCELL FROM TGRID
DATA TYPE INIT "GRIDBYCELL" READONLY
METHOD ADDCOLUMN
METHOD DEFINE
METHOD DELETEALLITEMS
METHOD DELETECOLUMN
METHOD DELETEITEM
METHOD DOCHANGE
METHOD DOWN
METHOD EDITCELL
METHOD EDITCELL2
METHOD EDITGRID
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD GOBOTTOM
METHOD GOTOP
METHOD INSERTBLANK
METHOD LEFT
METHOD PAGEDOWN
METHOD PAGEUP
METHOD RIGHT
METHOD SETCONTROLVALUE
METHOD SETSELECTEDCOLORS
METHOD UP
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROL
DATA BCANCEL INIT NIL
DATA BOK INIT NIL
DATA BVALID INIT NIL
DATA BWHEN INIT NIL
DATA CIMAGECANCEL INIT 'EDIT_CANCEL_16'
DATA CIMAGEOK INIT 'EDIT_OK_16'
DATA CMEMVAR INIT NIL
DATA CVALIDMESSAGE INIT NIL
DATA LBUTTONS INIT .F.
DATA LLIKEEXCEL INIT .F.
DATA LNOMODAL INIT .F.
DATA NDEFHEIGHT INIT 24
DATA NDEFWIDTH INIT 140
DATA NONFOCUSPOS INIT NIL
DATA OCONTROL INIT NIL
DATA OGRID INIT NIL
DATA OWINDOW INIT NIL
DATA TYPE INIT "TGRIDCONTROL" READONLY
DATA VALUE INIT NIL
METHOD CONTROLVALUE SETGET
METHOD CREATEWINDOW
METHOD ENABLED SETGET
METHOD GRIDVALUE( UVALUE )
METHOD NEW BLOCK { | SELF | SELF }
METHOD ONLOSTFOCUS SETGET
METHOD SETFOCUS
METHOD SETVALUE( UVALUE )
METHOD STR2VAL( UVALUE )
METHOD VALID
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLCHECKBOX FROM TGRIDCONTROL
DATA CFALSE INIT ".F."
DATA CTRUE INIT ".T."
DATA TYPE INIT "TGRIDCONTROLCHECKBOX" READONLY
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE( UVALUE )
METHOD NEW
METHOD STR2VAL( UVALUE )
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLCOMBOBOX FROM TGRIDCONTROL
DATA AITEMS INIT {}
DATA AVALUES INIT NIL
DATA CFIELD INIT ""
DATA CRETVALTYPE INIT "N"
DATA CVALUESOURCE INIT ""
DATA CWORKAREA INIT ""
DATA TYPE INIT "TGRIDCONTROLCOMBOBOX" READONLY
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
METHOD REFRESH
METHOD STR2VAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLCOMBOBOXTEXT FROM TGRIDCONTROL
DATA AITEMS INIT {}
DATA LINCREMENTAL INIT .F.
DATA LWINSIZE INIT .F.
DATA TYPE INIT "TGRIDCONTROLCOMBOBOXTEXT" READONLY
METHOD CONTROLVALUE SETGET
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
METHOD STR2VAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLDATEPICKER FROM TGRIDCONTROL
DATA LSHOWNONE
DATA LUPDOWN
DATA TYPE INIT "TGRIDCONTROLDATEPICKER" READONLY
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
METHOD STR2VAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLIMAGEDATA FROM TGRIDCONTROL
DATA ODATA
DATA TYPE INIT "TGRIDCONTROLIMAGEDATA" READONLY
METHOD CONTROLVALUE SETGET
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD ENABLED SETGET
METHOD NEW
METHOD ONLOSTFOCUS SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLIMAGELIST FROM TGRIDCONTROL
DATA TYPE INIT "TGRIDCONTROLIMAGELIST" READONLY
METHOD CONTROLVALUE SETGET
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD NEW
METHOD STR2VAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLLCOMBOBOX FROM TGRIDCONTROL
DATA CFALSE INIT ".F."
DATA CTRUE INIT ".T."
DATA TYPE INIT "TGRIDCONTROLLCOMBOBOX" READONLY
METHOD CONTROLVALUE SETGET
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
METHOD STR2VAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLMEMO FROM TGRIDCONTROL
DATA CTITLE INIT _OOHG_MESSAGES( 1, 11 )
DATA LCLEANCRLF INIT .F.
DATA LNOHSCROLL INIT .F.
DATA LSIZE INIT .F.
DATA NDEFHEIGHT INIT 84
DATA NHEIGHT INIT 265
DATA NWIDTH INIT 350
DATA TYPE INIT "TGRIDCONTROLMEMO" READONLY
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLSPINNER FROM TGRIDCONTROL
DATA NRANGEMAX INIT 100
DATA NRANGEMIN INIT 0
DATA TYPE INIT "TGRIDCONTROLSPINNER" READONLY
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
METHOD STR2VAL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDCONTROLTEXTBOX FROM TGRIDCONTROL
DATA CEDITKEY INIT "F2"
DATA CMASK INIT ""
DATA CTYPE INIT ""
DATA LFORCEMODAL INIT .F.
DATA TYPE INIT "TGRIDCONTROLTEXTBOX" READONLY
METHOD CREATECONTROL
METHOD CREATEWINDOW
METHOD GRIDVALUE
METHOD NEW
METHOD STR2VAL
ENDCLASS
*-----------------------------------------------------------------------------*
CLASS TGRIDCONTROLTEXTBOXACTION FROM TGRIDCONTROLTEXTBOX
DATA BACTION INIT NIL
DATA BACTION2 INIT NIL
DATA TYPE INIT "TGRIDCONTROLTEXTBOXACTION" READONLY
METHOD CREATECONTROL
METHOD NEW
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TGRIDMULTI FROM TGRID
DATA LDELETEALL INIT .F.
DATA TYPE INIT "MULTIGRID" READONLY
METHOD DEFINE
METHOD DOCHANGE
METHOD EVENTS_NOTIFY
METHOD SETCONTROLVALUE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THOTKEY FROM TCONTROL
DATA NKEY INIT 0
DATA NMOD INIT 0
DATA ONCLICK
DATA TYPE INIT "HOTKEY" READONLY
METHOD DEFINE
METHOD ENABLED SETGET
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THOTKEYBOX FROM TLABEL
DATA LFORCEALT INIT .T.
DATA NHEIGHT INIT 40
DATA NWIDTH INIT 120
DATA TYPE INIT "HOTKEYBOX" READONLY
METHOD DEFINE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THBPRINTER FROM TPRINTBASE
DATA OHBPRN INIT NIL READONLY
METHOD BEGINDOCX
METHOD BEGINPAGEX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD GETDEFPRINTERX
METHOD INITX
METHOD MAXCOL
METHOD MAXROW
METHOD PRINTBARCODEX
METHOD PRINTDATAX
METHOD PRINTIMAGEX
METHOD PRINTLINEX
METHOD PRINTRECTANGLEX
METHOD PRINTROUNDRECTANGLEX
METHOD RELEASEX
METHOD SELPRINTERX
METHOD SETCOLORX
METHOD SETPREVIEWSIZEX
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THTMLPRINT
Implemented via FUNCTION THtmlPrint().
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THTMLPRINTFROMCALC FROM TCALCPRINT
METHOD BEGINDOCX
METHOD ENDDOCX
METHOD INITX
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THTMLPRINTFROMEXCEL FROM TEXCELPRINT
METHOD BEGINDOCX
METHOD ENDDOCX
METHOD INITX
ENDCLASS
*------------------------------------------------------------------------------*
CLASS THYPERLINK FROM TLABEL
DATA TYPE INIT "HYPERLINK" READONLY
DATA URL INIT ""
METHOD ADDRESS SETGET
METHOD DEFINE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TIMAGE FROM TCONTROL
DATA AEXCLUDEAREA INIT {}
DATA AUTOFIT INIT .T.
DATA BONCLICK INIT ""
DATA CPICTURE INIT ""
DATA HIMAGE INIT NIL
DATA IMAGESIZE INIT .F.
DATA LNO3DCOLORS INIT .F.
DATA LNODIBSECTION INIT .F.
DATA LNOTRANSPARENT INIT .F.
DATA NHEIGHT INIT 100
DATA NWIDTH INIT 100
DATA STRETCH INIT .F.
DATA TYPE INIT "IMAGE" READONLY
METHOD BLEND
METHOD BUFFER SETGET
METHOD COPY
METHOD CURRENTSIZE
METHOD DEFINE
METHOD EVENTS
METHOD HBITMAP SETGET
METHOD ONCLICK SETGET
METHOD ORIGINALSIZE
METHOD PICTURE SETGET
METHOD RELEASE
METHOD REPAINT
METHOD SIZEPOS
METHOD TOOLTIP SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TINTERNAL FROM TCONTROL
DATA NVIRTUALHEIGHT INIT 0
DATA NVIRTUALWIDTH INIT 0
DATA ONHSCROLLBOX INIT NIL
DATA ONSCROLLDOWN INIT NIL
DATA ONSCROLLLEFT INIT NIL
DATA ONSCROLLRIGHT INIT NIL
DATA ONSCROLLUP INIT NIL
DATA ONVSCROLLBOX INIT NIL
DATA RANGEHEIGHT INIT 0
DATA RANGEWIDTH INIT 0
DATA TYPE INIT "INTERNAL" READONLY
METHOD BACKCOLOR SETGET
METHOD BACKCOLORCODE SETGET
METHOD DEFINE
METHOD EVENTS
METHOD EVENTS_HSCROLL
METHOD EVENTS_VSCROLL
METHOD SCROLLCONTROLS
METHOD SIZEPOS
METHOD VIRTUALHEIGHT SETGET
METHOD VIRTUALWIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TIPADDRESS FROM TLABEL
DATA NHEIGHT INIT 24
DATA NWIDTH INIT 120
DATA TYPE INIT "IPADDRESS" READONLY
METHOD DEFINE
METHOD STRING SETGET
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TLABEL FROM TCONTROL
DATA ICONWIDTH INIT 0
DATA LAUTOSIZE INIT .F.
DATA NHEIGHT INIT 24
DATA NWIDTH INIT 120
DATA PICTURE INIT NIL
DATA TYPE INIT "LABEL" READONLY
METHOD ALIGN SETGET
METHOD AUTOSIZE SETGET
METHOD CAPTION SETGET
METHOD DEFINE
METHOD GETTEXT
METHOD SETFONT
METHOD SETTEXT
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TLISTFROM TCONTROL
DATA BONENTER INIT NIL
DATA DRAGITEM INIT 0
DATA DRAGTO INIT 0
DATA IMAGELISTCOLOR INIT CLR_DEFAULT
DATA IMAGELISTFLAGS INIT LR_LOADTRANSPARENT + LR_DEFAULTCOLOR + LR_LOADMAP3DCOLORS
DATA LADJUSTIMAGES INIT .F.
DATA LFOCUSED INIT .F.
DATA LMULTITAB INIT .F.
DATA NCOLWIDTH INIT 120
DATA NHEIGHT INIT 120
DATA NTEXTHEIGHT INIT 0
DATA NWIDTH INIT 120
DATA TYPE INIT "LIST" READONLY
METHOD ADDITEM
METHOD COLUMNWIDTH SETGET
METHOD DEFINE
METHOD DEFINE2
METHOD DELETEALLITEMS
METHOD DELETEITEM( NITEM )
METHOD ENSUREVISIBLE
METHOD EVENTS
METHOD EVENTS_COMMAND
METHOD EVENTS_DRAG
METHOD EVENTS_DRAWITEM
METHOD EVENTS_MEASUREITEM
METHOD INSERTITEM
METHOD ITEM
METHOD ITEMCOUNT
METHOD ITEMHEIGHT
METHOD ONENTER SETGET
METHOD TOPINDEX SETGET
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TLISTMULTI FROM TLIST
DATA TYPE INIT "MULTILIST" READONLY
METHOD DEFINE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TLISTCOMBO FROM TCONTROL STATIC
METHOD DEFINE
METHOD EVENTS_VSCROLL
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMENU FROM TCONTROL
DATA LADJUST INIT .F.
DATA LMAIN INIT .F.
DATA TYPE INIT "MENU" READONLY
METHOD ACTIVATE
METHOD DEFINE
METHOD ENDMENU
METHOD REFRESH
METHOD RELEASE
METHOD SEPARATOR
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMENUCONTEXT FROM TMENU
METHOD DEFINE
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMENUDROPDOWN FROM TMENU
METHOD DEFINE
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMENUITEM FROM TCONTROL
DATA APICTURE INIT {"", ""}
DATA HBITMAPS INIT {NIL, NIL}
DATA LADJUST INIT .F.
DATA LMAIN INIT .F.
DATA LSTRETCH INIT .F.
DATA TYPE INIT "MENUITEM" READONLY
DATA XID INIT 0
METHOD CAPTION SETGET
METHOD CHECKED SETGET
METHOD DEFAULTITEM
METHOD DEFINEITEM
METHOD DEFINEPOPUP
METHOD DEFINESEPARATOR
METHOD DOEVENT
METHOD ENABLED SETGET
METHOD ENDPOPUP
METHOD HILITED SETGET
METHOD INSERTITEM
METHOD INSERTPOPUP
METHOD INSERTSEPARATOR
METHOD PICTURE SETGET
METHOD RELEASE
METHOD SEPARATOR
METHOD STRETCH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMENUMAIN FROM TMENU
DATA LMAIN INIT .T.
METHOD ACTIVATE
METHOD DEFINE
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMENUNOTIFY FROM TMENU
METHOD DEFINE
METHOD RELEASE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMESSAGEBAR FROM TCONTROL
DATA AALIGNS INIT {}
DATA ACLICKS INIT NIL
DATA AWIDTHS INIT NIL
DATA ADBLCLICKS INIT NIL
DATA ARCLICKS INIT NIL
DATA ARDBLCLICKS INIT NIL
DATA CLEDOFF INIT "ZZZ_LED_OFF"
DATA CLEDON INIT "ZZZ_LED_ON"
DATA LADJUST INIT .F.
DATA LAUTOADJUST INIT .T.
DATA LTOP INIT .F.
DATA TYPE INIT "MESSAGEBAR" READONLY
METHOD ADDITEM
METHOD BACKCOLOR SETGET
METHOD CAPTION
METHOD CLIENTHEIGHTUSED
METHOD DEFINE
METHOD ENDSTATUS
METHOD EVENTS_NOTIFY
METHOD EVENTS_SIZE
METHOD ITEM
METHOD ITEMALIGN
METHOD ITEMCLICK
METHOD ITEMCOUNT
METHOD ITEMDBLCLICK
METHOD ITEMICON
METHOD ITEMRCLICK
METHOD ITEMRDBLCLICK
METHOD ITEMTOOLTIP
METHOD ITEMWIDTH
METHOD MINHEIGHT SETGET
METHOD REFRESHDATA
METHOD SETCLOCK
METHOD SETDATE
METHOD SETKEYBRD
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMINIPRINT FROM TPRINTBASE
METHOD BEGINDOCX
METHOD BEGINPAGEX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD GETDEFPRINTERX
METHOD INITX
METHOD MAXCOL
METHOD MAXROW
METHOD PRINTBARCODEX
METHOD PRINTDATAX
METHOD PRINTIMAGEX
METHOD PRINTLINEX
METHOD PRINTRECTANGLEX
METHOD PRINTROUNDRECTANGLEX
METHOD RELEASEX
METHOD SELPRINTERX
METHOD SETPREVIEWSIZEX
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMONTHCAL FROM TCONTROL
DATA ABOLDDAYS INIT {}
DATA ONVIEWCHANGE INIT NIL
DATA TYPE INIT "MONTHCAL" READONLY
METHOD ADDBOLDDAY
METHOD BACKCOLOR SETGET
METHOD BACKGROUNDCOLOR SETGET
METHOD CURRENTVIEW SETGET
METHOD DEFINE
METHOD DEFINE2
METHOD DELBOLDDAY
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD FONTCOLOR SETGET
METHOD HEIGHT SETGET
METHOD ISBOLDDAY BLOCK { |SELF, DDAY| ASCAN( ::ABOLDDAYS, DDAY ) > 0 }
METHOD SETFONT
METHOD SETRANGE
METHOD TITLEBACKCOLOR SETGET
METHOD TITLEFONTCOLOR SETGET
METHOD TRAILINGFONTCOLOR SETGET
METHOD VALUE SETGET
METHOD WIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMONTHCALMULTI FROM TMONTHCAL
DATA TYPE INIT "MONTHCALMULTI" READONLY
METHOD DEFINE
METHOD DOCHANGE
METHOD MAXSELCOUNT SETGET
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TMULTIPAGE FROM TCONTROLGROUP
DATA APAGES INIT {}
DATA NFIRSTVALUE INIT NIL
DATA OCONTAINERBASE INIT NIL
DATA OPAGECLASS INIT TTABPAGE()
DATA TYPE INIT "MULTIPAGE" READONLY
METHOD ADDCONTROL
METHOD ADDPAGE
METHOD ADJUSTRESIZE
METHOD BBEFORECHANGE SETGET
METHOD CAPTION
METHOD CONTAINERCAPTION
METHOD CONTAINERITEMCOUNT
METHOD CONTAINERVALUE SETGET
METHOD CREATEPAGES
METHOD DEFINE
METHOD DELETECONTROL
METHOD DELETEITEM
METHOD DELETEPAGE
METHOD ENABLED SETGET
METHOD ENDPAGE
METHOD ENDTAB
METHOD FORCEHIDE
METHOD HIDEPAGE
METHOD HWND
METHOD INSERTITEM
METHOD ITEMCOUNT
METHOD ONCLICK SETGET
METHOD ONRCLICK SETGET
METHOD PICTURE
METHOD REALPOSITION
METHOD REFRESH
METHOD REFRESHDATA
METHOD RELEASE
METHOD SETFOCUS
METHOD SHOWPAGE
METHOD SIZEPOS
METHOD VALUE SETGET
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TOBROWSE FROM TXBROWSE
DATA ARECMAP INIT {}
DATA LUPDATEALL INIT .F.
DATA NRECLASTVALUE INIT 0 PROTECTED
DATA RECCOUNT INIT 0
DATA SYNCSTATUS INIT NIL
DATA TYPE INIT "BROWSE" READONLY
MESSAGE GOBOTTOM METHOD END
MESSAGE GOTOP METHOD HOME
METHOD BROWSEONCHANGE
METHOD CURRENTROW SETGET
METHOD DBGOTO
METHOD DBSKIP
METHOD DEFINE
METHOD DEFINE3
METHOD DELETE
METHOD DOCHANGE
METHOD DOWN
METHOD EDITALLCELLS
METHOD EDITCELL
METHOD EDITGRID
METHOD EDITITEM_B
METHOD END
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD FASTUPDATE
METHOD HOME
METHOD MOVETO BLOCK { || NIL }
METHOD PAGEDOWN
METHOD PAGEUP
METHOD REFRESH
METHOD REFRESHDATA
METHOD SCROLLUPDATE
METHOD SETCONTROLVALUE BLOCK { || NIL }
METHOD SETSCROLLPOS
METHOD SETVALUE
METHOD TOPBOTTOM
METHOD UP
METHOD UPDATE
METHOD UPDATECOLORS
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TOBROWSEBYCELL FROM TOBROWSE
DATA TYPE INIT "BROWSEBYCELL" READONLY
MESSAGE GOBOTTOM METHOD END
MESSAGE GOTOP METHOD HOME
METHOD ADDCOLUMN
METHOD BROWSEONCHANGE
METHOD CURRENTCOL SETGET
METHOD DEFINE3
METHOD DELETE
METHOD DELETEALLITEMS
METHOD DELETECOLUMN
METHOD DOCHANGE
METHOD DOWN
METHOD EDITALLCELLS
METHOD EDITCELL
METHOD EDITCELL2
METHOD EDITGRID
METHOD EDITITEM_B
METHOD END
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD HOME
METHOD LEFT
METHOD PAGEDOWN
METHOD PAGEUP
METHOD RIGHT
METHOD SETSCROLLPOS
METHOD SETSELECTEDCOLORS
METHOD SETVALUE
METHOD UP
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPDF
DATA ABOOKMARKS
DATA AFO1 INIT {...}
DATA AFO2 INIT {...}
DATA AFO3 INIT {...}
DATA AFONTS
DATA AFONTWIDTH
DATA AHEADER
DATA AIMAGES
DATA APAGEFONTS
DATA APAGEIMAGES
DATA APAGES
DATA AREFS
DATA AREPORT
DATA LISPAGEACTIVE INIT .F.
DATA LOPTIMIZE
DATA NDOCLEN
DATA NFONTNAME
DATA NFONTNAMEPREV
DATA NFONTSIZE
DATA NFONTSIZEPREV
DATA NHANDLE
DATA NNEXTOBJ
DATA NPDFBOTTOM
DATA NPDFLEFT
DATA NPDFTOP
METHOD _OOHG_BOX
METHOD _OOHG_LINE
METHOD ATSAY
METHOD BMPINFO
METHOD BOLD
METHOD BOLDITALIC
METHOD BOOKADD
METHOD BOOKCLOSE
METHOD BOOKCOUNT
METHOD BOOKFIRST
METHOD BOOKLAST
METHOD BOOKNEXT
METHOD BOOKOPEN
METHOD BOOKPARENT
METHOD BOOKPREV
METHOD BOX
METHOD BOX1
METHOD CENTER
METHOD CHECKLINE
METHOD CLOSE
METHOD CLOSEHEADER
METHOD CLOSEPAGE
METHOD CREATEHEADER
METHOD DELETEHEADER
METHOD DISABLEHEADER
METHOD DRAWHEADER
METHOD EDITOFFHEADER
METHOD EDITONHEADER
METHOD ENABLEHEADER
METHOD EXECUTE
METHOD FILEPRINT
METHOD GETFONTINFO
METHOD HEADER
METHOD IMAGE
METHOD IMAGEINFO
METHOD INIT
METHOD ITALIC
METHOD JPEGINFO
METHOD LENGTH
METHOD M2R
METHOD M2X
METHOD M2Y
METHOD MARGINS
METHOD NEWLINE
METHOD NEWPAGE
METHOD NORMAL
METHOD OPENHEADER
METHOD PAGENUMBER
METHOD PAGEORIENT
METHOD PAGESIZE
METHOD R2D
METHOD R2M
METHOD REVERSE
METHOD RJUST
METHOD SAVEHEADER
METHOD SETFONT
METHOD SETLPI
METHOD STRINGB
METHOD TEXT
METHOD TEXTCOUNT
METHOD TEXTNEXTPARA
METHOD TEXTPRINT
METHOD TIFFINFO
METHOD UNDERLINE
METHOD WRITETOFILE
METHOD X2M
ENDCLASS
*---------------------------------------
CLASS TPDFPRINT FROM TPRINTBASE
DATA APAPER INIT {} READONLY // PAPER TYPES SUPPORTED BY PDF CLASS
DATA CPAGEORIENT INIT "P" READONLY // P = PORTRAIT, L = LANDSCAPE
DATA CPAGESIZE INIT "" READONLY // PAGE SIZE
DATA OPDF INIT NIL READONLY // REFERENCE TO THE TPDF OBJECT
METHOD BEGINDOCX
METHOD BEGINPAGEX
METHOD ENDDOCX
METHOD INITX
METHOD PRINTBARCODEX
METHOD PRINTDATAX
METHOD PRINTIMAGEX
METHOD PRINTLINEX
METHOD PRINTRECTANGLEX
METHOD PRINTROUNDRECTANGLEX
METHOD SELPRINTERX
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPICTURE FROM TCONTROL
DATA AEXCLUDEAREA INIT {}
DATA AUTOFIT INIT .F.
DATA BONCLICK INIT NIL
DATA CPICTURE INIT ""
DATA HIMAGE INIT NIL
DATA IMAGESIZE INIT .F.
DATA LNO3DCOLORS INIT .F.
DATA LNODIBSECTION INIT .F.
DATA LNOTRANSPARENT INIT .F.
DATA NHEIGHT INIT 100
DATA NWIDTH INIT 100
DATA NZOOM INIT 1
DATA STRETCH INIT .F.
DATA TYPE INIT "PICTURE" READONLY
METHOD BLEND
METHOD BUFFER SETGET
METHOD COPY
METHOD CURRENTSIZE
METHOD DEFINE
METHOD EVENTS
METHOD HBITMAP SETGET
METHOD HORIZONTALSCROLL SETGET
METHOD NDEGREE SETGET
METHOD ONCLICK SETGET
METHOD ORIGINALSIZE
METHOD PICTURE SETGET
METHOD REDRAW
METHOD RELEASE
METHOD REPAINT
METHOD ROTATE SETGET
METHOD SIZEPOS
METHOD TOOLTIP SETGET
METHOD VERTICALSCROLL SETGET
METHOD ZOOM SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPLAYER FROM TCONTROL
DATA TYPE INIT "PLAYER" READONLY
METHOD CLOSE
METHOD DEFINE
METHOD EJECT
METHOD LENGTH
METHOD OPEN
METHOD OPENDIALOG
METHOD PAUSE
METHOD PLAY
METHOD PLAYREVERSE
METHOD POSITION SETGET
METHOD POSITIONEND
METHOD POSITIONHOME
METHOD RELEASE
METHOD REPEAT
METHOD REPEATOFF
METHOD REPEATON
METHOD RESUME
METHOD SPEED
METHOD STOP
METHOD VOLUME SETGET
METHOD ZOOM
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPRINT
Implemented via TPrint() function.
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPRINTBASE
DATA ABARCOLOR INIT {1, 1, 1} READONLY // BRUSH COLOR FOR BARCODES
DATA ACOLOR INIT {0, 0, 0} READONLY // BRUSH COLOR
DATA AFONTCOLOR INIT {0, 0, 0} READONLY // FONT COLOR
DATA ALINCELDA INIT {} READONLY
DATA APAGENAMES INIT {} READONLY
DATA APORTS INIT {} READONLY
DATA APRINTERS INIT {} READONLY
DATA CARGO INIT "LIST" READONLY // DOCUMENT'S NAME WITHOUT EXTENSION
DATA CDOCUMENT INIT "" READONLY // DOCUMENT'S NAME WITH EXTENSION
DATA CFONTNAME INIT "COURIER NEW" READONLY
DATA CPAGENAME INIT "" READONLY // CURRENT PAGE NAME
DATA CPORT INIT "PRN" READONLY
DATA CPRINTER INIT "" READONLY
DATA CPRINTLIBRARY INIT "HBPRINTER" READONLY
DATA CTEMPFILE INIT TEMP_FILE_NAME READONLY
DATA CUNITS INIT "ROWCOL" READONLY
DATA CVERSION INIT "(OOHG-TPRINT)V 4.10" READONLY
DATA EXIT INIT .F. READONLY
DATA IMPREVIEW INIT .T. READONLY
DATA LFONTBOLD INIT .F. READONLY
DATA LFONTITALIC INIT .F. READONLY
DATA LFONTSTRIKEOUT INIT .F. READONLY
DATA LFONTUNDERLINE INIT .F. READONLY
DATA LINDENTALL INIT .F. READONLY // INDENT RICHEEDIT LINES
DATA LLANDSCAPE INIT .F. READONLY // PAGE ORIENTATION
DATA LPRERROR INIT .F. READONLY
DATA LPROP INIT .F. READONLY
DATA LSAVETEMP INIT .F. READONLY
DATA LSEPARATESHEETS INIT .F. READONLY
DATA LSHOWERRORS INIT .T. READONLY
DATA LWINHIDE INIT .F. READONLY
DATA NFONTANGLE INIT 0 READONLY
DATA NFONTSIZE INIT 12 READONLY
DATA NFONTTYPE INIT 1 READONLY // FONT TYPE (NORMAL=0 OR BOLD=1)
DATA NFONTWIDTH INIT 0 READONLY
DATA NHFIJ INIT ( 12 / 3.70 ) READONLY
DATA NLINPAG INIT 0 READONLY
DATA NLMARGIN INIT 0 READONLY
DATA NMAXCOL INIT 0 READONLY
DATA NMAXROW INIT 0 READONLY
DATA NMHOR INIT ( 10 / 4.75 ) READONLY
DATA NMVER INIT ( 10 / 2.35 ) READONLY
DATA NTMARGIN INIT 0 READONLY
DATA NUNITSLIN INIT 1 READONLY
DATA NVFIJ INIT ( 12 / 1.65 ) READONLY
DATA NWPEN INIT 0.1 READONLY // PEN WIDTH IN MM, DO NOT EXCEED 1
METHOD BEGINDOC
METHOD BEGINDOCX BLOCK { || NIL }
METHOD BEGINPAGE
METHOD BEGINPAGEX BLOCK { || NIL }
METHOD CODABAR
METHOD CODE128
METHOD CODE3_9
METHOD CONDENDOS BLOCK { || NIL }
METHOD CONDENDOSX BLOCK { || NIL }
METHOD EAN13
METHOD EAN8
METHOD ENDDOC
METHOD ENDDOCX BLOCK { || NIL }
METHOD ENDPAGE
METHOD ENDPAGEX BLOCK { || NIL }
METHOD GETDEFPRINTER
METHOD GETDEFPRINTERX BLOCK { || NIL }
METHOD GO_CODE
METHOD IND25
METHOD INIT
METHOD INITX BLOCK { || NIL }
METHOD INT25
METHOD MAT25
METHOD MAXCOL
METHOD MAXROW
METHOD NORMALDOS BLOCK { || NIL }
METHOD NORMALDOSX BLOCK { || NIL }
METHOD PRINTBARCODE
METHOD PRINTBARCODEX BLOCK { || NIL }
METHOD PRINTDATA
METHOD PRINTDATAX BLOCK { || NIL }
METHOD PRINTDOS
METHOD PRINTIMAGE
METHOD PRINTIMAGEX BLOCK { || NIL }
METHOD PRINTLINE
METHOD PRINTLINEX BLOCK { || NIL }
METHOD PRINTMODE
METHOD PRINTMODEX BLOCK { || NIL }
METHOD PRINTRAW
METHOD PRINTRECTANGLE
METHOD PRINTRECTANGLEX BLOCK { || NIL }
METHOD PRINTROUNDRECTANGLE
METHOD PRINTROUNDRECTANGLEX BLOCK { || NIL }
METHOD RELEASE
METHOD RELEASEX BLOCK { || NIL }
METHOD SELPRINTER
METHOD SELPRINTERX BLOCK { || NIL }
METHOD SETBARCOLOR
METHOD SETCOLOR
METHOD SETCOLORX BLOCK { || NIL }
METHOD SETCPL
METHOD SETDOSPORT
METHOD SETFONT
METHOD SETFONTTYPE
METHOD SETFONTX BLOCK { || NIL }
METHOD SETINDENTATION
METHOD SETLMARGIN
METHOD SETPREVIEWSIZE
METHOD SETPREVIEWSIZEX BLOCK { || NIL }
METHOD SETPROP
METHOD SETRAWPRINTER
METHOD SETSEPARATESHEETS
METHOD SETSHOWERRORS
METHOD SETTMARGIN
METHOD SETUNITS
METHOD SUP5
METHOD UPCA
METHOD VERSION INLINE ::CVERSION
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPROGRESSBAR FROM TCONTROL
DATA LRUNNING INIT .F.
DATA NRANGEMAX INIT 100
DATA NRANGEMIN INIT 0
DATA NVELOCITY INIT 30
DATA TYPE INIT "PROGRESSBAR" READONLY
METHOD BACKCOLOR SETGET
METHOD DEFINE
METHOD FONTCOLOR SETGET
METHOD ISMARQUEERUNNING
METHOD ISSTYLEMARQUEE
METHOD ISSTYLENORMAL
METHOD RANGEMAX SETGET
METHOD RANGEMIN SETGET
METHOD SETSTYLEMARQUEE
METHOD SETSTYLENORMAL
METHOD STARTMARQUEE
METHOD STOPMARQUEE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TPROGRESSMETER FROM TLABEL
DATA NHEIGHT INIT 18
DATA NPERCENT INIT 0
DATA NRANGEMAX INIT 100
DATA NRANGEMIN INIT 0
DATA NVALUE INIT 0
DATA NWIDTH INIT 100
DATA TYPE INIT "PROGRESSMETER" READONLY
METHOD ALIGN SETGET
METHOD DEFINE
METHOD EVENTS
METHOD RANGEMAX SETGET
METHOD RANGEMIN SETGET
METHOD RECALC
METHOD SETPERCENT SETGET
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TRADIOGROUP FROM TLABEL
DATA AOPTIONS INIT {}
DATA ICONWIDTH INIT 19
DATA LEFTALIGN INIT .F.
DATA LHORIZONTAL INIT .F.
DATA LLIBDRAW INIT .F.
DATA NHEIGHT INIT 25
DATA NSPACING INIT NIL
DATA NWIDTH INIT 120
DATA OBKGRND INIT NIL
DATA TABHANDLE INIT 0
DATA TABSTOP INIT .T.
DATA TYPE INIT "RADIOGROUP" READONLY
METHOD ADDITEM
METHOD ADJUSTRESIZE
METHOD CAPTION
METHOD COLMARGIN
METHOD DEFINE
METHOD DELETEITEM
METHOD ENABLED SETGET
METHOD GROUPHEIGHT
METHOD GROUPWIDTH
METHOD INSERTITEM
METHOD ITEMCOUNT
METHOD ITEMENABLED
METHOD ITEMREADONLY
METHOD READONLY SETGET
METHOD ROWMARGIN
METHOD SETFOCUS
METHOD SETFONT
METHOD SIZEPOS
METHOD SPACING SETGET
METHOD VALUE SETGET
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TRADIOITEM FROM TLABEL
DATA ICONWIDTH INIT 19
DATA LEFTALIGN INIT .F.
DATA NHEIGHT INIT 25
DATA NWIDTH INIT 120
DATA OBKGRND INIT NIL
DATA TABHANDLE INIT 0
DATA TYPE INIT "RADIOITEM" READONLY
METHOD DEFINE
METHOD EVENTS
METHOD EVENTS_COLOR
METHOD EVENTS_COMMAND
METHOD EVENTS_NOTIFY
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TRAWPRINT FROM TDOSPRINT
METHOD BEGINDOCX
METHOD INITX
METHOD PRINTMODEX
METHOD SELPRINTERX
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TREG32
DATA CREGKEY
DATA LERROR
DATA NERROR
DATA NHANDLE
DATA NKEY
METHOD CLOSE
METHOD CREATE
METHOD DELETE
METHOD GET
METHOD KEYDELETE
METHOD NEW
METHOD SET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TREPORT FROM TPRINTBASE
VAR ALINE INIT {}
VAR ANGRPBY INIT {}
VAR NFSIZE INIT 0
VAR NHFIJ INIT 0
VAR NLMARGIN INIT 0
VAR NMHOR INIT 0
VAR NMVER INIT 0
VAR NPAGER INIT 0
VAR NVFIJ INIT 0
VAR SWT INIT .F.
METHOD CLEAN
METHOD EASYREPORT1
METHOD EXTREPORT1
METHOD HEADERS
METHOD LEACOLI
METHOD LEADATO
METHOD LEADATOH
METHOD LEADATOLOGIC
METHOD LEAIMAGE
METHOD LEAROWI
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TRTFPRINT FROM TPRINTBASE
DATA APRINTRTF INIT {} READONLY // DOCUMENT LINES
DATA NPRINTRTF INIT 0 READONLY // LAST FONT SIZE USED
DATA NFONTSIZE INIT 10 READONLY // IN TPRINTBASE IS 12
DATA NMARGINLEF INIT 10 READONLY // IN MM
DATA NMARGINSUP INIT 15 READONLY // IN MM
DATA NMARGINRIG INIT 10 READONLY // IN MM
DATA NMARGININF INIT 15 READONLY // IN MM
METHOD BEGINDOCX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD INITX
METHOD PRINTDATAX
METHOD PRINTIMAGE BLOCK { || NIL }
METHOD PRINTLINEX
METHOD SELPRINTERX
METHOD SETCPL
METHOD SETPAGEMARGINS
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TSCROLLBAR FROM TCONTROL
DATA FROMHWND INIT 0
DATA LADJUST INIT .F.
DATA LAUTOMOVE INIT .F.
DATA NFACTOR INIT 1
DATA NLINESKIP INIT 0
DATA NORIENT INIT SB_VERT
DATA NPAGESKIP INIT 0
DATA NRANGEMAX INIT 100
DATA NRANGEMIN INIT 1
DATA ONBOTTOM INIT NIL
DATA ONENDTRACK INIT NIL
DATA ONLINEDOWN INIT NIL
DATA ONLINEUP INIT NIL
DATA ONPAGEDOWN INIT NIL
DATA ONPAGEUP INIT NIL
DATA ONTHUMB INIT NIL
DATA ONTOP INIT NIL
DATA ONTRACK INIT NIL
DATA SCROLLTYPE INIT SB_CTL
DATA TYPE INIT "SCROLLBAR" READONLY
MESSAGE EVENTS_HSCROLL
MESSAGE LEFT
MESSAGE LINELEFT
MESSAGE LINERIGHT
MESSAGE PAGELEFT
MESSAGE PAGERIGHT
MESSAGE RIGHT
METHOD BOTTOM
METHOD DEFINE
METHOD EVENTS_VSCROLL
METHOD LINEDOWN
METHOD LINEUP
METHOD ONLEFT SETGET
METHOD ONLINELEFT SETGET
METHOD ONLINERIGHT SETGET
METHOD ONPAGELEFT SETGET
METHOD ONPAGERIGHT SETGET
METHOD ONRIGHT SETGET
METHOD PAGE SETGET
METHOD PAGEDOWN
METHOD PAGEUP
METHOD RANGEMAX SETGET
METHOD RANGEMIN SETGET
METHOD SETRANGE
METHOD THUMB
METHOD TOP
METHOD TRACK
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TSCROLLBUTTON FROM TCONTROL
DATA LADJUST INIT .F.
DATA TYPE INIT "SCROLLBUTTON" READONLY
METHOD DEFINE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TSLIDER FROM TCONTROL
DATA NRANGEMAX INIT 10
DATA NRANGEMIN INIT 0
DATA TYPE INIT "SLIDER" READONLY
METHOD BACKCOLOR SETGET
METHOD DEFINE
METHOD EVENTS_HSCROLL
METHOD EVENTS_VSCROLL
METHOD RANGEMAX SETGET
METHOD RANGEMIN SETGET
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TSPINNER FROM TCONTROL
DATA LBOUNDTEXT
DATA NHEIGHT INIT 24
DATA NINCREMENT INIT 1
DATA NRANGEMAX INIT 100
DATA NRANGEMIN INIT 1
DATA NWIDTH INIT 120
DATA TYPE INIT "SPINNER" READONLY
METHOD DEFINE
METHOD ENABLED SETGET
METHOD EVENTS_COMMAND
METHOD FORCEHIDE
METHOD INCREMENT SETGET
METHOD RANGEMAX SETGET
METHOD RANGEMIN SETGET
METHOD SIZEPOS
METHOD VALUE SETGET
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TSPLITBOX FROM TCONTROL
DATA CGRIPPERTEXT INIT ""
DATA LFORCEBREAK INIT .T.
DATA LINVERTED INIT .F.
DATA NMINHEIGHT INIT NIL
DATA NMINWIDTH INIT NIL
DATA TYPE INIT "SPLITBOX" READONLY
METHOD ADDCONTROL
METHOD BANDGRIPPEROFF
METHOD BANDGRIPPERON
METHOD BANDHASGRIPPER
METHOD CLIENTHEIGHTUSED
METHOD DEFINE
METHOD EVENTS_SIZE
METHOD HIDEBAND
METHOD ISBANDVISIBLE
METHOD REFRESH
METHOD REFRESHDATA
METHOD SETSPLITBOX
METHOD SHOWBAND
METHOD SIZEPOS
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TSPREADSHEETPRINT FROM TPRINTBASE
DATA ADOC INIT {} READONLY
DATA NLINREL INIT 0 READONLY
DATA NLPP INIT 60 READONLY // LINES PER PAGE
DATA NXLS INIT 0 READONLY
METHOD ADDPAGE
METHOD BEGINDOCX
METHOD ENDDOCX
METHOD ENDPAGEX
METHOD INITX
METHOD PRINTDATAX
METHOD PRINTIMAGE BLOCK { || NIL }
METHOD RELEASEX
METHOD SELPRINTERX BLOCK { |SELF| SELF:CPRINTER := "BIFF" }
METHOD SETPREVIEWSIZE BLOCK { || NIL }
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTAB FROM TTABMULTI
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABCOMBO FROM TMULTIPAGE
DATA LINTERNALS INIT .F.
DATA TYPE INIT "TAB" READONLY
METHOD DEFINE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABDIRECT FROM TTABRAW
DATA APAGES INIT {}
DATA LINTERNALS INIT .F.
DATA NFIRSTVALUE INIT NIL
+ DATA bBeforeChange to TTabRaw class. This block is evaluated before
changing the selected tab. It it returns .F. the change is prevented.
+ Method Events to TTabRaw class.
METHOD ADDCONTROL
METHOD ADDPAGE
METHOD ADJUSTRESIZE
METHOD CAPTION
METHOD DEFINE
METHOD DELETECONTROL
METHOD DELETEPAGE
METHOD ENABLED SETGET
METHOD ENDPAGE
METHOD ENDTAB
METHOD FORCEHIDE
METHOD HIDEPAGE
METHOD ITEMCOUNT
METHOD PICTURE
METHOD REALPOSITION
METHOD REFRESH
METHOD REFRESHDATA
METHOD RELEASE
METHOD SHOWPAGE
METHOD SIZEPOS
METHOD VALUE SETGET
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABMULTI FROM TMULTIPAGE
DATA LINTERNALS INIT .F.
DATA TYPE INIT "TAB" READONLY
METHOD DEFINE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABPAGE FROM TCONTROLGROUP
DATA CAPTION INIT ""
DATA NIMAGE INIT -1
DATA PICTURE INIT ""
DATA POSITION INIT 0
DATA TYPE INIT "TABPAGE" READONLY
METHOD ADJUSTRESIZE
METHOD CONTAINERVISIBLE
METHOD ENDPAGE
METHOD EVENTS_SIZE
METHOD SETFOCUS
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABPAGEINTERNAL FROM TFORMINTERNAL
DATA CAPTION INIT ""
DATA LHIDDEN INIT .F.
DATA NIMAGE INIT -1
DATA PICTURE INIT ""
DATA POSITION INIT 0
DATA TYPE INIT "TABPAGE" READONLY
METHOD ADJUSTRESIZE
METHOD DEFINE
METHOD ENDPAGE
METHOD EVENTS_SIZE
METHOD SETFOCUS
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABRADIO FROM TMULTIPAGE
DATA LINTERNALS INIT .F.
DATA TYPE INIT "TAB" READONLY
METHOD DEFINE
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTABRAW FROM TCONTROL
DATA BBEFORECHANGE INIT NIL
DATA IMAGELISTCOLOR INIT CLR_DEFAULT
DATA IMAGELISTFLAGS INIT LR_LOADTRANSPARENT + LR_DEFAULTCOLOR + LR_LOADMAP3DCOLORS
DATA SETIMAGELISTCOMMAND INIT TCM_SETIMAGELIST
DATA TYPE INIT "TAB" READONLY
METHOD CAPTION
METHOD DEFINE
METHOD DELETEITEM
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD INSERTITEM
METHOD ITEMCOUNT
METHOD PICTURE
METHOD TABSAREAHEIGHT
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTEXT FROM TLABEL
DATA BWHEN INIT NIL
DATA LAUTOSKIP INIT .F.
DATA LFOCUSED INIT .F.
DATA LINSERT INIT .T.
DATA LPREVUNDO INIT .F.
DATA LSETTING INIT .F.
DATA NDEFANCHOR INIT 13
DATA NHEIGHT INIT 24
DATA NINSERTTYPE INIT 0
DATA NMAXLENGTH INIT 0
DATA NONFOCUSPOS INIT -4
DATA NWIDTH INIT 120
DATA OBUTTON1 INIT NIL
DATA OBUTTON2 INIT NIL
DATA ONTEXTFILLED INIT NIL
DATA TYPE INIT "TEXT" READONLY
DATA WHEN_PROCESING INIT .F.
DATA WHEN_PROCESSED INIT .F.
DATA XPREVUNDO INIT NIL
DATA XUNDO INIT NIL
METHOD ADDCONTROL
METHOD ADJUSTRESIZE
METHOD CARETPOS SETGET
METHOD CONTROLAREA SETGET
METHOD DEFINE
METHOD DEFINE2
METHOD DELETECONTROL
METHOD DOAUTOSKIP
METHOD ENABLED SETGET
METHOD EVENTS
METHOD EVENTS_COMMAND
METHOD GETCHARFROMPOS
METHOD GETCURRENTLINE
METHOD GETFIRSTVISIBLELINE
METHOD GETLASTVISIBLELINE
METHOD GETLINE
METHOD GETLINECOUNT
METHOD GETLINEFROMCHAR
METHOD GETLINEINDEX
METHOD GETLINELENGTH
METHOD GETRECT
METHOD GETSELECTION
METHOD GETSELTEXT
METHOD INSERTSTATUS SETGET
METHOD MAXLENGTH SETGET
METHOD READONLY SETGET
METHOD REFRESH
METHOD REFRESHDATA
METHOD SCROLLCARET
METHOD SETFOCUS
METHOD SETSELECTION
METHOD SIZEPOS
METHOD VALUE SETGET
METHOD VISIBLE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTEXTARRAY FROM TCONTROL
DATA TYPE INIT "TEXTARRAY" READONLY
METHOD ASSUMEFIXED SETGET
METHOD CLEAR
METHOD CLS
METHOD COLCOUNT SETGET
METHOD CURSORTYPE SETGET
METHOD DEFINE
METHOD DEVPOS
METHOD EVENTS
METHOD QOUT
METHOD QQOUT
METHOD ROWCOUNT SETGET
METHOD SCROLL
METHOD SETFONT
METHOD TEXTCOL SETGET
METHOD TEXTROW SETGET
METHOD WRITE
METHOD WRITELN
METHOD WRITERAW
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTEXTNUM FROM TTEXT
DATA TYPE INIT "NUMTEXT" READONLY
METHOD DEFINE
METHOD EVENTS_COMMAND
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTEXTPICTURE FROM TTEXT
DATA CDATEFORMAT INIT NIL
DATA CPICTURE INIT ""
DATA DATATYPE INIT "."
DATA LBRITISH INIT .F.
DATA LNUMERICSCROLL INIT .F.
DATA LTOUPPER INIT .F.
DATA NDECIMAL INIT 0
DATA NDECIMALSHOW INIT 0
DATA NYEAR INIT NIL
DATA PICTUREFUN INIT ""
DATA PICTUREFUNSHOW INIT ""
DATA PICTUREMASK INIT ""
DATA PICTURESHOW INIT ""
DATA TYPE INIT "TEXTPICTURE" READONLY
DATA VALIDMASK INIT {}
DATA VALIDMASKSHOW INIT {}
METHOD DEFINE
METHOD EVENTS
METHOD EVENTS_COMMAND
METHOD KEYPRESSED
METHOD PICTURE SETGET
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTIMEPICK FROM TCONTROL
DATA NHEIGHT INIT 24
DATA NWIDTH INIT 120
DATA TYPE INIT "TIMEPICK" READONLY
METHOD DEFINE
METHOD EVENTS_NOTIFY
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTIMER FROM TCONTROL
DATA INTERVAL INIT 0
DATA TYPE INIT "TIMER" READONLY
METHOD DEFINE
METHOD ENABLED SETGET
METHOD RELEASE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTOOLBAR FROM TCONTROL
DATA LADJUST INIT .T.
DATA LFIXFONT INIT .T.
DATA LTOP INIT .T.
DATA LVERTICAL INIT .F.
DATA NBUTTONHEIGHT INIT 0
DATA NBUTTONWIDTH INIT 0
DATA TYPE INIT "TOOLBAR" READONLY
METHOD ADDBUTTON
METHOD CLIENTHEIGHTUSED
METHOD DEFINE
METHOD DELETEBUTTON
METHOD EVENTS
METHOD EVENTS_COMMAND
METHOD EVENTS_NOTIFY
METHOD EVENTS_SIZE
METHOD HEIGHT SETGET
METHOD LOOKFORKEY
METHOD WIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTOOLBUTTON FROM TCONTROL
DATA CPICTURE INIT ""
DATA HIMAGE INIT 0
DATA LADJUST INIT .F.
DATA OHOTKEY INIT NIL
DATA POSITION INIT 0
DATA TYPE INIT "TOOLBUTTON" READONLY
METHOD BUFFER SETGET
METHOD DEFINE
METHOD ENABLED SETGET
METHOD EVENTS_NOTIFY
METHOD HBITMAP SETGET
METHOD PICTURE SETGET
METHOD RELEASE
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTOOLTIP FROM TCONTROL
DATA CICON INIT ''
DATA CTITLE INIT ''
DATA LMULTILINE INIT .F.
DATA NICON INIT TTI_NONE
DATA NWINDOWWIDTH INIT -1
DATA TYPE INIT "TOOLTIP" READONLY
METHOD AUTOPOPTIME SETGET
METHOD DEFINE
METHOD EVENTS_NOTIFY
METHOD ICON SETGET
METHOD INITIALTIME SETGET
METHOD ITEM
METHOD MULTILINE SETGET
METHOD RESETDELAYS
METHOD RESHOWTIME SETGET
METHOD TITLE SETGET
METHOD WINDOWWIDTH SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TTREE FROM TCONTROL
DATA AITEMIDS INIT {}
DATA ASELCOLOR INIT BLUE // background color of the select node
DATA ATARGET INIT {} // posible targets for the drop
DATA ATREEENABLED INIT {}
DATA ATREEIDMAP INIT {}
DATA ATREEMAP INIT {}
DATA ATREENODE INIT {}
DATA ATREENODRAG INIT {}
DATA ATREERO INIT {}
DATA AUTOEXPANDTIMER INIT NIL
DATA AUTOSCROLLTIMER INIT NIL
DATA BONENTER INIT NIL
DATA CTRLLASTDROP INIT nil
DATA DRAGACTIVE INIT .F. // .T. if a drag and drop operation is going on
DATA DRAGENDING INIT .F.
DATA DRAGIMAGELIST INIT 0 // contains drag image
DATA HWNDEDITCTRL INIT NIL
DATA INITVALUE INIT 0
DATA ITEMIDS INIT .F.
DATA ITEMLASTDROP INIT nil
DATA ITEMONDRAG INIT 0 // handle of the item being dragged
DATA LASTTARGET INIT Nil // last target hovered
DATA LSELBOLD INIT .F.
DATA NHEIGHT INIT 120
DATA NLASTIDNUMBER INIT 0
DATA NWIDTH INIT 120
DATA ONCHECKCHANGE INIT NIL
DATA ONLABELEDIT INIT NIL
DATA READONLY INIT .T.
DATA SETIMAGELISTCOMMAND INIT TVM_SETIMAGELIST
DATA TYPE INIT "TREE" READONLY
DATA VALID INIT NIL
METHOD ADDITEM
METHOD BACKCOLOR SETGET
METHOD BOLDITEM
METHOD CHECKITEM
METHOD COLLAPSE
METHOD COPYITEM
METHOD DEFINE
METHOD DELETEALLITEMS
METHOD DELETEITEM
METHOD EDITLABEL
METHOD ENDTREE
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD EXPAND
METHOD FIRSTVISIBLE
METHOD GETCHILDREN
METHOD GETPARENT
METHOD HANDLETOITEM
METHOD INDENT SETGET
METHOD ISITEMCOLLAPSED
METHOD ISITEMEXPANDED
METHOD ISITEMVALID
METHOD ISITEMVISIBLE
METHOD ITEM
METHOD ITEMCOUNT
METHOD ITEMDRAGGABLE
METHOD ITEMENABLED
METHOD ITEMHEIGHT SETGET
METHOD ITEMIMAGES
METHOD ITEMREADONLY
METHOD ITEMTOHANDLE
METHOD ITEMVISIBLE
METHOD LASTVISIBLE
METHOD LOOKFORKEY
METHOD MOVEITEM
METHOD NEXTVISIBLE
METHOD ONENTER SETGET
METHOD PREVVISIBLE
METHOD RELEASE
METHOD SELCOLOR SETGET
METHOD SELECTIONID SETGET
METHOD VALUE SETGET
METHOD VISIBLECOUNT
ENDCLASS
*-----------------------------------------------------------------------------*
CLASS TVirtualField
DATA BRECORDID INIT NIL
DATA HVALUES INIT NIL
DATA XAREA INIT NIL
DATA XDEFAULT INIT NIL
METHOD NEW
METHOD RECORDID
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TXBROWSE FROM TGRID
DATA ACOLUMNBLOCKS INIT NIL
DATA ADEFAULTVALUES INIT NIL
DATA AFIELDS INIT NIL
DATA AREPLACEFIELD INIT NIL
DATA BOF INIT .F.
DATA EOF INIT .F.
DATA GOBOTTOMBLOCK INIT NIL
DATA GOTOPBLOCK INIT NIL
DATA LDESCENDING INIT .F.
DATA LFORCEINPLACE INIT .T.
DATA LFIXEDBLOCKS INIT .F.
DATA LLOCKED INIT .F.
DATA LNOSHOWEMPTYROW INIT .F.
DATA LOCK INIT .F.
DATA LRECCOUNT INIT .F.
DATA LREFRESHAFTERVALUE INIT .F.
DATA LSCROLLBARUSESCLIENTAREA INIT .T.
DATA LUPDCOLS INIT .F.
DATA LVSCROLLVISIBLE INIT .F.
DATA NHELPID INIT 0
DATA ONREFRESHROW INIT NIL
DATA OWORKAREA INIT NIL
DATA REFRESHTYPE INIT REFRESH_DEFAULT
DATA SCROLLBUTTON INIT NIL
DATA SEARCHWRAP INIT .F.
DATA SKIPBLOCK INIT NIL
DATA TYPE INIT "XBROWSE" READONLY
DATA UWORKAREA INIT NIL
DATA VSCROLL INIT NIL
DATA VSCROLLCOPY INIT NIL
METHOD ADDCOLUMN
METHOD ADDITEM BLOCK { || NIL }
METHOD ADJUSTRIGHTSCROLL
METHOD APPENDITEM
METHOD COLUMNAUTOFIT
METHOD COLUMNAUTOFITH
METHOD COLUMNBLOCK
METHOD COLUMNSAUTOFIT
METHOD COLUMNSAUTOFITH
METHOD COLUMNWIDTH
METHOD CURRENTROW SETGET
METHOD DBSKIP
METHOD DEFINE
METHOD DEFINE3
METHOD DEFINE4
METHOD DELETE
METHOD DELETEALLITEMS
METHOD DELETECOLUMN
METHOD DOCHANGE
METHOD DOWN
METHOD EDITALLCELLS
METHOD EDITCELL
METHOD EDITGRID
METHOD EDITITEM
METHOD EDITITEM_B
METHOD ENABLED SETGET
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD FIXBLOCKS SETGET
METHOD FIXCONTROLS SETGET
METHOD GETCELLTYPE
METHOD GOBOTTOM
METHOD GOTOP
METHOD HELPID SETGET
METHOD INSERTITEM BLOCK { || NIL }
METHOD LEFT BLOCK { || NIL }
METHOD MOVETO
METHOD PAGEDOWN
METHOD PAGEUP
METHOD REFRESH
METHOD REFRESHDATA
METHOD REFRESHROW
METHOD RIGHT BLOCK { || NIL }
METHOD SETCOLUMN
METHOD SETCONTROLVALUE SETGET
METHOD SETSCROLLPOS
METHOD SIZEPOS
METHOD SORTCOLUMN BLOCK { || NIL }
METHOD SORTITEMS BLOCK { || NIL }
METHOD TOEXCEL
METHOD TOOLTIP SETGET
METHOD TOOPENOFFICE
METHOD TOPBOTTOM
METHOD UP
METHOD VALUE SETGET
METHOD VISIBLE SETGET
METHOD VSCROLLVISIBLE SETGET
METHOD WORKAREA SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TXBROWSEBYCELL FROM TXBROWSE
DATA TYPE INIT "XBROWSEBYCELL" READONLY
METHOD ADDCOLUMN
METHOD CURRENTCOL SETGET
METHOD DEFINE2
METHOD DEFINE3
METHOD DELETEALLITEMS
METHOD DELETECOLUMN
METHOD DOWN
METHOD EDITALLCELLS
METHOD EDITCELL
METHOD EDITGRID
METHOD EVENTS
METHOD EVENTS_NOTIFY
METHOD GOBOTTOM
METHOD GOTOP
METHOD LEFT
METHOD MOVETO
METHOD REFRESH
METHOD RIGHT
METHOD SETCONTROLVALUE SETGET
METHOD SETSELECTEDCOLORS
METHOD UP
METHOD VALUE SETGET
ENDCLASS
*------------------------------------------------------------------------------*
CLASS TWINDOW
DATA AACCELERATORKEYS INIT {}
DATA ABECOLORS INIT {{0,0,0},{0,0,0},{0,0,0},{0,0,0}}
DATA ABICOLORS INIT {{0,0,0},{0,0,0},{0,0,0},{0,0,0}}
DATA ACONTROLINFO INIT { CHR( 0 ) }
DATA ACONTROLS INIT {}
DATA ACONTROLSNAMES INIT {}
DATA ACTIVE INIT .F.
DATA ACTRLSTABINDXS INIT {}
DATA AHOTKEYS INIT {}
DATA AKEYS INIT {}
DATA APROPERTIES INIT {}
DATA BKEYDOWN INIT NIL
DATA BLOCK INIT NIL
DATA BOLD INIT .F.
DATA CARGO INIT NIL
DATA CFOCUSFONTNAME INIT ""
DATA CFONTNAME INIT ""
DATA CLIENTADJUST INIT 0
DATA CLIENTHEIGHTUSED INIT 0
DATA COLMARGIN INIT 0
DATA CONTAINER INIT NIL
DATA CONTAINERHWNDVALUE INIT NIL
DATA CONTEXTMENU INIT NIL
DATA DEFBKCOLOREDIT INIT NIL
DATA DROPENABLED INIT .F. // .T. IF CONTROL ACCEPTS DROPS
DATA FNTANGLE INIT 0
DATA FNTWIDTH INIT 0
DATA FOCUSBACKCOLOR
DATA FOCUSBOLD INIT .F.
DATA FOCUSCOLOR
DATA FOCUSITALIC INIT .F.
DATA FOCUSSTRIKEOUT INIT .F.
DATA FOCUSUNDERLINE INIT .F.
DATA HASDRAGFOCUS INIT .F. // .T. when drag image is upon the control and the control is drop enabled
DATA HDC
DATA HDYNAMICVALUES INIT NIL
DATA HSCROLLBAR INIT NIL
DATA HWND INIT 0
DATA ISADJUST INIT .F.
DATA ITALIC INIT .F.
DATA LADJUST INIT .T.
DATA LCONTROLSASPROPERTIES INIT .F.
DATA LDESTROYED INIT .F.
DATA LENABLED INIT .T.
DATA LFIXFONT INIT .F.
DATA LFIXWIDTH INIT .F.
DATA LFORM INIT .F.
DATA LINTERNAL INIT .T.
DATA LPROCMSGSONVISIBLE INIT .T.
DATA LRELEASING INIT .F.
DATA LRTL INIT .F.
DATA LVISIBLE INIT .T.
DATA LVISUALSTYLED INIT NIL PROTECTED
DATA NAME INIT ""
DATA NANCHOR INIT NIL
DATA NBORDERS INIT {0,0,0}
DATA NCOL INIT 0
DATA NDEFANCHOR INIT 3
DATA NESTEDCLICK INIT .F.
DATA NFIXEDHEIGHTUSED INIT 0
DATA NFOCUSFONTSIZE INIT 0
DATA NFONTSIZE INIT 0
DATA NHEIGHT INIT 0
DATA NOLDH INIT NIL
DATA NOLDW INIT NIL
DATA NPAINTCOUNT
DATA NROW INIT 0
DATA NWIDTH INIT 0
DATA NWINDOWSTATE INIT 0
DATA ONCLICK INIT NIL
DATA ONDBLCLICK INIT NIL
DATA ONDROP INIT {}
DATA ONDROPFILES INIT NIL
DATA ONGOTFOCUS INIT NIL
DATA ONLOSTFOCUS INIT NIL
DATA ONMCLICK INIT NIL
DATA ONMDBLCLICK INIT NIL
DATA ONMOUSEDRAG INIT NIL
DATA ONMOUSEDROP INIT NIL
DATA ONMOUSEMOVE INIT NIL
DATA ONRCLICK INIT NIL
DATA ONRDBLCLICK INIT NIL
DATA OVERWNDPROC INIT NIL
DATA PARENT INIT NIL
DATA ROWMARGIN INIT 0
DATA STRIKEOUT INIT .F.
DATA TYPE INIT ""
DATA UNDERLINE INIT .F.
DATA VARNAME INIT ""
DATA VSCROLLBAR INIT NIL
DATA WNDPROC INIT NIL
ERROR HANDLER Error
METHOD ACCELERATORKEY
METHOD ACCEPTFILES SETGET
METHOD ACTION SETGET
METHOD ADDCONTROL
METHOD ADJUST SETGET
METHOD ADJUSTANCHOR
METHOD ADJUSTRESIZE
METHOD ANCHOR SETGET
METHOD ARC
METHOD BACKBITMAP SETGET
METHOD BACKCOLOR SETGET
METHOD BACKCOLORCODE SETGET
METHOD BACKCOLORSELECTED SETGET
METHOD BOX
METHOD BRUSHHANDLE SETGET
METHOD CAPTION SETGET
METHOD CHECKCLIENTSPOS
METHOD CLICK
METHOD CLIENTHEIGHT SETGET
METHOD CLIENTSPOS
METHOD CLIENTSPOS2
METHOD CLIENTWIDTH SETGET
METHOD CONTAINERENABLED
METHOD CONTAINERRELEASING
METHOD CONTAINERVISIBLE
METHOD CONTROL
METHOD DEBUGMESSAGENAME
METHOD DEBUGMESSAGENAMECOMMAND
METHOD DEBUGMESSAGENAMENOTIFY
METHOD DEBUGMESSAGEQUERY
METHOD DEBUGMESSAGEQUERYNOTIFY
METHOD DEFWINDOWPROC
METHOD DELETECONTROL
METHOD DISABLE
METHOD DYNAMICVALUES
METHOD ELLIPSE
METHOD ENABLE
METHOD ENABLED SETGET
METHOD EVENTS
METHOD EVENTS_COLOR
METHOD EVENTS_ENTER
METHOD EVENTS_HSCROLL
METHOD EVENTS_SIZE
METHOD EVENTS_VSCROLL
METHOD FILL
METHOD FONTCOLOR SETGET
METHOD FONTCOLORCODE SETGET
METHOD FONTCOLORSELECTED SETGET
METHOD FONTHANDLE SETGET
METHOD FORCEHIDE
METHOD GETBITMAP
METHOD GETDC
METHOD GETMAXCHARSINWIDTH
METHOD GETTEXTHEIGHT
METHOD GETTEXTWIDTH
METHOD HIDE
METHOD HOTKEY
METHOD IMAGELIST SETGET
METHOD ISVISUALSTYLED
METHOD LINE
METHOD LOOKFORKEY
METHOD OBJECT
METHOD PARENTDEFAULTS
METHOD PIE
METHOD PRERELEASE
METHOD PRINT
METHOD PROPERTY
METHOD REDRAW
METHOD REFRESHDATA
METHOD RELEASE
METHOD RELEASEATTACHED
METHOD RELEASEDC
METHOD ROUNDBOX
METHOD RTL SETGET
METHOD SAVEAS
METHOD SAVEDATA
METHOD SEARCHPARENT
METHOD SETFOCUS
METHOD SETHWND
METHOD SETKEY
METHOD SETREDRAW
METHOD SETSPLITBOX
METHOD SETSPLITBOXINFO
METHOD SHOW
METHOD STARTINFO
METHOD STYLE SETGET
METHOD TABSTOP SETGET
METHOD VALUE
METHOD VISIBLE SETGET
ENDCLASS
