topic-10928

mmercado

Posts: 782

Joined: Wed Dec 19, 2007 07:50 AM

TSButton bug fix V.6.2
Posted: Mon Apr 28, 2008 04:59 AM

Hi All

Here you are TSButton with a reported bugs fixed

http://www.box.net/shared/vnfvorjswk

Best regards.

Manuel Mercado

manuelmercado at prodigy dot net dot mx

dutch

Posts: 1598

Joined: Fri Oct 07, 2005 05:56 PM

TSButton bug fix V.6.2
Posted: Mon Apr 28, 2008 05:34 AM

Dear Manuel,

I've found strange display. When I refer Bitmap from resource, if the name is 'SAVE'. It cannot display the Bitmap correctly as following command. When I rename it to another (whaterver). It shows fine.

Code: Select all Collapse

   REDEFINE SBUTTON oBtn[1] ID 11 ;
             RESOURCE 'SAVE1', 'SAVE1', 'SAVE3', 'SAVE4' ;
             WHEN !empty(cType).and.!empty(cCode).and.!empty(cEDesc) ;
             PROMPT TE('ºÑ¹·Ö¡','&Save') ;
             ACTION (lSave := .T. , oDlg:End()) ;
             COLOR {|oBtn| If( oBtn:lMouseOver, CLR_YELLOW, CLR_BLACK ) } ;
             TEXT ON_RIGHT

Thanks&Regards,
Dutch

Regards,

Dutch

FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)

mmercado

Posts: 782

Joined: Wed Dec 19, 2007 07:50 AM

TSButton bug fix V.6.2
Posted: Mon Apr 28, 2008 05:46 AM

dutch wrote:I've found strange display. When I refer Bitmap from resource, if the name is 'SAVE'. It cannot display the Bitmap but as following command. When rename to another (whaterver). It show fine.

Hi Dutch:

Strange indeed, is it happening with this new version or with the prior one also?

Regards.

Manuel Mercado

manuelmercado at prodigy dot net dot mx

dutch

Posts: 1598

Joined: Fri Oct 07, 2005 05:56 PM

TSButton bug fix V.6.2
Posted: Mon Apr 28, 2008 10:44 AM

Dear Manuel,

The previous version 6.1 (first release that including XP CRYSTAL OFFICE look).

Regards,
Dutch

Regards,

Dutch

FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)

RAMESHBABU

Posts: 654

Joined: Fri Oct 21, 2005 05:54 AM

TSButton bug fix V.6.2
Posted: Mon Apr 28, 2008 04:37 PM

Hello Master

Still the ROUNDRECT clause is not taken care of in this new version.
It is still showing the buttons as RECTACTIGLE only.

Regards

Ramesh Babu P

mmercado

Posts: 782

Joined: Wed Dec 19, 2007 07:50 AM

TSButton bug fix V.6.2
Posted: Mon Apr 28, 2008 05:43 PM

RAMESHBABU wrote:Still the ROUNDRECT clause is not taken care of in this new version.It is still showing the buttons as RECTACTIGLE only.

Hello Ramesh:

I don't know what is happening with your program, the image is from TestBtn.prg which goes along with this and the prior versions.

Perhaps you are using an older TSButton.ch

Best regards.

Manuel Mercado

manuelmercado at prodigy dot net dot mx

kokookao2007

Posts: 59

Joined: Thu May 17, 2007 08:27 AM

TSButton bug fix V.6.2
Posted: Tue Apr 29, 2008 04:06 AM

Hi mmercado :

I have problem about ver6.2 .

if I define some Button Disable , Other Button will ALWAYS FRESH .

Is it BUG ?

please Try SOURCE , oBtm2 always fresh:

LOCAL lWHEN:=.F.

REDEFINE SBUTTON oBTM1 ID 32 OF oDlg ;
WHEN lWHEN ;
BRUSH oBRU_COLOR[T_COLOR_WOOD] ;
LOOK W97 ;
TEXT POSITION ON_RIGHT ;
ACTION ( oDlg:END() )

REDEFINE SBUTTON oBTM2 ID 34 OF oDlg ;
BRUSH oBRU_COLOR[T_COLOR_WOOD] ;
LOOK W97 ;
TEXT POSITION ON_RIGHT ;
ACTION ( oDlg:END() )

***** OR

REDEFINE SBUTTON oBTM1 ID 32 OF oDlg ;
BRUSH oBRU_COLOR[T_COLOR_WOOD] ;
LOOK W97 ;
TEXT POSITION ON_RIGHT ;
ACTION ( oDlg:END() )

REDEFINE SBUTTON oBTM2 ID 34 OF oDlg ;
BRUSH oBRU_COLOR[T_COLOR_WOOD] ;
LOOK W97 ;
TEXT POSITION ON_RIGHT ;
ACTION ( oDlg:END() )

ACTIVATE DIALOG oDlg ;
ON INIT ( oBTM1:DISABLE() )

Best Regards

kokoo KAO

-------------

best regards

kokoo Kao

FiveTech Support Forums

Best Regards

Continue the discussion