Special Event (small module) for free
Posted:
Mon Jan 22, 2007 6:47 am
by dutch
Dear All,
I made a special event module, if who interesting pls send me a private email. I will send you for free. This is time to pay back to all.
Best regards,
Dutch
PS. I use TWbrowse() class of Hernan Ceccarelli.dutchez4@gmail.com
Posted:
Mon Jan 22, 2007 8:52 am
by Silvio
can you send me it pls at
silvio_falconi@tin.itthanks
Posted:
Mon Jan 22, 2007 2:55 pm
by Gerardo Farfan
can you send me it please at
gerardofarfan@yahoo.comthanks
Posted:
Mon Jan 22, 2007 6:01 pm
by Antonio Linares
Dutch,
You may better upload it to
www.hyperupload.com so everybody may download it, thanks
Posted:
Tue Jan 23, 2007 9:38 am
by Silvio
ok but it not run on xharbour
I must made many modifies (CMX)
then I compiled it but I cannot see the lines to divide the columns
-------
Posted:
Tue Jan 23, 2007 8:51 pm
by dutch
Yes, it is still 16 bit but you can use new TWbrowse.lib (32 bit) of hernan also. All below function is replace CMX.
- Code: Select all Expand view
*--------------------------------------*
* Use these function instead of COMIX *
*--------------------------------------*
Function cmxSetScope( nScope, xVal )
return if(PCount() <= 1, OrdScope( nScope ), OrdScope( nScope, xVal ))
Function cmxClrScope( nScope )
return OrdScope( nScope, Nil)
Function cmSetFilter( xVal )
return DbSetFilter( {|| xVat }, xVal )
Function cmClrFilter()
return DbClearFilter()
Function cmxKeyNo()
return OrdKeyNo()
Function cmxKeyCount()
return OrdKeyCount()
Function cmxKeyGoTo(nKey)
return OrdKeyGoTo(nKey)
Best regards,
Dutch
Posted:
Wed Jan 24, 2007 9:41 am
by dutch
It has no line but it is Listbox border ( SET _3DLOOK ON ). I think you must resize list box.
Posted:
Wed Jan 24, 2007 11:33 am
by Silvio
I think we can design lines after each day .... vertical and horizontal