175 lines
4.0 KiB
Plaintext
175 lines
4.0 KiB
Plaintext
object Form1: TForm1
|
|
Left = 278
|
|
Top = 110
|
|
Width = 445
|
|
Height = 523
|
|
Caption = 'JvSimpleXML Demo (test XML encoding and decoding)'
|
|
Color = clBtnFace
|
|
Constraints.MinHeight = 400
|
|
Constraints.MinWidth = 420
|
|
DefaultMonitor = dmDesktop
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Shell Dlg 2'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poDesktopCenter
|
|
Scaled = False
|
|
OnCreate = FormCreate
|
|
OnResize = FormResize
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object pnlBottom: TPanel
|
|
Left = 0
|
|
Top = 259
|
|
Width = 437
|
|
Height = 230
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
TabOrder = 0
|
|
object Label2: TLabel
|
|
Left = 6
|
|
Top = 8
|
|
Width = 34
|
|
Height = 13
|
|
Caption = '&Result:'
|
|
FocusControl = reResult
|
|
end
|
|
object Bevel1: TBevel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 437
|
|
Height = 5
|
|
Align = alTop
|
|
Shape = bsTopLine
|
|
end
|
|
object reResult: TMemo
|
|
Left = 5
|
|
Top = 26
|
|
Width = 425
|
|
Height = 137
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Courier New'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ScrollBars = ssBoth
|
|
TabOrder = 0
|
|
WordWrap = False
|
|
end
|
|
object btnCopy: TButton
|
|
Left = 300
|
|
Top = 177
|
|
Width = 117
|
|
Height = 25
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&Copy To Source'
|
|
TabOrder = 1
|
|
OnClick = btnCopyClick
|
|
end
|
|
object StatusBar1: TStatusBar
|
|
Left = 0
|
|
Top = 211
|
|
Width = 437
|
|
Height = 19
|
|
Panels = <
|
|
item
|
|
Width = 50
|
|
end>
|
|
SimplePanel = False
|
|
end
|
|
end
|
|
object pnlTop: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 437
|
|
Height = 259
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object Label1: TLabel
|
|
Left = 6
|
|
Top = 12
|
|
Width = 37
|
|
Height = 13
|
|
Caption = '&Source:'
|
|
FocusControl = reSource
|
|
end
|
|
object reSource: TMemo
|
|
Left = 5
|
|
Top = 28
|
|
Width = 425
|
|
Height = 178
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Courier New'
|
|
Font.Style = []
|
|
Lines.Strings = (
|
|
'Put the xml in this memo. Click the Encode/Decode '
|
|
'buttons to see the result in the bottom memo. '
|
|
''
|
|
'You can drag and drop files from the Explorer into '
|
|
'the program and have them automatically opened.'
|
|
''
|
|
'If you drag multiple files, they will be all be added to'
|
|
'the memo.')
|
|
ParentFont = False
|
|
ScrollBars = ssBoth
|
|
TabOrder = 0
|
|
WordWrap = False
|
|
end
|
|
object chkTrim: TCheckBox
|
|
Left = 11
|
|
Top = 220
|
|
Width = 80
|
|
Height = 17
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'Trim &Blanks'
|
|
TabOrder = 1
|
|
end
|
|
object btnEncode: TButton
|
|
Left = 258
|
|
Top = 226
|
|
Width = 75
|
|
Height = 25
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&Encode'
|
|
TabOrder = 4
|
|
OnClick = btnEncodeClick
|
|
end
|
|
object btnDecode: TButton
|
|
Left = 342
|
|
Top = 226
|
|
Width = 75
|
|
Height = 25
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&Decode'
|
|
TabOrder = 5
|
|
OnClick = btnDecodeClick
|
|
end
|
|
object chkUseUTF8: TCheckBox
|
|
Left = 106
|
|
Top = 220
|
|
Width = 133
|
|
Height = 17
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'Use UTF&8 functions'
|
|
TabOrder = 2
|
|
end
|
|
object chkUseClipboard: TCheckBox
|
|
Left = 11
|
|
Top = 240
|
|
Width = 229
|
|
Height = 17
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = '&Use clipboard for text transfers'
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
end
|