Author | Aart Onkenhout |
Date | 27-10-2000 |
To give your ListView flat scrollbars you can add some code to the Constructor-event of your ListView to give it a look like:
Long
ll_ExStyle
Constant Integer
LVM_SETEXTENDEDLISTVIEWSTYLE = 4150
Constant Integer
LVM_GETEXTENDEDLISTVIEWSTYLE = 4151
Constant Integer
LVS_EX_FLATSB = 256
ll_ExStyle = Send( Handle( this ),
LVM_GETEXTENDEDLISTVIEWSTYLE, 0, 0
)
ll_Exstyle
+= LVS_EX_FLATSB
ll_ExStyle = Send( Handle( this ),
LVM_SETEXTENDEDLISTVIEWSTYLE, 0, ll_ExStyle )
This code just works with PowerBuilder 7.0 or later.