unit ConvertGrid3DemoData; interface uses SysUtils, Classes, DB, cxStyles, cxClasses, cxGridTableView, Forms, DBTables; type TConvertGrid3DemoMainDM = class(TDataModule) DataBase: TDataBase; ADOTable: TTable; DataSource: TDataSource; private { Private declarations } public { Public declarations } end; var ConvertGrid3DemoMainDM: TConvertGrid3DemoMainDM; implementation {$R *.dfm} end.