Hi,
Use RECALL to recover the deleted records, the code example below should give you a starter.
Also note that recall will recover ALL deleted records, not only the ones you have just deleted.

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE customer && Opens Customer table

DELETE FROM customer WHERE country = 'USA' && Mark for deletion
CLEAR
LIST FIELDS company, country FOR DELETED( ) && List marked records
RECALL ALL && Unmark all records marked for deletion