241 lines
5.8 KiB
Plaintext
241 lines
5.8 KiB
Plaintext
object MainForm: TMainForm
|
|
Left = 245
|
|
Top = 81
|
|
BorderIcons = [biSystemMenu, biMinimize]
|
|
BorderStyle = bsDialog
|
|
Caption = 'X'#178'Software XML Data Binding for Delphi'
|
|
ClientHeight = 312
|
|
ClientWidth = 438
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poScreenCenter
|
|
OnCreate = FormCreate
|
|
DesignSize = (
|
|
438
|
|
312)
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object lblSchema: TLabel
|
|
Left = 8
|
|
Top = 11
|
|
Width = 58
|
|
Height = 13
|
|
Caption = 'Schema file:'
|
|
end
|
|
object feSchema: TcxButtonEdit
|
|
Left = 99
|
|
Top = 8
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Properties.Buttons = <
|
|
item
|
|
Kind = bkEllipsis
|
|
end>
|
|
Properties.OnButtonClick = feSchemaPropertiesButtonClick
|
|
Properties.OnChange = feSchemaPropertiesChange
|
|
TabOrder = 0
|
|
Width = 331
|
|
end
|
|
object gbOutput: TGroupBox
|
|
Left = 8
|
|
Top = 43
|
|
Width = 422
|
|
Height = 225
|
|
Anchors = [akLeft, akTop, akBottom]
|
|
Caption = ' Output '
|
|
TabOrder = 1
|
|
DesignSize = (
|
|
422
|
|
225)
|
|
object rbFile: TRadioButton
|
|
Left = 11
|
|
Top = 21
|
|
Width = 127
|
|
Height = 17
|
|
Caption = ' Output to &single file'
|
|
Checked = True
|
|
TabOrder = 0
|
|
TabStop = True
|
|
OnClick = OutputTypeClick
|
|
end
|
|
object rbFolder: TRadioButton
|
|
Left = 11
|
|
Top = 44
|
|
Width = 150
|
|
Height = 17
|
|
Caption = ' Output to separate &files'
|
|
TabOrder = 1
|
|
OnClick = OutputTypeClick
|
|
end
|
|
object plOutput: TPageControl
|
|
Left = 3
|
|
Top = 68
|
|
Width = 416
|
|
Height = 93
|
|
ActivePage = spFolder
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Style = tsButtons
|
|
TabOrder = 2
|
|
object spFile: TTabSheet
|
|
TabVisible = False
|
|
ExplicitLeft = 0
|
|
ExplicitTop = 0
|
|
ExplicitWidth = 0
|
|
ExplicitHeight = 0
|
|
object lblFile: TLabel
|
|
Left = 4
|
|
Top = 7
|
|
Width = 55
|
|
Height = 13
|
|
Caption = 'Output file:'
|
|
end
|
|
object feFile: TcxButtonEdit
|
|
Left = 88
|
|
Top = 4
|
|
Properties.Buttons = <
|
|
item
|
|
Kind = bkEllipsis
|
|
end>
|
|
Properties.OnButtonClick = feFilePropertiesButtonClick
|
|
TabOrder = 0
|
|
Width = 317
|
|
end
|
|
end
|
|
object spFolder: TTabSheet
|
|
TabVisible = False
|
|
DesignSize = (
|
|
408
|
|
83)
|
|
object lblFolder: TLabel
|
|
Left = 4
|
|
Top = 7
|
|
Width = 69
|
|
Height = 13
|
|
Caption = 'Output folder:'
|
|
end
|
|
object lblFolderPrefix: TLabel
|
|
Left = 4
|
|
Top = 32
|
|
Width = 51
|
|
Height = 13
|
|
Caption = 'File prefix:'
|
|
end
|
|
object lblFolderPostfix: TLabel
|
|
Left = 4
|
|
Top = 58
|
|
Width = 56
|
|
Height = 13
|
|
Caption = 'File postfix:'
|
|
end
|
|
object deFolder: TcxButtonEdit
|
|
Left = 88
|
|
Top = 4
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Properties.Buttons = <
|
|
item
|
|
Kind = bkEllipsis
|
|
end>
|
|
Properties.OnButtonClick = deFolderPropertiesButtonClick
|
|
TabOrder = 0
|
|
Width = 317
|
|
end
|
|
object edtFolderPrefix: TcxTextEdit
|
|
Left = 88
|
|
Top = 29
|
|
TabOrder = 1
|
|
Text = 'xml_'
|
|
Width = 121
|
|
end
|
|
object edtFolderPostfix: TcxTextEdit
|
|
Left = 88
|
|
Top = 55
|
|
TabOrder = 2
|
|
Width = 121
|
|
end
|
|
end
|
|
end
|
|
object cbHasChecksEmpty: TCheckBox
|
|
Left = 11
|
|
Top = 175
|
|
Width = 401
|
|
Height = 17
|
|
Hint =
|
|
'Workaround for XML'#39's generated by people who do not understand t' +
|
|
'he concept of optional elements or XSD'#39's in general'
|
|
Caption =
|
|
' Check for empty elements as well as omitted elements in Has pro' +
|
|
'perties'
|
|
TabOrder = 3
|
|
end
|
|
object cbGenerateGetOptionalOrDefault: TCheckBox
|
|
Left = 11
|
|
Top = 198
|
|
Width = 401
|
|
Height = 17
|
|
Hint = ' Generate a "Def" method for optional elements'
|
|
Caption = ' Generate a "Def" method for optional elements'
|
|
TabOrder = 4
|
|
end
|
|
end
|
|
object btnGenerate: TButton
|
|
Left = 274
|
|
Top = 279
|
|
Width = 75
|
|
Height = 25
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&Generate'
|
|
Default = True
|
|
TabOrder = 3
|
|
OnClick = btnGenerateClick
|
|
end
|
|
object btnClose: TButton
|
|
Left = 355
|
|
Top = 279
|
|
Width = 75
|
|
Height = 25
|
|
Anchors = [akRight, akBottom]
|
|
Cancel = True
|
|
Caption = '&Close'
|
|
TabOrder = 4
|
|
OnClick = btnCloseClick
|
|
end
|
|
object btnHints: TButton
|
|
Left = 7
|
|
Top = 279
|
|
Width = 142
|
|
Height = 25
|
|
Anchors = [akRight, akBottom]
|
|
Cancel = True
|
|
Caption = 'Generate blank &Hints file'
|
|
TabOrder = 2
|
|
OnClick = btnHintsClick
|
|
end
|
|
object DefaultEditStyle: TcxDefaultEditStyleController
|
|
Style.HotTrack = False
|
|
Left = 264
|
|
Top = 60
|
|
PixelsPerInch = 96
|
|
end
|
|
object LookAndFeel: TcxLookAndFeelController
|
|
Kind = lfFlat
|
|
Left = 368
|
|
Top = 60
|
|
end
|
|
object dlgSchema: TOpenDialog
|
|
Filter = 'W3C XML Schema files (*.xsd)|*.xsd|All files (*.*)|*.*'
|
|
Options = [ofHideReadOnly, ofFileMustExist, ofEnableSizing]
|
|
Left = 212
|
|
Top = 40
|
|
end
|
|
object dlgOutputFile: TSaveDialog
|
|
Filter = 'Delphi source files (*.pas)|*.pas|All files (*.*)|*.*'
|
|
Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing]
|
|
Left = 323
|
|
Top = 45
|
|
end
|
|
end
|