Componentes.Terceros.DevExp.../official/x.30/ExpressQuantumGrid 6/Demos/Delphi/EditorsMaskDemo/EditorsMaskDemoData.pas
2007-12-16 17:06:54 +00:00

37 lines
738 B
ObjectPascal

unit EditorsMaskDemoData;
interface
uses
SysUtils, Classes, DB, cxStyles, Forms, DBTables;
type
TEditorsMaskDemoMainDM = class(TDataModule)
StyleRepository: TcxStyleRepository;
stBlueDark: TcxStyle;
stGold: TcxStyle;
stBlueLight: TcxStyle;
stBlueBright: TcxStyle;
stYellowLight: TcxStyle;
stGreyLight: TcxStyle;
stBlueSky: TcxStyle;
DataBase: TDataBase;
ADOTableUSERS: TTable;
DataSourceUSERS: TDataSource;
ADOTableDEPARTMENTS: TTable;
DataSourceDEPARTMENTS: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;
var
EditorsMaskDemoMainDM: TEditorsMaskDemoMainDM;
implementation
{$R *.dfm}
end.