Компонент для работы с DBF таблицами и с Clipper индексами NTX

{codecitation class=»brush: pascal; gutter: false;» width=»600px»}

Оформил: DeeCo

Автор: Влад Карпов

Уважаемые жители Королевства, вашему вниманию предлагается

VK DBF — компонент для работы с DBF таблицами и с Clipper индексами NTX.

Версия 1.0.5 beta (24.10.02)

Для Delphi 5

Это не просто драйвер DBFNTX для Delphi 5.

Компонет поддерживает множество расширенных типов (~60) таких как Byte, Integer, Real48, Double, Int64, WideString и т.д.

Имеется встроенная криптография

Описание

1) Add Method TranslateBuff and rewrite methods CreateBlobStream and SaveToDBT with TranslateBuff to prevent ‘Access violation’ in read and write CLOB.

2) When set RecNo check Filter, SetDeleted and Range validation.

3) Fix bud in TVKNTXRange.InRange(S: String) method

4) Add event OnCreateIndex

5) Add public var FullLengthCharFieldCopy to TVKSmartDBF for manage SetFieldData for ‘C’ type fields

6) Fix buf with allocate memory for FLocateBuffer (AV when Locate, Lookup, ReindexAll, DBEval or Pack if BufferSize 4096)

7) Complex actions to make index compatibility with CLIPPER:

— Full rewrite TVKNTXIndex.DeleteKey procedure, now it normalize index like a CLIPPER.

— Make TVKNTXIndex.DeleteKeyStyle property to switch Delete Key style between CLIPPER normalize index and all athers (Apollo, Halcyon…).

— Add TVKNTXCompactIndex.NormalizeRest method to make normalize index in TVKNTXIndex.CreateCompactIndex and TVKNTXIndex.SubNtx procedures.

ATTENTION: Rebuild all indexes after apply this version !

8) Add methods: TVKNTXIndex.FindKey

TVKNTXIndex.FindKeyFields with overloaded some parameters

It is the same SeekFirst…, but subject to SetDeleted, Filter and Range.

Partual key sapport Ok!

9) Rewrite Lokate and Lookup on TVKNTXIndex.FindKeyFields.

10) Add methods:

TVKSmartDBF.SetKey;

TVKSmartDBF.EditKey;

TVKSmartDBF.GotoKey;

TVKSmartDBF.GotoNearest;

TVKSmartDBF.DropEditKey;

TVKSmartDBF.FindKey;

TVKSmartDBF.FindNearest;

All this methods work throw TVKNTXIndex.FindKeyFields.

11) Add TVKSmartDBF.IndexName property.

12) Make type ‘C’ is not be NULL, if field empty Field.AsString return string of spases lethgt of field length.

{/codecitation}

Добавить комментарий