Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Удаленные записи в DBF [D5, dBase, FoxPro]

Евгений Р. © (2008-03-20 14:44:00)
Как определиить количество удаленных записей в DBF таблице через BDE?

Виталий Панасенко(дом) (2008-03-24 23:50:00) [1]
Различаются.. так что....

Виталий Панасенко(дом) (2008-03-24 23:38:00) [2]
Пример из Rx для просмотра удаленных записей в DBF-нике. Правда, не заню, будет ли отличаться RecordCount... Если да, то включил, запомнил, выключил, разность
procedure DataSetShowDeleted(DataSet: TBDEDataSet; Show: Boolean);
begin
with DataSet do begin
CheckBrowseMode;
Check(DbiValidateProp(hDBIObj(Handle), curSOFTDELETEON, True));
DisableControls;
try
Check(DbiSetProp(hDBIObj(Handle), curSOFTDELETEON, Ord(Show)));
finally
EnableControls;
end;
if DataSet is TTable then TTable(DataSet).Refresh
else begin
CursorPosChanged;
First;
end;
end;
end;

Евгений Р. (2008-03-24 23:05:00) [3]
Самое простое: в Dbf файле по смещению 4 хранится количество записей в файле (общее, в т.ч. и удаленных). А дальше - арифметика.

Евгений Р. (2008-03-24 21:28:00) [4]
Спасибо, abhtr
думаю это то, что мне надо

abhtr (2008-03-24 10:57:00) [5]
Прошу прощения у мастеров, но я использовал для DBF таблиц следующую "конструкцию":
function DELETED(Table:TTable): Boolean;
var
Prop : RECProps;
begin
dbiGetRecord(Table.Handle, dbiNoLock, nil, @Prop);
Result := Prop.bDeleteFlag;
END;

а затем:
if Deleted(tblDBF) Then ... делаешь, что надо.

Anatoly Podgoretsky (2008-03-20 21:06:00) [6]
> Евгений Р. (20.03.2008 14:44:00) [0]

Узнать количество неудаленых, узнать общее количество, дальше сообразишь?ся.произведенной Микрософтом.

Евгений Р. (2008-03-20 15:18:00) [7]

> узнать размер записи
> простыми арифметическими операциями с размером файла

конечно, но наверное есть что-то поизящнее. Ведь можн просматривать неудаленные+удаленные? Как???

www (2008-03-20 14:49:00) [8]
узнать колво неудаленных
узнать размер записи
простыми арифметическими операциями с размером файла

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »