Componentes.Terceros.DevExp.../official/x.26/ExpressQuantumGrid 6/Demos/Delphi/EditorsMaskDemo/EditorsMaskDemoData.pas
2007-09-09 11:27:27 +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.