BDE Decision Cube ComponentsをDelphi2007で使用

Delphi ver7に存在した、BDEのDecision Cube Componentsが、Delphi2007のコンポーネントパレット上から消えている。
ソースは消されていないので、そこから、パレットに復元する方法です。

復元方法

ソースは、($BDS)\source\Win32\xtab にある。
上記ホルダにあるプロジェクトファイルを使って再構築するば良いのでだが、エラーが出る。
参照パッケージの追加が必要なようで、”参照の追加”で、dclbde.dcp の追加が必要なようである。
追加後、再構築すればＯＫ。

バグ(?)修正

データの値によってオーバーフローするので下記の修正を行っておくことをお勧めする。

//  procedure SetMemoryCapacity(Value: Integer);
  procedure SetMemoryCapacity(Value: Int64);
//  function GetMemoryCapacity: Integer;
  function GetMemoryCapacity: Int64;
～～～～
var
//  AvailableMemory: Integer;    { Memory available to allocate }  
  AvailableMemory: Int64;       { Memory available to allocate }
// TotalAllocatedMemory: Integer;  { Total allaocted by the array classes }
  TotalAllocatedMemory: Int64;  { Total allaocted by the array classes }