Cool! Thanks Manuel. Hope will have time to give it a try soon.

ooooopppppsssss, I uploded the wrong file, here is the right one (I hope)

http://hyperupload.com/download/025e38d ... N.zip.html

Truly shamed, matter of age

Regards

Manuel Mercado

Hi Mmercado,

Thanks for your nice version.

Regards,

Richard

THANKS Manuel, Very nice version!!!

when a version for fwppc?

Manuel Mercado,
Why I can't rmake sbutton.lib?
\clipper5\bin\rmake sbuttonh

// defining some preprocessor directives for bcc32
Def ="HARBOUR;HB_API_MACROS;HB_FM_STATISTICS_OFF"

// defining paths
BC ="d:\borland\bcc55"
FW ="d:\FW801"
HB ="d:\Harbour"
makepath[.prg] ="..\source\classes"
makepath[.c] ="..\lib;..\source\function"

.prg.c:
$(HB)\bin\harbour $< /n /i..\include;$(FW)\include;$(HB)\include >> comp.log

.c.obj:
$(BC)\bin\bcc32 -D$(Def) -O2 -c -I$(HB)\include;$(FW)\include $< >> comp.log

TSButton.c : TSButton.prg
TSBar.c : TSBar.prg
TSLines.c : TSLines.prg
TSRadio.c : TSRadio.prg
TSTSay.c : TSTSay.prg
TSButton.obj : TSButton.c
TSBar.obj : TSBar.c
TSLines.obj : TSLines.c
TSRadio.obj : TSRadio.c
TSTSay.obj : TSTSay.c
BPaint.obj : BPaint.c
TSButton.exe : BPaint.obj TSButton.obj TSBar.obj TSLines.obj TSRadio.obj TSTSay.obj
Del SButtonH.lib
$(BC)\bin\Tlib SButtonH +TSButton > Lib.log
$(BC)\bin\Tlib SButtonH +BPaint >> Lib.log
$(BC)\bin\Tlib SButtonH +TSBar >> Lib.log
$(BC)\bin\Tlib SButtonH +TSLines >> Lib.log
$(BC)\bin\Tlib SButtonH +TSRadio >> Lib.log
$(BC)\bin\Tlib SButtonH +TSTSay >> Lib.log
Del .c
Del .obj
Del .log
Del .bak

comp error:
error rmake:r2001 exit 12 :"d:\borland\bcc55\bin\bcc32 -D__HARBOUR__ ;HB_API_MACROS;HB_FM_STATICS_OFF;-O2-C -Id:\harbour\include;d:\fw801\include;..\lib\tsbutton.c;

// sbutton.c exist in ..\lib
Best regard!
Shuming Wang

Use Xmate to compile applications , lib, dll.
it is easy, you can set also w2 es2 n0 and other parameters...

ShumingWang wrote: Why I can't rmake sbutton.lib?
\clipper5\bin\rmake sbuttonh

Mr. Manuel,

Congratulation! Excellent work.

I would like to try your classes but I can’t compile the libs.
Is there an English version of VERCE?

I opened c:\tsbutton\LIB\SBUTTONH.VRC
I see the “Propiedades del Proyecto”. All seems to be OK.

Next I click on “Compilar”. Is this right?

But there is no LIB.

Regards,
Otto

Otto wrote:I would like to try your classes but I can’t compile the libs.
Is there an English version of VERCE?

Otto wrote:I opened c:\tsbutton\LIB\SBUTTONH.VRC
I see the “Propiedades del Proyecto”. All seems to be OK.
Next I click on “Compilar”. Is this right?
But there is no LIB.

Def ="__HARBOUR__"

BC ="c:\bcc55"
FW ="c:\FWH"
HB ="c:\Harbour"
makepath[.prg] ="..\source\classes"
makepath[.c] =".\;..\source\function"

.prg.c:
   $(HB)\bin\harbour $< /n  /i..\include;$(FW)\include;$(HB)\include > comp.log

.c.obj:
   $(BC)\bin\bcc32 -D$(Def) -O2 -c -I$(HB)\include;$(FW)\include $<  >> comp.log

TSButton.c     : TSButton.prg
TSBar.c        : TSBar.prg
TSLines.c      : TSLines.prg
TSRadio.c      : TSRadio.prg
TSTSay.c       : TSTSay.prg
TSButton.obj   : TSButton.c
TSBar.obj      : TSBar.c
TSLines.obj    : TSLines.c
TSRadio.obj    : TSRadio.c
TSTSay.obj     : TSTSay.c
BPaint.obj     : BPaint.c
TSButton.exe   : BPaint.obj TSButton.obj TSBar.obj TSLines.obj TSRadio.obj TSTSay.obj
                 Del SButtonH.lib
                 $(BC)\bin\Tlib SButtonH +TSButton  > Lib.log
                 $(BC)\bin\Tlib SButtonH +BPaint   >> Lib.log
                 $(BC)\bin\Tlib SButtonH +TSBar    >> Lib.log
                 $(BC)\bin\Tlib SButtonH +TSLines  >> Lib.log
                 $(BC)\bin\Tlib SButtonH +TSRadio  >> Lib.log
                 $(BC)\bin\Tlib SButtonH +TSTSay   >> Lib.log
                 Del *.c
                 Del *.obj
                 Del *.log
                 Del *.bak

Mr, Manuel,
thank you for your help.

My email: datron + @ + aon.at

Now the Lib compiled.
But starting the exe I get following error:
Application
===========
Path and name: c:\tsbutton\SAMPLES\newshape.exe (32 bits)
Size: 1,233,408 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 04/06/08, 14:16:16
Error description: Error BASE/1109 Argument error: $
Args:
[ 1] = C OFFICE
[ 2] = L .F.

Stack Calls

Called from: => TSBAR:NEW(124)
Called from: newshape.prg => SHOWCHILD(30)
Called from: newshape.prg => (b)MAIN(11)
Called from: => TMDIFRAME:ACTIVATE(0)
Called from: newshape.prg => MAIN(11)

testbtn.prg

pplication

Path and name: c:\tsbutton\SAMPLES\testbtn.exe (32 bits)
Size: 1,464,832 bytes
Time from start: 0 hours 0 mins 2 secs
Error occurred at: 04/06/08, 14:18:16
Error description: Error BASE/1109 Argument error: $
Args:
[ 1] = C OFFICE
[ 2] = L .F.

Stack Calls

Called from: => TSBAR:NEW(124)
Called from: testbtn.prg => CHILD1(59)
Called from: testbtn.prg => (b)BUILDMENU(218)
Called from: => TMENU:COMMAND(0)
Called from: => TWINDOW:COMMAND(0)
Called from: => TMDIFRAME:COMMAND(0)
Called from: => TMDIFRAME:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(0)
Called from: => WINRUN(0)
Called from: => TMDIFRAME:ACTIVATE(0)
Called from: testbtn.prg => MAIN(25)

Regards,
Otto

Otto wrote:But starting the exe I get following error:
Application
===========
Path and name: c:\tsbutton\SAMPLES\newshape.exe (32 bits)
Size: 1,233,408 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 04/06/08, 14:16:16
Error description: Error BASE/1109 Argument error: $
Args:
[ 1] = C OFFICE
[ 2] = L .F.

Brilliant. All is working.
Very impressive buttons.
Thank you.
Regards,
Otto