david
3b29f73ece
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@8 05c56307-c608-d34a-929d-697000501d7a
279 lines
7.3 KiB
Plaintext
279 lines
7.3 KiB
Plaintext
object BandedFixedDemoDataDM: TBandedFixedDemoDataDM
|
|
Left = 310
|
|
Top = 163
|
|
Height = 373
|
|
Width = 325
|
|
object Database: TDatabase
|
|
Connected = True
|
|
DatabaseName = 'DemosDB'
|
|
DriverName = 'STANDARD'
|
|
Params.Strings = (
|
|
'PATH=..\..\Data'
|
|
'DEFAULT DRIVER=PARADOX'
|
|
'ENABLE BCD=FALSE')
|
|
SessionName = 'Default'
|
|
Left = 40
|
|
Top = 8
|
|
end
|
|
object tblSheduler: TTable
|
|
Active = True
|
|
DatabaseName = 'DemosDB'
|
|
OnCalcFields = tblShedulerCalcFields
|
|
TableName = 'SCHEDULER.DB'
|
|
Left = 40
|
|
Top = 64
|
|
object tblShedulerID: TAutoIncField
|
|
FieldName = 'ID'
|
|
ReadOnly = True
|
|
Visible = False
|
|
end
|
|
object tblShedulerPROJECTID: TIntegerField
|
|
FieldName = 'PROJECTID'
|
|
ReadOnly = True
|
|
Visible = False
|
|
end
|
|
object tblShedulerProjectManagerID: TIntegerField
|
|
FieldKind = fkLookup
|
|
FieldName = 'ProjectManagerID'
|
|
LookupDataSet = tblProjects
|
|
LookupKeyFields = 'ID'
|
|
LookupResultField = 'MANAGERID'
|
|
KeyFields = 'PROJECTID'
|
|
ReadOnly = True
|
|
Visible = False
|
|
Lookup = True
|
|
end
|
|
object tblShedulerUSERID: TIntegerField
|
|
FieldName = 'USERID'
|
|
ReadOnly = True
|
|
end
|
|
object tblShedulerSUNDAY: TSmallIntField
|
|
FieldName = 'SUNDAY'
|
|
end
|
|
object tblShedulerMONDAY: TSmallIntField
|
|
FieldName = 'MONDAY'
|
|
end
|
|
object tblShedulerTUESDAY: TSmallIntField
|
|
FieldName = 'TUESDAY'
|
|
end
|
|
object tblShedulerWEDNESDAY: TSmallIntField
|
|
FieldName = 'WEDNESDAY'
|
|
end
|
|
object tblShedulerTHURSDAY: TSmallIntField
|
|
FieldName = 'THURSDAY'
|
|
end
|
|
object tblShedulerFRIDAY: TSmallIntField
|
|
FieldName = 'FRIDAY'
|
|
end
|
|
object tblShedulerSATURDAY: TSmallIntField
|
|
FieldName = 'SATURDAY'
|
|
end
|
|
object tblShedulerWeekSum: TIntegerField
|
|
FieldKind = fkCalculated
|
|
FieldName = 'WeekSum'
|
|
Calculated = True
|
|
end
|
|
object tblShedulerWeekAVG: TFloatField
|
|
FieldKind = fkCalculated
|
|
FieldName = 'WeekAVG'
|
|
DisplayFormat = '#.#'
|
|
Calculated = True
|
|
end
|
|
end
|
|
object dsSheduler: TDataSource
|
|
DataSet = tblSheduler
|
|
Left = 40
|
|
Top = 112
|
|
end
|
|
object dsPersons: TDataSource
|
|
DataSet = tblPersons
|
|
Left = 144
|
|
Top = 112
|
|
end
|
|
object tblPersons: TTable
|
|
Active = True
|
|
DatabaseName = 'DemosDB'
|
|
TableName = 'PERSONS.DB'
|
|
Left = 144
|
|
Top = 64
|
|
object tblPersonsID: TIntegerField
|
|
FieldName = 'ID'
|
|
end
|
|
object tblPersonsName: TStringField
|
|
FieldName = 'Name'
|
|
Size = 50
|
|
end
|
|
object tblPersonsAddress: TStringField
|
|
FieldName = 'Address'
|
|
Size = 100
|
|
end
|
|
object tblPersonsPhone: TStringField
|
|
FieldName = 'Phone'
|
|
Size = 24
|
|
end
|
|
object tblPersonsFax: TStringField
|
|
FieldName = 'Fax'
|
|
Size = 24
|
|
end
|
|
object tblPersonsEMAIL: TStringField
|
|
FieldName = 'EMAIL'
|
|
Size = 100
|
|
end
|
|
end
|
|
object StyleRepository: TcxStyleRepository
|
|
Left = 160
|
|
Top = 8
|
|
object cxStyle1: TcxStyle
|
|
AssignedValues = [svColor]
|
|
Color = 15451300
|
|
end
|
|
object cxStyle2: TcxStyle
|
|
AssignedValues = [svColor]
|
|
Color = 15451300
|
|
end
|
|
object cxStyle3: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 12937777
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
TextColor = clWhite
|
|
end
|
|
object cxStyle4: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 15252642
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
TextColor = 11032875
|
|
end
|
|
object cxStyle5: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 16247513
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
TextColor = clBlack
|
|
end
|
|
object cxStyle6: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 15784893
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
TextColor = clBlack
|
|
end
|
|
object cxStyle7: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 16247513
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
TextColor = clBlack
|
|
end
|
|
object cxStyle8: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 14811135
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
TextColor = clNavy
|
|
end
|
|
object cxStyle9: TcxStyle
|
|
AssignedValues = [svColor]
|
|
Color = 15451300
|
|
end
|
|
object cxStyle10: TcxStyle
|
|
AssignedValues = [svColor, svTextColor]
|
|
Color = 4707838
|
|
TextColor = clBlack
|
|
end
|
|
object cxStyle11: TcxStyle
|
|
AssignedValues = [svColor, svTextColor]
|
|
Color = 15451300
|
|
TextColor = clBlack
|
|
end
|
|
object cxStyle12: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 14811135
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
TextColor = clNavy
|
|
end
|
|
object cxStyle13: TcxStyle
|
|
AssignedValues = [svColor, svTextColor]
|
|
Color = 16048336
|
|
TextColor = clBlack
|
|
end
|
|
object stlGroupNode: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 15253902
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
TextColor = clWhite
|
|
end
|
|
object stlFixedBand: TcxStyle
|
|
AssignedValues = [svColor]
|
|
Color = 15322014
|
|
end
|
|
object TreeListStyleSheetDevExpress: TcxTreeListStyleSheet
|
|
Caption = 'DevExpress'
|
|
Styles.Background = cxStyle1
|
|
Styles.Content = cxStyle5
|
|
Styles.Inactive = cxStyle9
|
|
Styles.Selection = cxStyle13
|
|
Styles.BandBackground = cxStyle2
|
|
Styles.BandHeader = cxStyle3
|
|
Styles.ColumnHeader = cxStyle4
|
|
Styles.ContentEven = cxStyle7
|
|
Styles.ContentOdd = cxStyle6
|
|
Styles.Footer = cxStyle8
|
|
Styles.IncSearch = cxStyle10
|
|
Styles.Indicator = cxStyle11
|
|
Styles.Preview = cxStyle12
|
|
BuiltIn = True
|
|
end
|
|
end
|
|
object dsProjects: TDataSource
|
|
DataSet = tblProjects
|
|
Left = 208
|
|
Top = 112
|
|
end
|
|
object tblProjects: TTable
|
|
Active = True
|
|
DatabaseName = 'DemosDB'
|
|
TableName = 'PROJECTS.DB'
|
|
Left = 208
|
|
Top = 64
|
|
object tblProjectsID: TAutoIncField
|
|
FieldName = 'ID'
|
|
ReadOnly = True
|
|
end
|
|
object tblProjectsNAME: TStringField
|
|
FieldName = 'NAME'
|
|
Size = 100
|
|
end
|
|
object tblProjectsMANAGERID: TIntegerField
|
|
FieldName = 'MANAGERID'
|
|
end
|
|
end
|
|
end
|