david
8a45a23220
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@7 05c56307-c608-d34a-929d-697000501d7a
569 lines
15 KiB
Plaintext
569 lines
15 KiB
Plaintext
object EditorsMaskDemoMainForm: TEditorsMaskDemoMainForm
|
|
Left = 178
|
|
Top = 57
|
|
Width = 800
|
|
Height = 600
|
|
Caption = 'ExpressQuantumGrid EditorsMaskDemo'
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
Menu = mmMain
|
|
Position = poScreenCenter
|
|
ShowHint = True
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object lbDescrip: TLabel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 792
|
|
Height = 32
|
|
Align = alTop
|
|
Caption =
|
|
'Practice using masked data-aware editors for reading and writing' +
|
|
'.'#10'Experiment by changing the Options above. Click '#39'About this de' +
|
|
'mo'#39' for more information.'
|
|
Color = 12937777
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWhite
|
|
Font.Height = -13
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
WordWrap = True
|
|
end
|
|
object sbMain: TStatusBar
|
|
Left = 0
|
|
Top = 527
|
|
Width = 792
|
|
Height = 19
|
|
AutoHint = True
|
|
Panels = <>
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
SimplePanel = True
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 32
|
|
Width = 189
|
|
Height = 495
|
|
Align = alLeft
|
|
TabOrder = 1
|
|
object Panel3: TPanel
|
|
Left = 1
|
|
Top = 1
|
|
Width = 187
|
|
Height = 32
|
|
Align = alTop
|
|
BevelInner = bvLowered
|
|
BevelOuter = bvLowered
|
|
Caption = 'Departments'
|
|
Color = 4707838
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
end
|
|
object cxGrid: TcxGrid
|
|
Left = 1
|
|
Top = 33
|
|
Width = 187
|
|
Height = 461
|
|
Align = alClient
|
|
TabOrder = 1
|
|
object cxGridDBTableView: TcxGridDBTableView
|
|
DataController.DataSource = EditorsMaskDemoMainDM.DataSourceDEPARTMENTS
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
NavigatorButtons.ConfirmDelete = False
|
|
OptionsCustomize.ColumnFiltering = False
|
|
OptionsCustomize.ColumnGrouping = False
|
|
OptionsData.Deleting = False
|
|
OptionsData.Editing = False
|
|
OptionsData.Inserting = False
|
|
OptionsSelection.InvertSelect = False
|
|
OptionsView.ColumnAutoWidth = True
|
|
OptionsView.GroupByBox = False
|
|
Styles.Background = EditorsMaskDemoMainDM.stBlueSky
|
|
Styles.Content = EditorsMaskDemoMainDM.stBlueLight
|
|
Styles.Inactive = EditorsMaskDemoMainDM.stBlueSky
|
|
Styles.Selection = EditorsMaskDemoMainDM.stBlueBright
|
|
Styles.Header = EditorsMaskDemoMainDM.stBlueDark
|
|
object cxGridDBTableViewNAME: TcxGridDBColumn
|
|
Caption = 'Name'
|
|
DataBinding.FieldName = 'NAME'
|
|
Options.Editing = False
|
|
Options.Filtering = False
|
|
Options.Grouping = False
|
|
Width = 100
|
|
end
|
|
end
|
|
object cxGridLevel: TcxGridLevel
|
|
GridView = cxGridDBTableView
|
|
end
|
|
end
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 189
|
|
Top = 32
|
|
Width = 603
|
|
Height = 495
|
|
Align = alClient
|
|
Color = 15451300
|
|
TabOrder = 2
|
|
object lbFirstName: TLabel
|
|
Left = 28
|
|
Top = 56
|
|
Width = 51
|
|
Height = 13
|
|
Caption = 'First name:'
|
|
end
|
|
object lbMiddleName: TLabel
|
|
Left = 16
|
|
Top = 84
|
|
Width = 63
|
|
Height = 13
|
|
Caption = 'Middle name:'
|
|
end
|
|
object lbLastName: TLabel
|
|
Left = 28
|
|
Top = 112
|
|
Width = 52
|
|
Height = 13
|
|
Caption = 'Last name:'
|
|
end
|
|
object lbCountry: TLabel
|
|
Left = 40
|
|
Top = 188
|
|
Width = 39
|
|
Height = 13
|
|
Caption = 'Country:'
|
|
end
|
|
object lbPostalCode: TLabel
|
|
Left = 20
|
|
Top = 160
|
|
Width = 59
|
|
Height = 13
|
|
Caption = 'Postal code:'
|
|
end
|
|
object lbCity: TLabel
|
|
Left = 60
|
|
Top = 216
|
|
Width = 20
|
|
Height = 13
|
|
Caption = 'City:'
|
|
end
|
|
object lbAddress: TLabel
|
|
Left = 44
|
|
Top = 244
|
|
Width = 35
|
|
Height = 13
|
|
Caption = 'Adress:'
|
|
end
|
|
object lbPhone: TLabel
|
|
Left = 44
|
|
Top = 292
|
|
Width = 34
|
|
Height = 13
|
|
Caption = 'Phone:'
|
|
end
|
|
object lbFax: TLabel
|
|
Left = 56
|
|
Top = 320
|
|
Width = 20
|
|
Height = 13
|
|
Caption = 'Fax:'
|
|
end
|
|
object lbEmail: TLabel
|
|
Left = 48
|
|
Top = 396
|
|
Width = 31
|
|
Height = 13
|
|
Caption = 'E-mail:'
|
|
end
|
|
object lbHomePage: TLabel
|
|
Left = 20
|
|
Top = 368
|
|
Width = 58
|
|
Height = 13
|
|
Caption = 'Home page:'
|
|
end
|
|
object lbInfoPhone: TLabel
|
|
Left = 212
|
|
Top = 292
|
|
Width = 105
|
|
Height = 13
|
|
Caption = 'Delphi Standard Mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoFax: TLabel
|
|
Left = 212
|
|
Top = 320
|
|
Width = 229
|
|
Height = 13
|
|
Caption = 'Regular Expression with Auto Complete Function'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoHomePage: TLabel
|
|
Left = 344
|
|
Top = 368
|
|
Width = 229
|
|
Height = 13
|
|
Caption = 'Regular Expression with Auto Complete Function'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoEmail: TLabel
|
|
Left = 344
|
|
Top = 396
|
|
Width = 91
|
|
Height = 13
|
|
Caption = 'Regular Expression'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoPostalCode: TLabel
|
|
Left = 212
|
|
Top = 160
|
|
Width = 229
|
|
Height = 13
|
|
Caption = 'Regular Expression with Auto Complete Function'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoFirstName: TLabel
|
|
Left = 212
|
|
Top = 56
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'No mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoMiddleName: TLabel
|
|
Left = 212
|
|
Top = 84
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'No mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoLastName: TLabel
|
|
Left = 212
|
|
Top = 112
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'No mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoCountry: TLabel
|
|
Left = 212
|
|
Top = 188
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'No mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoCity: TLabel
|
|
Left = 212
|
|
Top = 216
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'No mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbInfoAddress: TLabel
|
|
Left = 344
|
|
Top = 244
|
|
Width = 42
|
|
Height = 13
|
|
Caption = 'No mask'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 12937777
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object Panel5: TPanel
|
|
Left = 1
|
|
Top = 1
|
|
Width = 601
|
|
Height = 33
|
|
Align = alTop
|
|
BevelInner = bvLowered
|
|
BevelOuter = bvLowered
|
|
Caption = 'Users'
|
|
Color = 4707838
|
|
Ctl3D = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentCtl3D = False
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
end
|
|
object edtFirstName: TcxDBTextEdit
|
|
Left = 84
|
|
Top = 52
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'FNAME'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.ReadOnly = False
|
|
Style.Color = 16247513
|
|
TabOrder = 1
|
|
end
|
|
object edtMiddleName: TcxDBTextEdit
|
|
Left = 84
|
|
Top = 80
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'MNAME'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.ReadOnly = False
|
|
Style.Color = 16247513
|
|
TabOrder = 2
|
|
end
|
|
object edtLastName: TcxDBTextEdit
|
|
Left = 84
|
|
Top = 108
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'LNAME'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Style.Color = 16247513
|
|
TabOrder = 3
|
|
end
|
|
object edtCountry: TcxDBTextEdit
|
|
Left = 84
|
|
Top = 184
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'COUNTRY'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Style.Color = 16247513
|
|
TabOrder = 5
|
|
end
|
|
object edtCity: TcxDBTextEdit
|
|
Left = 84
|
|
Top = 212
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'CITY'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Style.Color = 16247513
|
|
TabOrder = 6
|
|
end
|
|
object edtAddress: TcxDBTextEdit
|
|
Left = 84
|
|
Top = 240
|
|
Width = 253
|
|
Height = 21
|
|
DataBinding.DataField = 'ADDRESS'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Style.Color = 16247513
|
|
TabOrder = 7
|
|
end
|
|
object DBNavigator1: TcxDBNavigator
|
|
Left = 48
|
|
Top = 440
|
|
Width = 285
|
|
Height = 25
|
|
DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
TabOrder = 12
|
|
end
|
|
object edtPostalCode: TcxDBButtonEdit
|
|
Left = 84
|
|
Top = 156
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'POSTALCODE'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
Visible = False
|
|
end>
|
|
Properties.MaskKind = emkRegExprEx
|
|
Properties.EditMask = '\d\d\d\d\d? | \w\w\w'#39' '#39'\w\w\w'
|
|
Properties.MaxLength = 0
|
|
Properties.OnButtonClick = edtPostalCodePropertiesButtonClick
|
|
Style.Color = 16247513
|
|
TabOrder = 4
|
|
end
|
|
object edtPhone: TcxDBButtonEdit
|
|
Left = 84
|
|
Top = 288
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'PHONE'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
Visible = False
|
|
end>
|
|
Properties.EditMask = '!\(999\) 000-0000;1;_'
|
|
Properties.MaxLength = 0
|
|
Properties.OnButtonClick = cxDBButtonEdit1PropertiesButtonClick
|
|
Style.Color = 16247513
|
|
TabOrder = 8
|
|
end
|
|
object edtFax: TcxDBButtonEdit
|
|
Left = 84
|
|
Top = 316
|
|
Width = 121
|
|
Height = 21
|
|
DataBinding.DataField = 'FAX'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
Visible = False
|
|
end>
|
|
Properties.MaskKind = emkRegExprEx
|
|
Properties.EditMask = '(\(\d\d\d\)'#39#39' '#39#39')?\d\d\d-\d\d\d\d'
|
|
Properties.MaxLength = 0
|
|
Properties.OnButtonClick = cxDBButtonEdit2PropertiesButtonClick
|
|
Style.Color = 16247513
|
|
TabOrder = 9
|
|
end
|
|
object edtHomePage: TcxDBButtonEdit
|
|
Left = 84
|
|
Top = 364
|
|
Width = 253
|
|
Height = 21
|
|
DataBinding.DataField = 'HOMEPAGE'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
Visible = False
|
|
end>
|
|
Properties.MaskKind = emkRegExprEx
|
|
Properties.EditMask = 'http\:\/\/(\w+(\.\w+)*@)?\w+\.\w+(\.\w+)*(/(\w+(/\w+)*/?)?)?'
|
|
Properties.MaxLength = 0
|
|
Properties.OnButtonClick = cxDBButtonEdit3PropertiesButtonClick
|
|
Style.Color = 16247513
|
|
TabOrder = 10
|
|
end
|
|
object edtEmail: TcxDBButtonEdit
|
|
Left = 84
|
|
Top = 392
|
|
Width = 253
|
|
Height = 21
|
|
DataBinding.DataField = 'EMAIL'
|
|
DataBinding.DataSource = EditorsMaskDemoMainDM.DataSourceUSERS
|
|
Properties.Buttons = <
|
|
item
|
|
Default = True
|
|
Kind = bkEllipsis
|
|
Visible = False
|
|
end>
|
|
Properties.MaskKind = emkRegExpr
|
|
Properties.EditMask = '\w+@\w+\.\w+(\.\w+)*'
|
|
Properties.MaxLength = 0
|
|
Properties.OnButtonClick = cxDBButtonEdit4PropertiesButtonClick
|
|
Style.Color = 16247513
|
|
TabOrder = 11
|
|
end
|
|
end
|
|
object mmMain: TMainMenu
|
|
Left = 320
|
|
Top = 8
|
|
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 miDefaultMaskSettings: TMenuItem
|
|
Caption = 'Default &Mask Settings'
|
|
Hint = 'Sets the default mask set'
|
|
OnClick = miDefaultMaskSettingsClick
|
|
end
|
|
object miShowMaskButtons: TMenuItem
|
|
Caption = 'Show Mask &Buttons'
|
|
Hint = 'Shows the edit mask buttons'
|
|
OnClick = miShowMaskButtonsClick
|
|
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 = 352
|
|
Top = 8
|
|
end
|
|
end
|