git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@7 05c56307-c608-d34a-929d-697000501d7a
317 lines
11 KiB
Plaintext
317 lines
11 KiB
Plaintext
object MasterDetailMultiDemoMainForm: TMasterDetailMultiDemoMainForm
|
|
Left = 44
|
|
Top = 36
|
|
Width = 952
|
|
Height = 655
|
|
Caption = 'ExpressQuantumGrid MasterDetailMulti Demo'
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
Menu = mmMain
|
|
Position = poScreenCenter
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object lbDescrip: TLabel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 944
|
|
Height = 20
|
|
Align = alTop
|
|
AutoSize = False
|
|
Caption =
|
|
'This Demo represents the possibility of datasets controlling via' +
|
|
' the switching of grid tabs. Click '#39'About this demo'#39' for more in' +
|
|
'formation.'
|
|
Color = 4707838
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -13
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
WordWrap = True
|
|
end
|
|
object sbMain: TStatusBar
|
|
Left = 0
|
|
Top = 582
|
|
Width = 944
|
|
Height = 19
|
|
AutoHint = True
|
|
Panels = <>
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
SimplePanel = True
|
|
end
|
|
object Grid: TcxGrid
|
|
Left = 0
|
|
Top = 20
|
|
Width = 944
|
|
Height = 562
|
|
Align = alClient
|
|
TabOrder = 1
|
|
RootLevelOptions.DetailTabsPosition = dtpLeft
|
|
RootLevelStyles.Tab = MasterDetailMultiDemoMainDM.cxStyle1
|
|
RootLevelStyles.TabsBackground = MasterDetailMultiDemoMainDM.cxStyle39
|
|
RootLevelStyles.OnGetTabStyle = GridRootLevelStylesGetTabStyle
|
|
OnActiveTabChanged = GridActiveTabChanged
|
|
object cvPeople: TcxGridDBCardView
|
|
DataController.DataSource = MasterDetailMultiDemoMainDM.dsFilmsPersons
|
|
DataController.DetailKeyFieldNames = 'FilmID'
|
|
DataController.KeyFieldNames = 'ID'
|
|
DataController.MasterKeyFieldNames = 'ID'
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
NavigatorButtons.ConfirmDelete = False
|
|
Styles.StyleSheet = MasterDetailMultiDemoMainDM.GridCardViewStyleSheetDevExpress
|
|
object cvPeopleName: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'Name'
|
|
Kind = rkCaption
|
|
end
|
|
object cvPeoplePersonLineID: TcxGridDBCardViewRow
|
|
Caption = 'Occupation'
|
|
DataBinding.FieldName = 'PersonLineID'
|
|
PropertiesClassName = 'TcxLookupComboBoxProperties'
|
|
Properties.DropDownAutoSize = True
|
|
Properties.KeyFieldNames = 'ID'
|
|
Properties.ListColumns = <
|
|
item
|
|
FieldName = 'NAME'
|
|
end>
|
|
Properties.ListOptions.GridLines = glNone
|
|
Properties.ListOptions.ShowHeader = False
|
|
Properties.ListSource = MasterDetailMultiDemoMainDM.dsPersonsLine
|
|
end
|
|
object cvPeopleFIRSTNAME: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'FIRSTNAME'
|
|
end
|
|
object cvPeopleSECONDNAME: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'SECONDNAME'
|
|
end
|
|
object cvPeopleNICKNAME: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'NICKNAME'
|
|
end
|
|
object cvPeopleBIRTHNAME: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'BIRTHNAME'
|
|
end
|
|
object cvPeopleDATEOFBIRTH: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'DATEOFBIRTH'
|
|
end
|
|
object cvPeopleLOCATIONOFBIRTH: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'LOCATIONOFBIRTH'
|
|
end
|
|
object cvPeopleBIOGRAPHY: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'BIOGRAPHY'
|
|
PropertiesClassName = 'TcxBlobEditProperties'
|
|
Properties.BlobEditKind = bekMemo
|
|
end
|
|
object cvPeopleHOMEPAGE: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'HOMEPAGE'
|
|
end
|
|
object cvPeopleID: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'ID'
|
|
Visible = False
|
|
end
|
|
object cvPeopleFilmID: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'FilmID'
|
|
Visible = False
|
|
end
|
|
object cvPeopleBIRTHCOUNTRY: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'BIRTHCOUNTRY'
|
|
Visible = False
|
|
end
|
|
object cvPeopleGender: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'Gender'
|
|
Visible = False
|
|
end
|
|
end
|
|
object tvCompanies: TcxGridDBTableView
|
|
DataController.DataSource = MasterDetailMultiDemoMainDM.dsFilmsCompanies
|
|
DataController.DetailKeyFieldNames = 'FILMID'
|
|
DataController.KeyFieldNames = 'ID'
|
|
DataController.MasterKeyFieldNames = 'ID'
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
NavigatorButtons.ConfirmDelete = False
|
|
Styles.StyleSheet = MasterDetailMultiDemoMainDM.GridTableViewStyleSheetDevExpress
|
|
object tvCompaniesName: TcxGridDBColumn
|
|
DataBinding.FieldName = 'Name'
|
|
end
|
|
object tvCompaniesType: TcxGridDBColumn
|
|
DataBinding.FieldName = 'Type'
|
|
end
|
|
object tvCompaniesCountry: TcxGridDBColumn
|
|
DataBinding.FieldName = 'Country'
|
|
end
|
|
object tvCompaniesWebSite: TcxGridDBColumn
|
|
DataBinding.FieldName = 'WebSite'
|
|
Visible = False
|
|
end
|
|
object tvCompaniesID: TcxGridDBColumn
|
|
DataBinding.FieldName = 'ID'
|
|
Visible = False
|
|
end
|
|
object tvCompaniesFILMID: TcxGridDBColumn
|
|
DataBinding.FieldName = 'FILMID'
|
|
Visible = False
|
|
end
|
|
end
|
|
object cvPhotos: TcxGridDBCardView
|
|
DataController.DataSource = MasterDetailMultiDemoMainDM.dsFilmsScreens
|
|
DataController.DetailKeyFieldNames = 'FILMID'
|
|
DataController.KeyFieldNames = 'ID'
|
|
DataController.MasterKeyFieldNames = 'ID'
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
NavigatorButtons.ConfirmDelete = False
|
|
OptionsView.CellAutoHeight = True
|
|
Styles.StyleSheet = MasterDetailMultiDemoMainDM.GridCardViewStyleSheetDevExpress
|
|
object cvPhotosID: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'ID'
|
|
Visible = False
|
|
end
|
|
object cvPhotosFILMID: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'FILMID'
|
|
Visible = False
|
|
end
|
|
object cvPhotosSCREEN: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'SCREEN'
|
|
PropertiesClassName = 'TcxImageProperties'
|
|
Properties.GraphicClassName = 'TJPEGImage'
|
|
Properties.Stretch = True
|
|
Options.ShowCaption = False
|
|
end
|
|
object cvPhotosICON: TcxGridDBCardViewRow
|
|
DataBinding.FieldName = 'ICON'
|
|
Visible = False
|
|
end
|
|
end
|
|
object bvFilms: TcxGridDBBandedTableView
|
|
DataController.DataSource = MasterDetailMultiDemoMainDM.dsFilms
|
|
DataController.KeyFieldNames = 'ID'
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
NavigatorButtons.ConfirmDelete = False
|
|
OptionsView.CellAutoHeight = True
|
|
OptionsView.GroupByBox = False
|
|
OptionsView.Header = False
|
|
OptionsView.Indicator = True
|
|
Preview.Column = bvFilmsCAPTION
|
|
Preview.Place = ppTop
|
|
Preview.Visible = True
|
|
Styles.StyleSheet = MasterDetailMultiDemoMainDM.GridBandedTableViewStyleSheetDevExpress
|
|
Bands = <
|
|
item
|
|
Caption = 'Film'
|
|
FixedKind = fkLeft
|
|
end
|
|
item
|
|
Caption = 'Info'
|
|
end>
|
|
object bvFilmsCAPTION: TcxGridDBBandedColumn
|
|
DataBinding.FieldName = 'CAPTION'
|
|
Position.BandIndex = 0
|
|
Position.ColIndex = 0
|
|
Position.RowIndex = 0
|
|
end
|
|
object bvFilmsPHOTO: TcxGridDBBandedColumn
|
|
DataBinding.FieldName = 'PHOTO'
|
|
PropertiesClassName = 'TcxImageProperties'
|
|
Properties.GraphicClassName = 'TJPEGImage'
|
|
Properties.Stretch = True
|
|
Position.BandIndex = 0
|
|
Position.ColIndex = 0
|
|
Position.LineCount = 10
|
|
Position.RowIndex = 1
|
|
end
|
|
object bvFilmsYEAR: TcxGridDBBandedColumn
|
|
DataBinding.FieldName = 'YEAR'
|
|
Position.BandIndex = 1
|
|
Position.ColIndex = 0
|
|
Position.RowIndex = 0
|
|
end
|
|
object bvFilmsRUNTIME: TcxGridDBBandedColumn
|
|
DataBinding.FieldName = 'RUNTIME'
|
|
Position.BandIndex = 1
|
|
Position.ColIndex = 1
|
|
Position.RowIndex = 0
|
|
end
|
|
object bvFilmsPLOTOUTLINE: TcxGridDBBandedColumn
|
|
DataBinding.FieldName = 'PLOTOUTLINE'
|
|
PropertiesClassName = 'TcxMemoProperties'
|
|
Properties.ScrollBars = ssVertical
|
|
Position.BandIndex = 1
|
|
Position.ColIndex = 0
|
|
Position.LineCount = 8
|
|
Position.RowIndex = 1
|
|
end
|
|
object bvFilmsWEBSITE: TcxGridDBBandedColumn
|
|
DataBinding.FieldName = 'WEBSITE'
|
|
PropertiesClassName = 'TcxHyperLinkEditProperties'
|
|
Position.BandIndex = 1
|
|
Position.ColIndex = 0
|
|
Position.RowIndex = 2
|
|
end
|
|
end
|
|
end
|
|
object mmMain: TMainMenu
|
|
Left = 504
|
|
Top = 16
|
|
object miFile: TMenuItem
|
|
Caption = '&File'
|
|
object miExit: TMenuItem
|
|
Caption = 'E&xit'
|
|
Hint = 'Press to quit the demo-program'
|
|
ShortCut = 32856
|
|
OnClick = miExitClick
|
|
end
|
|
end
|
|
object miOptions: TMenuItem
|
|
Caption = '&Options'
|
|
object miGenreTabPosition: TMenuItem
|
|
Caption = 'Genre Tab &Position'
|
|
Hint = 'Option1 hint'
|
|
object miTabPositionLeft: TMenuItem
|
|
Tag = 1
|
|
Caption = '&Left'
|
|
Checked = True
|
|
GroupIndex = 2
|
|
RadioItem = True
|
|
OnClick = miTabPositionClick
|
|
end
|
|
object miTabPositionTop: TMenuItem
|
|
Tag = 2
|
|
Caption = '&Top'
|
|
GroupIndex = 2
|
|
RadioItem = True
|
|
OnClick = miTabPositionClick
|
|
end
|
|
object miTabPositionNone: TMenuItem
|
|
Caption = '&None'
|
|
GroupIndex = 2
|
|
RadioItem = True
|
|
OnClick = miTabPositionClick
|
|
end
|
|
end
|
|
end
|
|
object miAbout: TMenuItem
|
|
Caption = '&About this demo'
|
|
Hint = 'Displays the brief description of the current demo features'
|
|
OnClick = miAboutClick
|
|
end
|
|
end
|
|
object LookAndFeelController: TcxLookAndFeelController
|
|
NativeStyle = True
|
|
Left = 472
|
|
Top = 16
|
|
end
|
|
end
|