I was wondering why the deleted records are still showing in the table.
The following are the codes that I put at "click" event of my delete command button.
I am sure the deletions were successful since when I exited my program and did a
pack and re-index to the resulting table, those records that were deleted thru my
program were gone. But why were they still showing in the table when I was running
the program, could somebody please help?

*------------------------------------------
THISFORM.opcode = 3
IF MessageBox(" Confirm to delete ?",4+48," Delete Record") = 6
DELETE
result = TABLEUPDATE(.F.,.T.,"Products")
IF result
IF NOT BOF()
SKIP -1
ENDIF
THISFORM.Refresh
ELSE
?? CHR(7)
= MessageBox("Deletion unsuccessful",48," Delete Record")
= TABLEREVERT(.F.)
ENDIF
ENDIF
THISFORM.opcode = 4
*------------------------------------------