david
5678df5538
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@31 05c56307-c608-d34a-929d-697000501d7a
61 lines
2.1 KiB
ObjectPascal
61 lines
2.1 KiB
ObjectPascal
unit DragDropDemoDictionaries;
|
|
|
|
interface
|
|
|
|
uses
|
|
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
|
|
Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxEdit,
|
|
DB, cxDBData, cxGridLevel, cxGridCustomTableView, cxGridTableView,
|
|
cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid,
|
|
cxGridCardView, cxGridDBCardView, DragDropDemoData, StdCtrls,
|
|
cxDataStorage, cxDBLookupComboBox, cxBlobEdit, cxCheckBox,
|
|
cxImageComboBox;
|
|
|
|
type
|
|
TDragDropDemoDictionariesForm = class(TForm)
|
|
SourceGrid: TcxGrid;
|
|
tvCompaniesList: TcxGridDBTableView;
|
|
tvCompaniesListID: TcxGridDBColumn;
|
|
tvCompaniesListCOMPANYTYPEID: TcxGridDBColumn;
|
|
tvCompaniesListCOUNTRYID: TcxGridDBColumn;
|
|
tvCompaniesListCOMPANYNAME: TcxGridDBColumn;
|
|
tvCompaniesListCOMPANYWEBSITE: TcxGridDBColumn;
|
|
tvFilmsList: TcxGridDBTableView;
|
|
tvFilmsListID: TcxGridDBColumn;
|
|
tvFilmsListCAPTION: TcxGridDBColumn;
|
|
tvFilmsListYEAR: TcxGridDBColumn;
|
|
tvFilmsListTAGLINE: TcxGridDBColumn;
|
|
tvFilmsListPLOTOUTLINE: TcxGridDBColumn;
|
|
tvFilmsListRUNTIME: TcxGridDBColumn;
|
|
tvFilmsListCOLOR: TcxGridDBColumn;
|
|
tvFilmsListPHOTO: TcxGridDBColumn;
|
|
tvFilmsListICON: TcxGridDBColumn;
|
|
tvFilmsListWEBSITE: TcxGridDBColumn;
|
|
glFilmsList: TcxGridLevel;
|
|
glPersonsList: TcxGridLevel;
|
|
glCompaniesList: TcxGridLevel;
|
|
cvPersonsList: TcxGridDBCardView;
|
|
cvPersonsListID: TcxGridDBCardViewRow;
|
|
cvPersonsListFIRSTNAME: TcxGridDBCardViewRow;
|
|
cvPersonsListSECONDNAME: TcxGridDBCardViewRow;
|
|
cvPersonsListGENDER: TcxGridDBCardViewRow;
|
|
cvPersonsListBIRTHNAME: TcxGridDBCardViewRow;
|
|
cvPersonsListDATEOFBIRTH: TcxGridDBCardViewRow;
|
|
cvPersonsListBIRTHCOUNTRY: TcxGridDBCardViewRow;
|
|
cvPersonsListLOCATIONOFBIRTH: TcxGridDBCardViewRow;
|
|
cvPersonsListBIOGRAPHY: TcxGridDBCardViewRow;
|
|
cvPersonsListNICKNAME: TcxGridDBCardViewRow;
|
|
cvPersonsListHOMEPAGE: TcxGridDBCardViewRow;
|
|
lbDesc: TLabel;
|
|
private
|
|
end;
|
|
|
|
var
|
|
DragDropDemoDictionariesForm: TDragDropDemoDictionariesForm;
|
|
|
|
implementation
|
|
|
|
{$R *.dfm}
|
|
|
|
end.
|