home *** CD-ROM | disk | FTP | other *** search
- object SeriesTextEditor: TSeriesTextEditor
- Left = 280
- Top = 245
- BorderStyle = bsDialog
- Caption = 'Series DataSource Text Editor'
- ClientHeight = 191
- ClientWidth = 369
- Color = clBtnFace
- ParentFont = True
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Button1: TButton
- Left = 196
- Top = 160
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 284
- Top = 160
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 369
- Height = 153
- ActivePage = TabSheet1
- Align = alTop
- HotTrack = True
- TabOrder = 2
- object TabSheet1: TTabSheet
- Caption = 'Fields'
- object Label1: TLabel
- Left = 8
- Top = 83
- Width = 114
- Height = 13
- Caption = 'Number of &Header lines:'
- FocusControl = Edit1
- end
- object Label2: TLabel
- Left = 48
- Top = 50
- Width = 49
- Height = 13
- Caption = '&Separator:'
- FocusControl = CBSep
- end
- object Label3: TLabel
- Left = 8
- Top = 10
- Width = 32
- Height = 13
- Caption = 'S&eries:'
- end
- object Edit1: TEdit
- Left = 128
- Top = 80
- Width = 41
- Height = 21
- TabOrder = 0
- Text = '0'
- end
- object UpDown1: TUpDown
- Left = 169
- Top = 80
- Width = 15
- Height = 21
- Associate = Edit1
- Min = 0
- Position = 0
- TabOrder = 1
- Wrap = False
- end
- object StringGrid1: TStringGrid
- Left = 200
- Top = 8
- Width = 161
- Height = 113
- ColCount = 2
- DefaultRowHeight = 18
- Options = [goVertLine, goHorzLine, goEditing]
- TabOrder = 2
- RowHeights = (
- 18
- 18
- 18
- 18
- 18)
- end
- object CBSeries: TComboBox
- Left = 48
- Top = 7
- Width = 138
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 3
- OnChange = CBSeriesChange
- end
- object CBSep: TComboBox
- Left = 104
- Top = 48
- Width = 81
- Height = 21
- ItemHeight = 13
- TabOrder = 4
- Text = 'Comma'
- Items.Strings = (
- 'Comma'
- 'Space'
- 'Tab')
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Source'
- object BBrowse: TSpeedButton
- Left = 330
- Top = 23
- Width = 23
- Height = 22
- Caption = '...'
- OnClick = SpeedButton1Click
- end
- object RBFile: TRadioButton
- Left = 13
- Top = 28
- Width = 82
- Height = 17
- Caption = '&File:'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = RBFileClick
- end
- object EFile: TEdit
- Left = 94
- Top = 24
- Width = 227
- Height = 21
- TabOrder = 1
- Text = 'c:\test.txt'
- end
- object RBWeb: TRadioButton
- Left = 13
- Top = 60
- Width = 82
- Height = 17
- Caption = '&Web URL:'
- TabOrder = 2
- OnClick = RBFileClick
- end
- object EWeb: TEdit
- Left = 94
- Top = 56
- Width = 227
- Height = 21
- Enabled = False
- TabOrder = 3
- Text = 'http://www.steema.com/test.txt'
- end
- object Button4: TButton
- Left = 94
- Top = 92
- Width = 75
- Height = 25
- Caption = '&Load '
- TabOrder = 4
- OnClick = Button4Click
- end
- end
- end
- object OpenDialog1: TOpenDialog
- DefaultExt = 'txt'
- Filter = 'Text files|*.txt'
- Options = [ofReadOnly, ofHideReadOnly, ofEnableSizing]
- Left = 268
- Top = 64
- end
- end
-