Show deleted records
With this procedure we can show deleted record from paradox table.
procedure deletedrecords(Table: TTable; SioNo: Boolean);
begin
Table.DisableControls;
try
Check(DbiSetProp(hDBIObj(Table.Handle), curSOFTDELETEON,
LongInt(SioNo)));
finally
Table.EnableControls;
end;
Table.Refresh;
end;
...
...
...
...
...
0 comments Saturday 17 Feb 2007 | Delphi Tutorial | Database