Componentes.Terceros.RemObj.../internal/5.0.24.615/1/Data Abstract for Delphi/Samples/Regular Expressions/RegularExpressionsMain.dfm

268 lines
6.3 KiB
Plaintext

object RegularExpressionsMainForm: TRegularExpressionsMainForm
Left = 15
Top = 41
AutoScroll = False
BorderWidth = 5
Caption = 'Regular Expression'
ClientHeight = 240
ClientWidth = 740
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label4: TLabel
Left = 355
Top = 5
Width = 242
Height = 19
Caption = 'Press a cell of a grid to fill the text'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 352
Height = 129
Caption = 'Test Expression'
TabOrder = 0
object lbResult: TLabel
Left = 150
Top = 102
Width = 183
Height = 13
Caption = 'Click the button to verify your input...'
end
object Label1: TLabel
Left = 16
Top = 20
Width = 48
Height = 13
Caption = 'Template:'
end
object Label2: TLabel
Left = 9
Top = 44
Width = 56
Height = 13
Caption = 'Expression:'
end
object Label3: TLabel
Left = 39
Top = 68
Width = 26
Height = 13
Caption = 'Text:'
end
object cbExpression: TComboBox
Left = 68
Top = 16
Width = 273
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = cbExpressionChange
end
object eText: TEdit
Left = 68
Top = 64
Width = 273
Height = 21
TabOrder = 2
end
object bCheck: TButton
Left = 68
Top = 96
Width = 75
Height = 25
Caption = '&Check'
Default = True
TabOrder = 3
OnClick = bCheckClick
end
object eExpression: TEdit
Left = 68
Top = 40
Width = 273
Height = 21
TabOrder = 1
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 136
Width = 740
Height = 104
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = DADataSource
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Expanded = False
FieldName = 'USPhoneNumber'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'Email'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'RealNumber'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'RomanNumber'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'URL'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'ZipCode'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'Path'
Width = 100
Visible = True
end>
end
object DACDSDataTable: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'USPhoneNumber'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'Email'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'RealNumber'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'RomanNumber'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'URL'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ZipCode'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'Path'
DataType = datString
Size = 100
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
ReadOnly = False
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
IndexDefs = <>
Left = 411
Top = 57
end
object DADataSource: TDADataSource
DataSet = DACDSDataTable.Dataset
DataTable = DACDSDataTable
Left = 427
Top = 73
end
end