xBrowse resource Pelles window styles?=> Solved

[richard-service]

Hi
Same source code

Code: Select all  Expand view

oBrw := TXBrowse():New( oDlg )
...
oBrw:lVScroll := .T.
oBrw:lHScroll := .T.
oBrw:CreateFromResource( 301 )
 

Pelles C Window styles "0x50000000" or "0x50810000"

not show VScroll and HScroll

Pelles C Window styles "0x50B10000"

show VScroll and HScroll

I want to Pelles C Window styles "0x50000000" or "0x50810000" show VScroll and HScroll
Any suggestion?

[nageswaragunupudi]

After redefining the browse, please try

Code: Select all  Expand view

oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
 

[richard-service]

After redefining the browse, please try

Code: Select all  Expand view

oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
 

Mr.Rao
Try this

Code: Select all  Expand view

oBrw := TXBrowse():New( oDlg )
oBrw:lVScroll := .T.
oBrw:lHScroll := .T.
oBrw:CreateFromResource( 301 )
oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
 

or this

Code: Select all  Expand view

oBrw := TXBrowse():New( oDlg )
oBrw:lVScroll := .T.
oBrw:lHScroll := .T.
oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
oBrw:CreateFromResource( 301 )
 

no response

[nageswaragunupudi]

Please try

Code: Select all  Expand view

oBrw:CreateFromResource( 301 )
oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
 

[richard-service]

Please try

Code: Select all  Expand view

oBrw:CreateFromResource( 301 )
oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
 

no response

if I set Pelles C Window styles "0x50B10000" and use below code

Code: Select all  Expand view

oBrw := TXBrowse():New( oDlg )
//oBrw:lVScroll := .T.
//oBrw:lHScroll := .T.
oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
oBrw:CreateFromResource( 301 )
 

Code: Select all  Expand view

oBrw := TXBrowse():New( oDlg )
//oBrw:lVScroll := .T.
//oBrw:lHScroll := .T.
oBrw:CreateFromResource( 301 )
oBrw:nStyle := nOr( oBrw:nStyle, WS_HSCROLL, WS_VSCROLL )
 

Response
Any idea?
I use Set Resource To "CraneERP.dll"

[richard-service]

Mr.Rao
Look it.
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=31551&p=183851&hilit=0x50210000#p183851