Mega Code Archive
How to show a TTables deleted records
<![CDATA[
Title: How to show a TTables deleted records
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;
]]>