tsbrowse in hmg

General Help regarding HMG, Compilation, Linking, Samples

Moderator: Rathinagiri

Post Reply
jucar_es
Posts: 82
Joined: Thu Nov 13, 2008 11:12 pm

tsbrowse in hmg

Post by jucar_es »

Buen dia a todos

Carta abierta a Roberto y equipo:

ante todo disculpen mi ignorancia

que tan dificil es incluir el tsbrowse que está en hmg-extended?

es imposible?

he visto \minigui\source\tsbrowse\h_tbrowse.prg ... ! y no esta en chino

como puedo ayudar?
donde debo empezar?
aunque no hablo ingles (pero me defiendo), puedo aportar mi tiempo y entusiasmo en este proyecto

gracias por responder


--- english version
Good day to all

Open Letter to Roberto and equipment

first of all excuse my ignorance

how difficult it is to include tsbrowse HMG-extended?

is impossible?

I saw \ mini \ source \ tsbrowse \ h_tbrowse.prg ... ! and not in Chinese

How can I help?
where should I start?
although I do not speak English (but I advocate), I can contribute my time and enthusiasm in this project

thanks for answering

Juan Carlos Escobar
Bogota-Colombia
Top
User avatar
Roberto Lopez
HMG Founder
Posts: 4023
Joined: Wed Jul 30, 2008 6:43 pm

Re: tsbrowse in hmg

Post by Roberto Lopez »

jucar_es wrote:Buen dia a todos

Carta abierta a Roberto y equipo:

ante todo disculpen mi ignorancia

que tan dificil es incluir el tsbrowse que está en hmg-extended?

es imposible?

he visto \minigui\source\tsbrowse\h_tbrowse.prg ... ! y no esta en chino

como puedo ayudar?
donde debo empezar?
aunque no hablo ingles (pero me defiendo), puedo aportar mi tiempo y entusiasmo en este proyecto

gracias por responder


--- english version
Good day to all

Open Letter to Roberto and equipment

first of all excuse my ignorance

how difficult it is to include tsbrowse HMG-extended?

is impossible?

I saw \ mini \ source \ tsbrowse \ h_tbrowse.prg ... ! and not in Chinese

How can I help?
where should I start?
although I do not speak English (but I advocate), I can contribute my time and enthusiasm in this project

thanks for answering

Juan Carlos Escobar
Bogota-Colombia
I've not seen the HMG-Ex implementation, but, I guess that it could be easily ported.

You should put attention to HMG internal variables.

HMG uses a public array called '_HMG_SYSDATA' to store its internal variables. Since I've made this after the HMG-EX fork, I'm not sure about how they handle that.

In \HMG\SOURCE\H_INIT.PRG you'll find equivalences from old to new internal variables names equivalences.

Besides that, I guess that Grigory could help you on this better than me, since he has a deep knowledge about the two libraries.

Regards,

Roberto.
Regards/Saludos,

Roberto


(Veritas Filia Temporis)
Top
User avatar
sudip
Posts: 1456
Joined: Sat Mar 07, 2009 11:52 am
Location: Kolkata, WB, India

Re: tsbrowse in hmg

Post by sudip »

Hello Master Roberto,

I am too novice to comment on this. But, as an "END USER'S" point of view, it will be great helpful to us, if we can use tsbrowse with HMG. :)

With best regards.

Sudip
With best regards,
Sudip
Top
User avatar
dhaine_adp
Posts: 457
Joined: Wed Aug 06, 2008 12:22 pm
Location: Manila, Philippines

Re: tsbrowse in hmg

Post by dhaine_adp »

Hello to all,

I have also reviewed the implementation of TSBrowse in HMG-Ex and porting the same code to HMG seems not easy. TBrowse.prg has an object inheritance to CLASS TSBROWSE FROM TCONTROL. Thus, it means TCONTROL needs to be ported to HMG too.

However both of those CLASSES is not present with HMG and if porting is too complex to be done, then I believed it should be written from ground up as LibTSBrowse.a rather than as a user component.

In analyzing how to port those codes to HMG I have extracted these declarations including their line numbers from Harbour MiniGUI 1.4 Extended Edition (Build 49) - 2008.02.29 as follows:

(I am hoping that I never offended anyone in posting these source code snapshots but for the sole purpose of dicussing technical things to achieve something good, I believed what I did is justifiable).

Code: Select all

Program Name: E:\TRASH\EX\h_controlmisc1.prg
   FUNCTION CVALTOCHAR(XVALUE) (6)
   FUNCTION GETTEXTHEIGHT(HWND, HDC) (29)
   FUNCTION _GETKEYSTATE( VKEY ) (33)
   FUNCTION _INVERTRECT(HDC, AREC) (38)

Program Name: E:\TRASH\EX\h_tbrowse.prg
   FUNCTION _DEFINETBROWSE ( CONTROLNAME, PARENTFORMNAME, NCOL, NROW, NWIDTH, NHEIGHT,; (58)
   FUNCTION _ENDTBROWSE () (276)
   FUNCTION LOADFIELDS( CONTROLNAME, PARENTFORM, LEDIT, AFIELDNAMES) (292)
   FUNCTION SETARRAY( CONTROLNAME, PARENTFORM, ARR, LLBX, LLOADARR) (301)
   CLASS TSBROWSE FROM TCONTROL (358)
   METHOD NEW( NROW, NCOL, NWIDTH, NHEIGTH, BLINE, AHEADERS, ; (524)
   METHOD ADDCOLUMN( OCOLUMN ) (536)
   METHOD SETCOLUMN( OCOLUMN, NCOL ) (538)
   METHOD ADDSUPERHEAD( NFROMCOL, NTOCOL, UHEAD, NHEIGHT, ACOLORS, L3DLOOK, ; (540)
   METHOD BEGINPAINT() INLINE IF( ::LREPAINT, SUPER:BEGINPAINT(), 0 ) (544)
   METHOD BUGUP() INLINE ::UPSTABLE() (546)
   METHOD BICLR( UCLRODD, UCLRPAIR ) (548)
   METHOD CHANGEFONT( OFONT, NCOLUMN, NLEVEL ) (550)
   METHOD DBSKIPPER( NTOSKIP ) (552)
   METHOD DEFAULT() (554)
   METHOD DEL( NITEM ) (556)
   METHOD DELETEROW( LALL ) (558)
   METHOD DELCOLUMN( NPOS ) (560)
   METHOD DESTROY() (562)
   METHOD DISPLAY() (564)
   METHOD DRAWFOOTERS() INLINE ::DRAWHEADERS( .T. ) (566)
   METHOD DRAWICONS() (570)
   METHOD DRAWLINE( NROW ) (572)
   METHOD DRAWPRESSED( NCELL, LPRESSED ) (574)
   METHOD DRAWSELECT() (576)
   METHOD DRAWSUPER() (578)
   METHOD DRAWHEADERS() (580)
   METHOD EDIT( UVAR, NCOL, NKEY, NFLAGS ) (582)
   METHOD EDITEXIT( NCOL, NKEY, UVAR, BVALID, LLOSTFOCUS ) (584)
   METHOD ENDPAINT()   INLINE IF( ::LREPAINT, SUPER:ENDPAINT(), ; (586)
   METHOD EXCEL2( CXLSFILE, LACTIVATE, HPROGRESS, CTITLE, LSAVE ) (589)
   METHOD EXCELOLE( CXLSFILE, LACTIVATE, HPROGRESS, CTITLE, OFONT, LSAVE ) (591)
   METHOD EXCHANGE( NCOL1, NCOL2 )  INLINE ::SWITCHCOLS( NCOL1, NCOL2), ; (593)
   METHOD EXPLOCATE( CEXP ) (595)
   METHOD EXPSEEK( CEXP, LSOFT ) (597)
   METHOD FREEZECOL( LNEXT ) (599)
   METHOD GETCOLSIZES() INLINE ; (601)
   METHOD GETCOLUMN( NCOL ) (604)
   METHOD GETDLGCODE( NLASTKEY ) (606)
   METHOD GETREALPOS( NRELPOS ) (608)
   METHOD GETTXTROW( NROWPIX ) INLINE ; (610)
   METHOD GOBOTTOM() (616)
   METHOD GODOWN() (618)
   METHOD GOEND() (620)
   METHOD GOHOME() (622)
   METHOD GOLEFT() (624)
   METHOD GONEXT() (626)
   METHOD GOPOS( NNEWROW, NNEWCOL ) (628)
   METHOD GORIGHT() (630)
   METHOD GOTFOCUS( HCTLLOST ) (632)
   METHOD GOTOP() (634)
   METHOD GOUP() (636)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (639)
   METHOD HILITECELL( NCOL, NCOLPIX ) (641)
   METHOD HSCROLL( NWPARAM, NLPARAM ) (643)
   METHOD HTHUMBDRAG( NNEWCOL ) (645)
   METHOD INSCOLUMN( NPOS, OCOLUMN ) (651)
   METHOD INSERT( CITEM, NAT ) (653)
   METHOD ADDITEM( CITEM ) (655)
   METHOD ISCOLVISIBLE( NCOL ) (657)
   METHOD ISCOLVIS2( NCOL ) (659)
   METHOD ISEDITABLE( NCOL ) INLINE ::LCELLBRW .AND. ::ACOLUMNS[ NCOL ]:LEDIT .AND. ; (661)
   METHOD KEYCHAR( NKEY, NFLAGS ) (665)
   METHOD KEYDOWN( NKEY, NFLAGS ) (667)
   METHOD KEYUP( NKEY, NFLAGS ) (669)
   METHOD LBUTTONDOWN( NROWPIX, NCOLPIX, NKEYFLAGS ) (671)
   METHOD LBUTTONUP( NROWPIX, NCOLPIX, NKEYFLAGS ) (673)
   METHOD LCLOSEAREA() INLINE IF( ::LISDBF .AND. ! EMPTY( ::CALIAS ), ( ; (675)
   METHOD LDBLCLICK( NROWPIX, NCOLPIX, NKEYFLAGS ) (679)
   METHOD LEDITCOL( UVAR, NCOL, CPICTURE, BVALID, NCLRFORE, NCLRBACK ) (681)
   METHOD LIGNOREKEY( NKEY, NFLAGS ) (683)
   METHOD LOADFIELDS( LEDITABLE, ANAMES ) (685)
   METHOD LOADRELATED( CALIAS, LEDITABLE, ANAMES ) (687)
   METHOD LOOK3D( LONOFF, NCOLUMN, NLEVEL, LPHANTOM ) (689)
   METHOD LOSTFOCUS( HCTLFOCUS ) (691)
   METHOD MBUTTONDOWN( NROW, NCOL, NKEYFLAGS ) (693)
   METHOD MOUSEMOVE( NROWPIX, NCOLPIX, NKEYFLAGS ) (695)
   METHOD MOUSEWHEEL( NKEYS, NDELTA, NXPOS, NYPOS ) (697)
   METHOD MOVECOLUMN( NCOLPOS, NNEWPOS ) (699)
   METHOD NATCOL( NCOLPIX, LACTUAL ) (701)
   METHOD NATICON( NROW, NCOL ) (703)
   METHOD NCOLCOUNT() INLINE LEN( ::ACOLUMNS ) (705)
   METHOD NLOGICPOS() (707)
   METHOD NROWCOUNT() INLINE ; (709)
   METHOD PAGEUP( NLINES ) (714)
   METHOD PAGEDOWN( NLINES ) (716)
   METHOD PAINT() (718)
   METHOD PANHOME() (720)
   METHOD PANEND() (722)
   METHOD PANLEFT() (724)
   METHOD PANRIGHT() (726)
   METHOD POSTEDIT( UTEMP, NCOL, BVALID ) (728)
   METHOD RBUTTONDOWN( NROWPIX, NCOLPIX, NKEYFLAGS ) (730)
   METHOD REFRESH( LPAINT ) INLINE IF( ::LFIRSTPAINT == NIL .OR. ::LFIRSTPAINT, 0, ( ; (734)
   METHOD RELPOS( NLOGICPOS ) (737)
   METHOD REPORT( CTITLE, ACOLS, LPREVIEW, LMULTIPLE, LLANDSCAPE ) (739)
   METHOD RESET( CFIELD, UVAL1, UVAL2 ) (741)
   METHOD RESETBARPOS( LINIT ) (743)
   METHOD RESETSEEK() (745)
   METHOD RESIZE( NSIZETYPE, NWIDTH, NHEIGHT ) (747)
   METHOD TSBRWSCROLL( NDIR ) INLINE ; (749)
   METHOD SEEK( NKEY ) (756)
   METHOD SET3DTEXT( LONOFF, NCOLUMN, NLEVEL, NCLRLIGHT, NCLRSHADOW ) (758)
   METHOD SETALIGN( NCOLUMN, NLEVEL, NALIGN ) (760)
   METHOD SETAPPENDMODE( LMODE ) (762)
   METHOD SETARRAY( AARRAY ) (764)
   METHOD SETBTNGET( NCOL, CRESNAME, BACTION, NBMPWIDTH ) (766)
   METHOD SETCOLMSG( CMSG, CEDITMSG, NCOL ) (768)
   METHOD SETCOLOR( XCOLOR1, XCOLOR2, NCOLUMN ) (770)
   METHOD SETCOLSIZE( NCOL, NWIDTH ) (772)
   METHOD SETCOLUMNS( ADATA, AHEADERS, ACOLSIZES ) (774)
   METHOD SETDELETEMODE( LONOFF, LCONFIRM, BDELETE, BPOSTDEL ) (776)
   METHOD SETHEADERS( NHEIGHT, ACOLS, ATITLES, AALIGN , AL3DLOOK, AFONTS, ; (778)
   METHOD SETDATA( NCOLUMN, BDATA, ALIST ) (781)
   METHOD SETFILTER( CFIELD, UVAL1, UVAL2 ) (783)
   METHOD SETFONT( HFONT ) (785)
   METHOD SETINDEXCOLS( ACOLS ) (787)
   METHOD SETITEMS( AITEMS ) INLINE ::SETARRAY( AITEMS, .T. ) (789)
   METHOD SETDBF( ) (791)
   METHOD SETORDER( NCOLUMN, CPREFIX ) (793)
   METHOD SETSELECTMODE( LONOFF, BSELECTED, UBMPSEL, NCOLSEL, NALIGN ) (795)
   METHOD SETSPINNER( NCOLUMN, LONOFF, BUP, BDOWN, BMIN, BMAX ) (797)
   METHOD SHOWSIZES() (799)
   METHOD SKIP( N ) (801)
   METHOD SORTARRAY( NCOL, LDESCEND ) (803)
   METHOD SWITCHCOLS( NCOL1, NCOL2 ) (805)
   METHOD SYNCCHILD( AOCHILDBRW, ABACTION ) (807)
   METHOD UPSTABLE() (809)
   METHOD PROPER( CTEXT ) (811)
   METHOD VERTLINE( NCOLPOS, NCOLINIT, NGAPP ) (813)
   METHOD VSCROLL( NWPARAM, NLPARAM ) (815)
   METHOD ENABLED(LENAB) (817)
   METHOD HIDECOLUMNS( NCOLUMN , LHIDE) (819)
   METHOD NEW( CCONTROLNAME, NROW, NCOL, NWIDTH, NHEIGHT, BLINE, AHEADERS, ACOLSIZES, CPARENTWND,; (828)
   METHOD ADDCOLUMN( OCOLUMN ) CLASS TSBROWSE (1034)
   METHOD SETCOLUMN( OCOLUMN, NCOL ) CLASS TSBROWSE (1128)
   METHOD ADDSUPERHEAD( NFROMCOL, NTOCOL, UHEAD, NHEIGHT, ACOLORS, L3DLOOK, ; (1232)
   METHOD BICLR( UCLRODD, UCLRPAIR ) CLASS TSBROWSE (1368)
   METHOD CHANGEFONT( HFONT, NCOLUMN, NLEVEL ) CLASS TSBROWSE (1382)
   METHOD DBSKIPPER( NTOSKIP ) CLASS TSBROWSE (1486)
   METHOD DEFAULT() CLASS TSBROWSE (1558)
   METHOD DEL( NITEM ) CLASS TSBROWSE (1821)
   METHOD DELCOLUMN( NPOS ) CLASS TSBROWSE (1840)
   METHOD DELETEROW( LALL ) CLASS TSBROWSE (1924)
   METHOD DESTROY() CLASS TSBROWSE (2074)
   METHOD DISPLAY() CLASS TSBROWSE (2100)
   METHOD DRAWHEADERS( LFOOTERS ) CLASS TSBROWSE (2142)
   METHOD DRAWICONS() CLASS TSBROWSE (2467)
   METHOD DRAWLINE( XROW ) CLASS TSBROWSE (2517)
   METHOD DRAWPRESSED( NCELL, LPRESSED ) CLASS TSBROWSE (2734)
   METHOD DRAWSELECT() CLASS TSBROWSE (2792)
   METHOD DRAWSUPER() CLASS TSBROWSE (3082)
   METHOD EDIT( UVAR, NCELL, NKEY, NKEYFLAGS, CPICTURE, BVALID, NCLRFORE, ; (3307)
   METHOD EDITEXIT( NCOL, NKEY, UVAR, BVALID, LLOSTFOCUS  ) CLASS TSBROWSE (3650)
   METHOD EXCEL2( CFILE, LACTIVATE, HPROGRESS, CTITLE, LSAVE ) CLASS TSBROWSE (3815)
   METHOD EXCELOLE( CXLSFILE, LACTIVATE, HPROGRESS, CTITLE, ; (4087)
   METHOD EXPLOCATE( CEXP ) CLASS TSBROWSE (4312)
   METHOD EXPSEEK( CEXP, LSOFT ) CLASS TSBROWSE (4398)
   METHOD FREEZECOL( LNEXT ) CLASS TSBROWSE (4494)
   METHOD GETCOLUMN( NCOL ) CLASS TSBROWSE (4517)
   METHOD GETDLGCODE( NLASTKEY ) CLASS TSBROWSE (4533)
   METHOD GETREALPOS( NRELPOS ) CLASS TSBROWSE (4553)
   METHOD GOBOTTOM() CLASS TSBROWSE (4572)
   METHOD GODOWN() CLASS TSBROWSE (4632)
   METHOD GOEND() CLASS TSBROWSE (4752)
   METHOD GOHOME() CLASS TSBROWSE (4826)
   METHOD GOLEFT()  CLASS TSBROWSE (4875)
   METHOD GONEXT() CLASS TSBROWSE (4971)
   METHOD GOPOS( NNEWROW, NNEWCOL ) CLASS TSBROWSE (5082)
   METHOD GORIGHT() CLASS TSBROWSE (5248)
   METHOD GOTFOCUS( HCTLLOST ) CLASS TSBROWSE (5345)
   METHOD GOTOP() CLASS TSBROWSE (5425)
   METHOD GOUP() CLASS TSBROWSE (5495)
   METHOD KEYCHAR( NKEY, NFLAGS )  CLASS TSBROWSE (5592)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TSBROWSE (5665)
   METHOD KEYUP( NKEY, NFLAGS ) CLASS TSBROWSE (5895)
   METHOD LBUTTONDOWN( NROWPIX, NCOLPIX, NKEYFLAGS ) CLASS TSBROWSE (5919)
   METHOD LBUTTONUP( NROWPIX, NCOLPIX, NFLAGS ) CLASS TSBROWSE (6181)
   METHOD LDBLCLICK( NROWPIX, NCOLPIX, NKEYFLAGS ) CLASS TSBROWSE (6233)
   METHOD LOADFIELDS( LEDITABLE, ANAMES ) CLASS TSBROWSE (6313)
   METHOD NATCOL( NCOLPIXEL, LACTUAL ) CLASS TSBROWSE (6396)
   METHOD NATICON( NROW, NCOL ) CLASS TSBROWSE (6430)
   METHOD NLOGICPOS() CLASS TSBROWSE (6449)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TSBROWSE (6481)
   METHOD HILITECELL( NCOL, NCOLPIX ) CLASS TSBROWSE (6530)
   METHOD HSCROLL( NWPARAM, NLPARAM ) CLASS TSBROWSE (6635)
   METHOD HTHUMBDRAG( NNEWCOL ) CLASS TSBROWSE (6697)
   METHOD INSPECT( CDATA ) CLASS TSBROWSE (6752)
   METHOD INSCOLUMN( NPOS, OCOLUMN ) CLASS TSBROWSE (6765)
   METHOD ISCOLVISIBLE( NCOL ) CLASS TSBROWSE (6834)
   METHOD ISCOLVIS2( NCOL ) CLASS TSBROWSE (6870)
   METHOD INSERT( CITEM, NAT ) CLASS TSBROWSE (6907)
   METHOD ADDITEM( CITEM ) CLASS TSBROWSE (6933)
   METHOD LEDITCOL( UVAR, NCOL, CPICTURE, BVALID, NCLRFORE, NCLRBACK ) CLASS TSBROWSE (6981)
   METHOD LIGNOREKEY( NKEY, NFLAGS ) CLASS TSBROWSE (7004)
   METHOD LOADRELATED( CALIAS, LEDITABLE, ANAMES, AHEADERS ) CLASS TSBROWSE (7036)
   METHOD LOOK3D( LONOFF, NCOLUMN, NLEVEL, LPHANTOM ) CLASS TSBROWSE (7106)
   METHOD LOSTFOCUS( HCTLFOCUS ) CLASS TSBROWSE (7153)
   METHOD MBUTTONDOWN( NROW, NCOL, NKEYFLAGS ) CLASS TSBROWSE (7221)
   METHOD MOUSEMOVE( NROWPIX, NCOLPIX, NKEYFLAGS ) CLASS TSBROWSE (7233)
   METHOD MOUSEWHEEL( NKEYS, NDELTA, NXPOS, NYPOS ) CLASS TSBROWSE (7343)
   METHOD MOVECOLUMN( NCOLPOS, NNEWPOS ) CLASS TSBROWSE (7384)
   METHOD PAGEDOWN( NLINES ) CLASS TSBROWSE (7432)
   METHOD PAGEUP( NLINES ) CLASS TSBROWSE (7545)
   METHOD PAINT() CLASS TSBROWSE (7656)
   METHOD PANEND() CLASS TSBROWSE (7831)
   METHOD PANHOME() CLASS TSBROWSE (7896)
   METHOD PANLEFT() CLASS TSBROWSE (7956)
   METHOD PANRIGHT() CLASS TSBROWSE (8039)
   METHOD PROPER( CSTRING ) CLASS TSBROWSE (8141)
   METHOD POSTEDIT( UTEMP, NCOL, BVALID ) CLASS TSBROWSE (8171)
   METHOD RBUTTONDOWN( NROWPIX, NCOLPIX, NFLAGS ) CLASS TSBROWSE (8432)
   METHOD _RECCOUNT() CLASS TSBROWSE (8521)
   METHOD RELPOS( NLOGICPOS ) CLASS TSBROWSE (8554)
   METHOD REPORT( CTITLE, ACOLS, LPREVIEW, LMULTIPLE, LLANDSCAPE, LFROMPOS ) CLASS TSBROWSE (8570)
   METHOD RESET( CFIELD, UVAL1, UVAL2 ) CLASS TSBROWSE (8655)
   METHOD RESETBARPOS( LINIT ) CLASS TSBROWSE (8704)
   METHOD RESETSEEK() CLASS TSBROWSE (8852)
   METHOD RESIZE( NSIZETYPE, NWIDTH, NHEIGHT ) CLASS TSBROWSE (8874)
   METHOD SEEK( NKEY ) CLASS TSBROWSE (8917)
   METHOD SET3DTEXT( LONOFF, LRAISED, NCOLUMN, NLEVEL, NCLRLIGHT, ; (9255)
   METHOD SETALIGN( NCOLUMN, NLEVEL, NALIGN ) CLASS TSBROWSE (9372)
   METHOD SETAPPENDMODE( LMODE ) CLASS TSBROWSE (9420)
   METHOD SETARRAY( AARRAY, LLISTBOX, LLOADARRAY ) CLASS TSBROWSE (9438)
   METHOD SETBTNGET( NCOLUMN, CRESNAME, BACTION, NBMPWIDTH ) CLASS TSBROWSE (9584)
   METHOD SETCOLMSG( CMSG, CEDITMSG, NCOL ) CLASS TSBROWSE (9603)
   METHOD SETCOLOR( XCOLOR1, XCOLOR2, NCOLUMN ) CLASS TSBROWSE (9629)
   METHOD SETCOLUMNS( ADATA, AHEADERS, ACOLSIZES ) CLASS TSBROWSE (9911)
   METHOD SETCOLSIZE( NCOL, NWIDTH ) CLASS TSBROWSE (9946)
   METHOD SETDATA( NCOLUMN, BDATA, ALIST ) CLASS TSBROWSE (9971)
   METHOD SETDELETEMODE( LONOFF, LCONFIRM, BDELETE, BPOSTDEL ) CLASS TSBROWSE (10009)
   METHOD SETFILTER( CFIELD, UVAL1, UVAL2 ) CLASS TSBROWSE (10025)
   METHOD SETFONT( HFONT ) CLASS TSBROWSE (10092)
   METHOD SETHEADERS( NHEIGHT, ACOLS, ATITLES, AALIGN , AL3DLOOK, AFONTS, ; (10104)
   METHOD SETINDEXCOLS( NCOL1, NCOL2, NCOL3, NCOL4, NCOL5 ) CLASS TSBROWSE (10182)
   METHOD SETDBF( ) CLASS TSBROWSE (10202)
   METHOD SETORDER( NCOLUMN, CPREFIX, LDESCEND ) CLASS TSBROWSE (10222)
   METHOD SETSPINNER( NCOLUMN, LONOFF, BUP, BDOWN, BMIN, BMAX ) CLASS TSBROWSE (10336)
   METHOD SHOWSIZES() CLASS TSBROWSE (10359)
   METHOD SKIP( N ) CLASS TSBROWSE (10383)
   METHOD SORTARRAY( NCOL, LDESCEND ) CLASS TSBROWSE (10415)
   METHOD SWITCHCOLS( NCOL1, NCOL2 ) CLASS TSBROWSE (10454)
   METHOD SYNCCHILD( AOCHILDBRW, ABACTION ) CLASS TSBROWSE (10486)
   METHOD UPSTABLE() CLASS TSBROWSE (10512)
   METHOD VERTLINE( NCOLPIXPOS, NCOLINIT, NGAPP ) CLASS TSBROWSE (10593)
   METHOD VSCROLL( NWPARAM, NLPARAM ) CLASS TSBROWSE (10641)
   METHOD ENABLED(LENAB)  CLASS TSBROWSE (10743)
   METHOD HIDECOLUMNS( NCOLUMN , LHIDE) CLASS TSBROWSE (10772)
   STATIC FUNCTION _ADATA( AFIELDS ) (10816)
   STATIC FUNCTION ACLONE( ASOURCE ) (10835)
   STATIC FUNCTION ASEEK( USEEK, LSOFT, OBRW ) (10849)
   STATIC FUNCTION BRWGOBOTTOM( UEXPR, OBRW ) (10893)
   STATIC FUNCTION BRWGOTOP( OBRW ) (10922)
   STATIC FUNCTION BUILDSKIP( CALIAS, CFIELD, UVALUE1, UVALUE2, OTB ) (10938)
   STATIC FUNCTION BUILDFILTR( CFIELD, UVALUE1, UVALUE2, OTB ) (10987)
   STATIC FUNCTION BRWGOTO( N, BWHILE, OTB ) (11036)
   STATIC FUNCTION DATESEEK( CSEEK, NKEY ) (11103)
   METHOD SETSELECTMODE( LONOFF, BSELECTED, UBMPSEL, NCOLSEL, NALIGN ) CLASS TSBROWSE (11145)
   STATIC FUNCTION EMPTYALIAS( CALIAS ) (11187)
   STATIC FUNCTION FIELDSETGETBLOCK( CALIAS, N ) (11215)
   STATIC FUNCTION GENDATA( AARRAY, NPOS ) (11225)
   STATIC FUNCTION GENFOOT( AARRAY, NPOS ) (11260)
   STATIC FUNCTION GENHEAD( AARRAY, NPOS ) (11268)
   STATIC FUNCTION GETUNIQUENAME( CNAME ) (11296)
   STATIC FUNCTION _ISCHAR( NKEY ) (11306)
   STATIC FUNCTION _ISNUMERIC( NKEY ) (11316)
   STATIC FUNCTION MAKEBLOCK( SELF, NI ) (11325)
   STATIC FUNCTION SETHEIGHTS( OBRW ) (11353)
   STATIC FUNCTION FILERENAME( OBRW, COLDNAME, CNEWNAME, LERASE ) (11493)

Program Name: E:\TRASH\EX\SBMSG.PRG
   FUNCTION LOADMSG() (9)

Program Name: E:\TRASH\EX\SCRLLBAR.PRG
   CLASS TSBSCRLBAR (20)
   METHOD NEW( NROW, NCOL, NMIN, NMAX, NPGSTEP, LVERTICAL, OWND, NWIDTH,; (34)
   METHOD WINNEW( NMIN, NMAX, NPGSTEP, LVERTICAL, OWND, BUPACTION,; (39)
   METHOD REDEFINE( NID, NMIN, NMAX, NPGSTEP, OWND, BUPACTION, BDOWNACTION, ; (43)
   METHOD GETPOS() INLINE GETSCROLLPOS( IF( ::LISCHILD, ::OWND:HWND, ::HWND ),; (48)
   METHOD GETRANGE() INLINE GETSCRLRANGE( IF( ::LISCHILD, ::OWND:HWND, ::HWND ),; (51)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (54)
   METHOD GOUP()   BLOCK { | SELF, NPOS | NPOS := ::GETPOS(),; (62)
   METHOD GODOWN() BLOCK { | SELF, NPOS | NPOS := ::GETPOS(),; (67)
   METHOD GOTOP() INLINE  ::SETPOS( ::NMIN ),; (73)
   METHOD GOBOTTOM() INLINE  ::SETPOS( ::NMAX ),; (76)
   METHOD PAGEUP() INLINE  IF( ::BPAGEUP != NIL, EVAL( ::BPAGEUP ),),; (79)
   METHOD PAGEDOWN() INLINE  IF( ::BPAGEDOWN != NIL, EVAL( ::BPAGEDOWN ),),; (82)
   METHOD SETMODE( L32BIT ) (85)
   METHOD SETPAGE( NSIZE ) (87)
   METHOD SETPOS( NPOS ) INLINE SETSCROLLPOS( IF( ::LISCHILD, ::OWND:HWND, ; (89)
   METHOD SETRANGE( NMIN, NMAX ) INLINE ; (95)
   METHOD THUMBPOS( NPOS ) INLINE  IF( ::BPOS != NIL, EVAL( ::BPOS, NPOS ),) (100)
   METHOD MOUSEMOVE( NROW, NCOL, NKEYFLAGS ) (102)
   METHOD THUMBTRACK( NPOS ) INLINE IF( ::BTRACK != NIL, ; (104)
   METHOD NEW( NROW, NCOL, NMIN, NMAX, NPGSTEP, LVERTICAL, OWND, NWIDTH, NHEIGHT,; (114)
   METHOD WINNEW( NMIN, NMAX, NPGSTEP, LVERTICAL, OWND, BUPACTION,; (175)
   METHOD REDEFINE( NID, NMIN, NMAX, NPGSTEP, OWND, BUPACTION, BDOWNACTION, ; (213)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TSBSCRLBAR (253)
   METHOD MOUSEMOVE( NROW, NCOL, NKEYFLAGS ) CLASS TSBSCRLBAR (289)
   METHOD SETPAGE( NSIZE, LREDRAW ) CLASS TSBSCRLBAR (299)
   METHOD SETMODE( L32BIT ) CLASS TSBSCRLBAR (326)

Program Name: E:\TRASH\EX\TBtnBox.prg
   CLASS TBTNBOX FROM TCONTROL (14)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, CPICT, ; (21)
   METHOD DEFAULT() (24)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (25)
   METHOD GETDLGCODE( NLASTKEY ) (26)
   METHOD KEYCHAR( NKEY, NFLAGS ) (27)
   METHOD KEYDOWN( NKEY, NFLAGS ) (28)
   METHOD LOSTFOCUS( HCTLFOCUS ) (29)
   METHOD LVALID() (30)
   METHOD LBUTTONDOWN( NROW, NCOL ) (31)
   METHOD GETVAL() (32)
   METHOD COMMAND( NWPARAM, NLPARAM ) (33)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, CPICT, ; (42)
   METHOD DEFAULT() CLASS TBTNBOX (120)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TBTNBOX (137)
   METHOD GETDLGCODE( NLASTKEY, NFLAGS ) CLASS TBTNBOX (152)
   METHOD KEYCHAR( NKEY, NFLAGS ) CLASS TBTNBOX (163)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TBTNBOX (178)
   METHOD LVALID() CLASS TBTNBOX (199)
   METHOD LOSTFOCUS( HCTLFOCUS ) CLASS TBTNBOX (213)
   METHOD LBUTTONDOWN( NROW, NCOL ) CLASS TBTNBOX (235)
   METHOD GETVAL() CLASS TBTNBOX (252)
   METHOD COMMAND( NWPARAM, NLPARAM ) CLASS  TBTNBOX (268)

Program Name: E:\TRASH\EX\TComboBox.prg
   CLASS TCOMBOBOX FROM TCONTROL (20)
   METHOD NEW( NROW, NCOL, BSETGET, AGETDATA, NWIDTH, NHEIGHT, OWND, BCHANGE,; (27)
   METHOD DEFAULT( AGETDATA ) (30)
   METHOD GETDLGCODE( NLASTKEY ) (31)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (32)
   METHOD KEYDOWN( NKEY, NFLAGS ) (33)
   METHOD KEYCHAR( NKEY, NFLAGS ) (34)
   METHOD LBUTTONDOWN( NROW, NCOL ) (35)
   METHOD LOSTFOCUS() (36)
   METHOD NEW( NROW, NCOL, BSETGET, AGETDATA, NWIDTH, NHEIGHT, OWND, BCHANGED,; (45)
   METHOD DEFAULT() CLASS TCOMBOBOX (112)
   METHOD GETDLGCODE( NLASTKEY, NFLAGS ) CLASS TCOMBOBOX (128)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TCOMBOBOX (138)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TCOMBOBOX (161)
   METHOD LOSTFOCUS() CLASS TCOMBOBOX (184)
   METHOD KEYCHAR( NKEY, NFLAGS ) CLASS TCOMBOBOX (221)
   METHOD LBUTTONDOWN( NROW, NCOL ) CLASS TCOMBOBOX (244)

Program Name: E:\TRASH\EX\TControl.prg
   CLASS TCONTROL (32)
   METHOD ADDCONTROL( HCONTROL ) INLINE ; (96)
   METHOD ADDVARS(HCONTROL) (100)
   METHOD CHANGE() VIRTUAL (102)
   METHOD CLICK() INLINE  ::OWND:AEVALWHEN() (104)
   METHOD INIT( HDLG ) (106)
   METHOD COLORS( HDC ) (108)
   METHOD COORSUPDATE() (110)
   METHOD CREATE( CCLSNAME ) (112)
   METHOD DEFAULT() (114)
   METHOD DELVARS(HCONTROL) (116)
   METHOD DISPLAY()              VIRTUAL (118)
   METHOD DRAWITEM( NPSTRUCT )   VIRTUAL (120)
   METHOD END() (122)
   METHOD ERASEBKGND( HDC ) (124)
   METHOD FILLMEASURE()          VIRTUAL (126)
   METHOD FORWHEN() (128)
   METHOD GETDLGCODE( NLASTKEY ) (130)
   METHOD GETCLIRECT() (132)
   METHOD GETRECT() (134)
   METHOD GETNEWID() INLINE ++NID (136)
   METHOD GOTFOCUS( HCTLLOST ) (138)
   METHOD GONEXTCTRL( HCTRL ) (140)
   METHOD GOPREVCTRL( HCTRL ) (142)
   METHOD LOSTFOCUS(HWNDGETFOCUS) (144)
   METHOD _NWIDTH( NNEWWIDTH ) INLINE GETWINDOWWIDTH( ::HWND, NNEWWIDTH ) (146)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (148)
   METHOD KEYCHAR( NKEY, NFLAGS ) (150)
   METHOD KEYDOWN( NKEY, NFLAGS ) (151)
   METHOD KEYUP( NKEY, NFLAGS ) VIRTUAL (152)
   METHOD KILLFOCUS( HCTLFOCUS ) (154)
   METHOD VARPUT( UVAL ) INLINE  IF( VALTYPE( ::BSETGET ) == "B",; (156)
   METHOD VARGET() INLINE IF( VALTYPE( ::BSETGET ) == "B", EVAL( ::BSETGET ),) (159)
   METHOD LBUTTONDOWN( NROW, NCOL, NKEYFLAGS ) (161)
   METHOD LBUTTONUP( NROW, NCOL, NKEYFLAGS ) (163)
   METHOD MOUSEMOVE( NROW, NCOL, NKEYFLAGS ) (165)
   METHOD PAINT() VIRTUAL (167)
   METHOD SUPERKEYDOWN( NKEY, NFLAGS ) (169)
   METHOD NWIDTH( NNEWWIDTH ) INLINE GETWINDOWWIDTH( ::HWND, NNEWWIDTH ) (171)
   METHOD ENDPAINT() INLINE ::NPAINTCOUNT--,; (175)
   METHOD REGISTER( NCLSSTYLE ) (178)
   METHOD LWHEN() INLINE  IF( ::BWHEN != NIL, EVAL( ::BWHEN ), .T. ) (182)
   METHOD RBUTTONUP( NROW, NCOL, NKEYFLAGS ) (184)
   METHOD CAPTURE() INLINE  SETCAPTURE( ::HWND ) (186)
   METHOD GETDC() INLINE ; (188)
   METHOD RELEASEDC() INLINE  ::NPAINTCOUNT--, IF( ::NPAINTCOUNT == 0,; (192)
   METHOD POSTMSG( NMSG, NWPARAM, NLPARAM ) INLINE ; (195)
   METHOD LVALID() INLINE IF( ::BVALID != NIL, EVAL( ::BVALID ), .T. ) (198)
   METHOD SETMSG( CTEXT, LDEFAULT ) (200)
   METHOD LWHEN() INLINE  IF( ::BWHEN != NIL, EVAL( ::BWHEN ), .T. ) (202)
   METHOD KEYDOWN( NKEY, NFLAGS ) (204)
   METHOD SETCOLOR( NCLRFORE, NCLRBACK, HBRUSH ) (206)
   METHOD ENDCTRL() BLOCK ; (208)
   METHOD POSTMSG( NMSG, NWPARAM, NLPARAM ) INLINE ; (211)
   METHOD HIDE() INLINE SHOWWINDOW( ::HWND, SW_HIDE ) (214)
   METHOD SHOW() INLINE  SHOWWINDOW( ::HWND, SW_SHOWNA ) (216)
   METHOD SENDMSG( NMSG, NWPARAM, NLPARAM ) INLINE ; (218)
   METHOD MOVE( NTOP, NLEFT, NWIDTH, NHEIGHT, LREPAINT ) (221)
   METHOD RESIZE( NSIZETYPE, NWIDTH, NHEIGHT ) (223)
   METHOD COMMAND( NWPARAM, NLPARAM ) (225)
   METHOD NOTIFY( NWPARAM, NLPARAM ) (227)
   METHOD REFRESH( LERASE ) INLINE INVALIDATERECT( ::HWND,; (229)
   METHOD NGETCHRHEIGHT() INLINE ::HDC := GETDC( ::HWND ), ; (232)
   METHOD GETTEXT() INLINE GETWINDOWTEXT( ::HWND ) (235)
   METHOD VSCROLL( NCODE, NPOS ) (237)
   METHOD INIT( HDLG ) CLASS TCONTROL (244)
   METHOD ADDVARS(HCONTROL)  CLASS TCONTROL (278)
   METHOD DELVARS(HCONTROL)  CLASS TCONTROL (288)
   METHOD _BEGINPAINT() CLASS TCONTROL (305)
   METHOD COLORS( HDC ) CLASS TCONTROL (322)
   METHOD COORSUPDATE() CLASS TCONTROL (335)
   METHOD CREATE( CCLSNAME )  CLASS TCONTROL (348)
   METHOD DEFAULT() CLASS TCONTROL (395)
   METHOD END() CLASS TCONTROL (403)
   METHOD ERASEBKGND( HDC ) CLASS TCONTROL (428)
   METHOD FORWHEN() CLASS TCONTROL (451)
   METHOD GETCLIRECT() CLASS TCONTROL (477)
   METHOD GETDLGCODE( NLASTKEY ) CLASS TCONTROL (483)
   METHOD GETRECT() CLASS TCONTROL (498)
   METHOD GOTFOCUS( HCTLLOST ) (508)
   METHOD GONEXTCTRL( HCTRL ) CLASS TCONTROL (521)
   METHOD GOPREVCTRL( HCTRL ) CLASS TCONTROL (535)
   METHOD KEYCHAR( NKEY, NFLAGS ) CLASS TCONTROL (549)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TCONTROL (576)
   METHOD KILLFOCUS( HCTLFOCUS ) CLASS TCONTROL (615)
   METHOD LBUTTONDOWN( NROW, NCOL, NKEYFLAGS ) CLASS TCONTROL (620)
   METHOD LBUTTONUP( NROW, NCOL, NKEYFLAGS ) CLASS TCONTROL (635)
   METHOD LOSTFOCUS( HWNDGETFOCUS ) CLASS TCONTROL (645)
   METHOD MOUSEMOVE( NROW, NCOL, NKEYFLAGS ) CLASS TCONTROL (655)
   METHOD MOVE( NTOP, NLEFT, NWIDTH, NHEIGHT, LREPAINT ) CLASS TCONTROL (673)
   METHOD RBUTTONUP( NROW, NCOL, NKEYFLAGS ) CLASS TCONTROL (683)
   METHOD REGISTER( NCLSSTYLE )  CLASS TCONTROL (693)
   METHOD RESIZE( NSIZETYPE, NWIDTH, NHEIGHT ) CLASS TCONTROL (724)
   METHOD SETMSG( CTEXT, LDEFAULT ) CLASS TCONTROL (735)
   METHOD SETCOLOR( NCLRFORE, NCLRBACK, HBRUSH ) CLASS TCONTROL (759)
   METHOD SUPERKEYDOWN( NKEY, NFLAGS ) CLASS TCONTROL (777)
   METHOD __SETFOCUS() CLASS TCONTROL (797)
   METHOD VSCROLL( NWPARAM, NLPARAM ) CLASS TCONTROL (806)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TCONTROL (859)
   METHOD COMMAND( NWPARAM, NLPARAM ) CLASS TCONTROL (936)
   METHOD NOTIFY( NWPARAM, NLPARAM ) CLASS TCONTROL (973)

Program Name: E:\TRASH\EX\TDatePicker.prg
   CLASS TDATEPICKER FROM TCONTROL (15)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, CPICT, BVALID,; (20)
   METHOD DEFAULT() (25)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (26)
   METHOD KEYCHAR( NKEY, NFLAGS ) (27)
   METHOD KEYDOWN( NKEY, NFLAGS ) (28)
   METHOD LOSTFOCUS() (29)
   METHOD LVALID() (30)
   METHOD VARGET() (31)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, CPICT, BVALID,; (39)
   METHOD DEFAULT() CLASS TDATEPICKER (111)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TDATEPICKER (127)
   METHOD KEYCHAR( NKEY, NFLAGS ) CLASS TDATEPICKER (141)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TDATEPICKER (157)
   METHOD LVALID() CLASS TDATEPICKER (173)
   METHOD VARGET() CLASS TDATEPICKER (187)
   METHOD LOSTFOCUS() CLASS TDATEPICKER (205)

Program Name: E:\TRASH\EX\TGetBox.prg
   CLASS TGETBOX FROM TCONTROL (9)
   METHOD   NEW(NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, CPICT, BVALID,; (13)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (18)
   METHOD KEYCHAR( NKEY, NFLAGS ) (19)
   METHOD KEYDOWN( NKEY, NFLAGS ) (20)
   METHOD LOSTFOCUS( HCTLFOCUS ) (21)
   METHOD LVALID() (22)
   METHOD VARGET() (23)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, CPICT, BVALID,; (31)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TGETBOX (120)
   METHOD KEYCHAR( NKEY, NFLAGS ) CLASS TGETBOX (136)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TGETBOX (152)
   METHOD LVALID() CLASS TGETBOX (168)
   METHOD LOSTFOCUS( HCTLFOCUS ) CLASS TGETBOX (182)
   METHOD VARGET() CLASS TGETBOX (196)

Program Name: E:\TRASH\EX\TSCOLUMN.PRG
   CLASS TSCOLUMN (9)
   METHOD NEW( CHEADING, BDATA, CPICTURE, ACOLORS, AALIGN, NWIDTH, ; (107)
   METHOD END() VIRTUAL (113)
   METHOD LOAD( CINFO ) (115)
   METHOD SAVE() (116)
   METHOD SAVECOLOR() (117)
   METHOD RESTCOLOR() (118)
   METHOD NEW( CHEADING, BDATA, CPICTURE, ACOLORS, AALIGN, NWIDTH, ; (126)
   METHOD LOAD( CINFO ) CLASS TSCOLUMN (391)
   METHOD SAVE() CLASS TSCOLUMN (433)
   METHOD SAVECOLOR() CLASS TSCOLUMN (452)
   METHOD RESTCOLOR() CLASS TSCOLUMN (477)
   FUNCTION BIFFREC( NOPCODE, UDATA, NROW, NCOL, LBORDER, NALIGN, NPIC, NFONT ) (503)
   FUNCTION STRCHARCOUNT( CSTR, CCHR ) (627)
   FUNCTION STRWBLOCK( CFIELD, NLEN, NDEC ) (644)
   FUNCTION LISFILE( CFILE ) (658)
   FUNCTION ARRAYWBLOCK( OBRW, NELE ) (674)
   FUNCTION COMBOWBLOCK( OBRW, UFIELD, NCOL, ALIST ) (684)

Program Name: E:\TRASH\EX\TSMULTI.PRG
   CLASS TSMULTI FROM TCONTROL (13)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, HFONT,; (18)
   METHOD DEFAULT( ) (21)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) (22)
   METHOD GETDLGCODE( NLASTKEY ) (23)
   METHOD KEYCHAR( NKEY, NFLAGS ) (24)
   METHOD KEYDOWN( NKEY, NFLAGS ) (25)
   METHOD LOSTFOCUS( HCTLFOCUS ) (26)
   METHOD LVALID() (27)
   METHOD COMMAND( NWPARAM, NLPARAM ) (28)
   METHOD NEW( NROW, NCOL, BSETGET, OWND, NWIDTH, NHEIGHT, HFONT,; (36)
   METHOD DEFAULT() CLASS TSMULTI (100)
   METHOD HANDLEEVENT( NMSG, NWPARAM, NLPARAM ) CLASS TSMULTI (114)
   METHOD GETDLGCODE( NLASTKEY, NFLAGS ) CLASS TSMULTI (123)
   METHOD KEYCHAR( NKEY, NFLAGS ) CLASS TSMULTI (133)
   METHOD KEYDOWN( NKEY, NFLAGS ) CLASS TSMULTI (149)
   METHOD LVALID() CLASS TSMULTI (178)
   METHOD LOSTFOCUS( HCTLFOCUS ) CLASS TSMULTI (192)
   METHOD COMMAND( NWPARAM, NLPARAM ) CLASS  TSMULTI (207)
The C routines are:

Code: Select all

Program Name: E:\TRASH\EX\c_controlmisc1.c
   HB_FUNC( SYSREFRESH ) (62)
   HB_FUNC( NMAKELONG ) (73)
   HB_FUNC( LAND ) (78)
   HB_FUNC( NOR ) (83)
   HB_FUNC( CREATEPEN ) (96)
   HB_FUNC( MOVETO ) //MOVETO( HDC HDC, INT IX, INT IY ) (107)
   HB_FUNC( LINETO ) //LINETO( HDC HDC, INT IX, INT IY ) (114)
   HB_FUNC( DRAWICON ) (119)
   HB_FUNC( CURSORWAIT ) (124)
   HB_FUNC( CURSORHAND ) (129)
   HB_FUNC( CURSORWE ) (134)
   HB_FUNC( CURSORSIZE ) (139)
   HB_FUNC( RELEASECAPTURE ) (144)
   HB_FUNC( INVERTRECT ) (149)
   HB_FUNC( BEGINPAINT ) (160)
   HB_FUNC( ENDPAINT ) (167)
   HB_FUNC( GETSCROLLRANGE ) (172)
   HB_FUNC( GETCLASSINFO ) (196)
   HB_FUNC( _GETCLIENTRECT ) (206)
   HB_FUNC( ISICONIC ) (219)
   HB_FUNC( SETCAPTURE ) (224)
   HB_FUNC( GETWINDOWLONG ) (229)
   HB_FUNC( SETWINDOWLONG ) (234)
   HB_FUNC( GETTEXTCOLOR ) (239)
   HB_FUNC( GETBKCOLOR ) (244)
   HB_FUNC( LOADIMAGE ) (249)
   HB_FUNC( GETSYSMETRICS ) (263)
   HB_FUNC( MOVEFILE ) (277)
   HB_FUNC( GETACP ) (282)

Program Name: E:\TRASH\EX\c_TBrowse.c
   HB_FUNC( REGISTER_CLASS ) (96)
   HB_FUNC( _CREATEWINDOWEX ) (134)
   HB_FUNC( TSDRAWCELL ) (269)
Technically I'm also not so familiar with the structure of _HMG_SYSDATA, however I would still wish to realize a port of TSBrowse to HMG. LOL! It is an expensive solution for a little thing that I wish to do: I want to do on fly something like these in browse:

EMPLOYEE->NAME, DEPARTMENT->NAME

That's Joining fields without using a temporary file to join the fields.

Regards,

Danny

PS:

E:\TRASH ---> is so happened to be my temporary folder. I put all temp files on this folder. When I run my profiler it automatically dumps the output to this folder. So please HMG-Ex fans and fanatics no offense meant, peace! It's just a coincidence that in my apps all temp files are dump in this location as default.
Regards,

Danny
Manila, Philippines
Top
User avatar
mol
Posts: 3800
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:
Contact mol

Re: tsbrowse in hmg

Post by mol »

If I can understand your problem:
You wish to use browse for viewing two related databases?

I'm using such a combination and everything looks OK.
Could you put little sample?
Top
User avatar
dhaine_adp
Posts: 457
Joined: Wed Aug 06, 2008 12:22 pm
Location: Manila, Philippines

Re: tsbrowse in hmg

Post by dhaine_adp »

If I can understand your problem:
You wish to use browse for viewing two related databases?

I'm using such a combination and everything looks OK.
Could you put little sample?
Hi Mol,

Thank you very much for offering an assistance but I already solved my problem regarding that browse. :)

However the porting of Tsbrowse is still requires to dig deeper.

Regards,

Danny
Regards,

Danny
Manila, Philippines
Top
Post Reply

Return to “HMG General Help”