Thank You very much.
Now everything of my test is working
[img:6xq5ef4t]http://www.pflegeplus.com/IMAGES/xbrwseek8.jpg[/img:6xq5ef4t]
before adding a download, I will do some code cleaning ( and maybe adding some useful things )
I added Your expositions to the code like
oBrw1:Married:SetCheck() // Default FWH Bitmap is Alpha
[color=#008040:6xq5ef4t]/*
SetCheck() adds to 2 bitmaps to the column.
After that the bitmap ("sort.bmp") you added is the 3rd bitmap.
So you should use
:nHeadBmpNo := 3
Method AddBitmap( ) superceded obsolete methods AddBmpFile()
and AddResource() from FWH 10.01
:nHeadBmpNo := :AddBitmap( "sort.bmp" )
*/[/color:6xq5ef4t]
as well a [color=#0000FF:6xq5ef4t]readme.txt [/color:6xq5ef4t] for the xbrowse-changes is included
[color=#0000FF:6xq5ef4t]Please make these corrections in the Method Edit( nKey ) of TXBrwColumn:
Replace Line 13089 of FWH1701 ( line 13007 of FWH1612 )
nRow := ( ( ::oBrw:nRowSel - 1 ) * ::oBrw:nRowHeight ) + ::oBrw:HeaderHeight()
with
nRow := ( ( ::oBrw:nRowSel - 1 ) * ::oBrw:nRowHeight ) + ::oBrw:FirstRow()
Also replace line 13135 (FWH1701) / line 13053 (FWH1612)
nRow := ( ( ::oBrw:nRowSel - 1 ) * ::oBrw:nRowHeight ) + ::oBrw:HeaderHeight() + 2
with
nRow := ( ( ::oBrw:nRowSel - 1 ) * ::oBrw:nRowHeight ) + ::oBrw:FirstRow() + 2[/color:6xq5ef4t]
regards
Uwe
↧