xBrowse : using 'Ctrl-PgDn' or key 'end'

[Demont Brecht]

Hello ,

Using xbrowse with a dbf (dbfcdx) i have 3 columns with a index.

When the first column (with a index) is seekcolumn and i press 'Ctrl-PgDn' or key 'end' , the browse shows the first 12 records followed with the last record.

Moving the mouse to the top line from the dialog , clear the browse and displays the last record (oBrw:nColsel seem to be 1 , last record is the active record)

Moving the mouse away from the aplication (or monitor) , the screen is build as expected , the last 13 records with the last record as active.

Two other index(columns) gives no problems.

Next lines are used in the aplication :

oDlg:bGotFocus = { ||oBrw:SetFocus() }

and

oBrw:bGotFocus := { ||ResetOrder(oBrw) }

Code: Select all

LOCAL oCol
FOR EACH oCol IN oBrw:aCols
  IF oCol:cOrder IN "AD" .AND. BONALG->(OrdSetFocus())<>oCol:cSortOrder
    oCol:cOrder := IIF(oCol:cOrder=="A","D","A")
    oCol:SetOrder()
    //oBrw:Refresh()
    EXIT
  END
NEXT
RETURN
 

Disabling this line(s) gives no difference.

I am using FWH1203

Frank

[Demont Brecht]

Sory , reindexing the dbf solves the problem.

Frank