FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Change XBROWSE Style?
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Change XBROWSE Style?
Posted: Fri Jul 06, 2018 06:28 AM

Dear All,

I can define TXBrowse as "Windows Style=0x50210000" in .RC or .RES. But if I need to define from source code with out .RC or .RES.

How do I can define it?

Thanks

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)
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Change XBROWSE Style?
Posted: Sat Jul 07, 2018 10:38 AM

What does the style Windows Style=0x50210000 mean?

Regards



G. N. Rao.

Hyderabad, India
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: Change XBROWSE Style?
Posted: Sat Jul 07, 2018 11:57 AM
Dear Mr.Rao,

I need TXBRowse with flat border style as picture.
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)
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: Change XBROWSE Style?
Posted: Mon Jul 09, 2018 06:01 PM

Hi, Dutch.
Did you resolve?

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Change XBROWSE Style?
Posted: Mon Jul 09, 2018 10:01 PM

Mr. Dutch

Set
oBrw:lDrawBorder := .t.

Regards



G. N. Rao.

Hyderabad, India
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 02:43 AM
Dear Mr.Rao,

I've tried this but it doesn't effect.
Code (fw): Select all Collapse
#include "FiveWin.Ch"

FUNCTION TEST()
LOCAL oDlgTEST
LOCAL oFnt
LOCAL oBtIDOK
LOCAL oXBRW101
 
DEFINE FONT oFnt  NAME "MS Sans Serif"        SIZE 0, -8

DEFINE DIALOG oDlgTEST ;
        FROM  15,6 TO 45,84 ;
        TITLE "TXBrowse demo"  ;
        STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE 

@  211, 252 BUTTON oBtIDOK ;
        SIZE 50,  14 ;
        OF oDlgTEST ;
        FONT oFnt ;
        PIXEL

@  5, 4 XBROWSE oXBRW101 ;
        SIZE 297,  202 ;
        OF oDlgTEST ;
        FONT oFnt ;
        PIXEL

   oXBRW101:lDrawBorder := .T.
        oXBRW101:CreateFromCode()

ACTIVATE DIALOG oDlgTEST
RETURN 0

image hosting over 10mb
nageswaragunupudi wrote:Mr. Dutch

Set
oBrw:lDrawBorder := .t.


Thanks,
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)
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 02:52 AM
Add the clause NOBORDER to XBROWSE command, whenever you create from sourcecode. Just make it a habit to use always.
(Not for resources)

On bottom and right, you see the border drawn by lDrawBorder when HScroll and VScroll are absent.

Regards



G. N. Rao.

Hyderabad, India
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 05:01 AM

Is it included in FWH 18.05?

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)
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 07:22 AM

Hi Mr. Rao,

How can I change border color to light blue?

also if there is a scroolbar in the xbrowse, border is not impressed.

Thanks,

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 07:36 AM
dutch wrote:Is it included in FWH 18.05?

It is already there in many previous versions too.
Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 07:40 AM
How can I change border color to light blue?

We will provide color choice in future versions.
Code (fw): Select all Collapse
also if there is a scroolbar in the xbrowse, border is not impressed.

Yes, you are right.
We are unable to draw the border outside the scrollbar.
Drawing the border inside the scrollbar is not looking good.
If you like you may play with this and give your feedback and advice.
Look for the code
::Box( 1, 1 ..... )
towards the end of the Paint() method.
Keep changing the values and let us know if you feel something looks better.
Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Change XBROWSE Style?
Posted: Tue Jul 10, 2018 03:35 PM

In 18.05, we can specify oBrw:nClrBorder

Regards



G. N. Rao.

Hyderabad, India
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Change XBROWSE Style?
Posted: Wed Jul 11, 2018 05:10 AM
dutch wrote:Dear Mr.Rao,

I need TXBRowse with flat border style as picture.


You have tried?
Code (fw): Select all Collapse
            @ nRow, nCol XBROWSE ....
                    ...     STYLE FLAT NOBORDER

//   :lFlatStyle   := .T.


and

Code (fw): Select all Collapse
               //:nClrBorder        := Rgb( 73, 134, 231 )      // only in Fwh 18.05
               :lDrawBorder       := .T.
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: Change XBROWSE Style?
Posted: Wed Jul 11, 2018 07:17 AM

Dear Mr.Cristobal and Mr.Rao,

Yes, it is working [2015,NOBORDER and lDrawBorder].

Thank you so much.

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)
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Change XBROWSE Style?
Posted: Wed Oct 17, 2018 12:57 PM
nageswaragunupudi wrote:In 18.05, we can specify oBrw:nClrBorder


Hi Mr. Rao,

Have you noticed that nClrBorder is not painted when xbrowse is empty?
Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06