Class TTestForm (unit Test)

Inherits from

TForm

This version has been tested with Delphi 2.0 and seems to work fine. This does NOT work with 16-bit Delphi! The 16-bit version is in a file called inmemory.zip. This is an exmple of how to use TInMemoryTable and TTempTable. See inmem.pas and temptbl.pas for more information. WARNING! THIS CODE IS PROVIDED AS IS WITH NO GUARANTEES OF ANY KIND! USE THIS AT YOUR OWN RISK - YOU ARE THE ONLY PERSON RESPONSIBLE FOR ANY DAMAGE THIS CODE MAY CAUSE - YOU HAVE BEEN WARNED! Have Fun! Gregory Trubetskoy http://www.mira.com/home/grisha

Constructors



Functions

procedure FormCreate(Sender: TObject);

teble name

procedure IndexButtonClick(Sender: TObject);

Set private directory

procedure InMemoryButtonClick(Sender: TObject);


procedure Label1DblClick(Sender: TObject);


procedure TempButtonClick(Sender: TObject);

link the grid on the form to this table

Properties

Events

Variables

Bevel1 : TBevel;


Bevel2 : TBevel;


Bevel3 : TBevel;


DBGrid1 : TDBGrid;


DBGrid2 : TDBGrid;


IndexButton : TButton;


InMemoryButton : TButton;


InMemoryDataSource : TDataSource;


Label1 : TLabel;


TableNameLabel : TLabel;


TempButton : TButton;


TempDataSource : TDataSource;


MyInMemoryTable : TInMemoryTable;

Public declarations

MyTempTable : TTempTable;



Constructors


Functions


procedure FormCreate(Sender: TObject);

teble name


procedure IndexButtonClick(Sender: TObject);

Set private directory


procedure InMemoryButtonClick(Sender: TObject);


procedure Label1DblClick(Sender: TObject);


procedure TempButtonClick(Sender: TObject);

link the grid on the form to this table


Properties


Events


Variables


Bevel1 : TBevel;


Bevel2 : TBevel;


Bevel3 : TBevel;


DBGrid1 : TDBGrid;


DBGrid2 : TDBGrid;


IndexButton : TButton;


InMemoryButton : TButton;


InMemoryDataSource : TDataSource;


Label1 : TLabel;


TableNameLabel : TLabel;


TempButton : TButton;


TempDataSource : TDataSource;


MyInMemoryTable : TInMemoryTable;

Public declarations


MyTempTable : TTempTable;