Componentes.Terceros.DevExp.../internal/x.36/1/ExpressQuantumGrid 6/Demos/Delphi/CustomRowHeightDemo/CustomRowHeightDemoData.pas
2008-09-04 11:31:51 +00:00

40 lines
886 B
ObjectPascal

unit CustomRowHeightDemoData;
interface
uses
Forms, SysUtils, Classes, DB, cxStyles, ImgList,
Controls, cxEdit, cxEditRepositoryItems, cxDBEditRepository, cxClasses,
cxGridCardView, DBTables;
type
TCustomRowHeightDemoDataDM = class(TDataModule)
DataBase: TDataBase;
tblFilms: TTable;
dsFilms: TDataSource;
tblFilmsID: TAutoIncField;
tblFilmsCAPTION: TStringField;
tblFilmsYEAR: TIntegerField;
tblFilmsTAGLINE: TStringField;
tblFilmsPLOTOUTLINE: TStringField;
tblFilmsRUNTIME: TIntegerField;
tblFilmsCOLOR: TStringField;
tblFilmsPHOTO: TBlobField;
tblFilmsICON: TBlobField;
tblFilmsWEBSITE: TStringField;
private
{ Private declarations }
public
{ Public declarations }
end;
var
CustomRowHeightDemoDataDM: TCustomRowHeightDemoDataDM;
implementation
{$R *.dfm}
end.