Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.06.14;
Скачать: CL | DM;

Вниз

Записи помеченные на удаление.   Найти похожие ветки 

 
Shark ©   (2005-05-06 12:43) [0]

Привет Всем! Такой вопрос у меня.
Есть таблица формата dbf, а ней есть записи, почененные на удаление.
Как из программы узнать общее кол-во записей в таблице, включая помеченные?
Заранее Благодарен!


 
ANB ©   (2005-05-06 12:46) [1]

Самый быстрый способ - прочитать из заголовка dbf.


 
Shark ©   (2005-05-06 13:17) [2]

хмм.. а можно чуть подробнее, пожалуйсто ;)


 
ANB ©   (2005-05-06 13:26) [3]

type
TRDBFHeader = record
 Descriptor : Byte;
{0x03(3)простая таблица
 0x04(4)простая таблица
 0x05(5)простая таблица
 0x43(67)с мемо-полем .dbv
 0xB3(179)с мемо-полями .dbv .dbt
 0x83(131)с мемо-полем .dbt
 0x8B(139)с мемо-полем .dbt формат D4
 0x8E(142)SQL-таблица
 0xF5(245)с мемо полем .fmp}
 updYear : Byte;
 updMonth : Byte;
 updDay : Byte;
 RecordsCount : LongWord;
 HeaderSize : Word;
 RecordSize : Word;
 Reserv1 : Word;
 InTransaction : Byte;
 InCrypt : Byte;
 MultiUser : array [1..12] of Char;
 UseIndex : Byte;
{0x01 Используется индекс
 0x00 Индекс не используется}
 LangDriver : Byte;
{      n  Номер драйвера языка
 0x01(1)  кодовая страница 437 DOS USA
 0x02(2)  кодовая страница 850 DOS Multilang
 0x26(38) кодовая страница 866 DOS Russian
 0x57(87) кодовая страница 1251 Windows ANSI
 0xC8(200)кодовая страница 1250 Windows EE
 0x00(0)  игнорируется}
 Reserv2 : Word;
end;

Теперь читаешь в эту структуру из файла первые SizeOf() байт и считываешь в ней, что тебе надо. RecordsCount - количество записей.


 
Shark ©   (2005-05-06 14:27) [4]

Спасибо большое! :)
Все работает :)



Страницы: 1 вся ветка

Текущий архив: 2005.06.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
9-1110321672
Куу
2005-03-09 01:41
2005.06.14
ODE-бильярдик Простенький Демка


1-1117051608
SergP
2005-05-26 00:06
2005.06.14
Как узнать положение компонента относительно десктопа


3-1115301106
Alexandr
2005-05-05 17:51
2005.06.14
DbgridEh и EditButton


3-1115359406
Ньюб
2005-05-06 10:03
2005.06.14
как отловить обрыв связи на IBX_Version = 6.0;


14-1116855278
DiamondShark
2005-05-23 17:34
2005.06.14
Когда человек смеётся?