| Class TInMemoryTable (unit Inmem16) |
TTable
| Constructors |
| Functions |
procedure CreateTable;
function CreateHandle: HDBICur;
procedure EncodeFieldDesc(var FieldDesc: FLDDesc;
const Name: string; DataType: TFieldType; Size: Word);| Properties |
| Events |
| Variables |
hCursor : hDBICur;| Constructors |
| Functions |
procedure CreateTable;This is where all the fun happens. I copied this function from the VCL source and then changed it to use DbiCreateInMemoryTable instead of DbiCreateTable. Since InMemory tables do not support Indexes - I took all of the index-related things out
function CreateHandle: HDBICur;luckely this function is virtual - so I could override it. In the original VCL code for TTable this function actually opens the table - but since we already have the handle to the table - we just return it
procedure EncodeFieldDesc(var FieldDesc: FLDDesc;
const Name: string; DataType: TFieldType; Size: Word);This function is cut-and-pasted from the VCL source code. I had to do this because it is declared private in the TTable component so I had no access to it from here.
| Properties |
| Events |
| Variables |
hCursor : hDBICur;