object Txtfrm: TTxtfrm Left = 244 Top = 162 BorderStyle = bsDialog Caption = 'Txt Selection' ClientHeight = 232 ClientWidth = 279 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 24 Top = 16 Width = 3 Height = 13 FocusControl = Edit1 end object Label2: TLabel Left = 24 Top = 48 Width = 66 Height = 13 Caption = '&Line Delimiter:' FocusControl = Edit2 end object rd2: TRadioGroup Left = 144 Top = 8 Width = 121 Height = 177 Caption = '&Line Delimiter:' ItemIndex = 3 Items.Strings = ( ';' ',' 'Tab' 'New Line' 'Enter' 'Space' 'Other') TabOrder = 5 OnClick = rd2Click end object rd1: TRadioGroup Left = 16 Top = 8 Width = 121 Height = 177 Caption = 'C&olumn Delimiter:' ItemIndex = 0 Items.Strings = ( ';' ',' 'Tab' 'New Line' 'Enter' 'Space' 'Other') TabOrder = 4 OnClick = rd1Click end object Button1: TButton Left = 52 Top = 201 Width = 85 Height = 24 Caption = '&OK' ModalResult = 1 TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 153 Top = 200 Width = 75 Height = 25 Caption = '&Cancel' ModalResult = 2 TabOrder = 1 OnClick = Button2Click end object Edit1: TEdit Left = 88 Top = 154 Width = 41 Height = 24 Color = 8454143 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 1 ParentFont = False TabOrder = 2 Text = ';' Visible = False end object Edit2: TEdit Left = 216 Top = 154 Width = 41 Height = 24 Color = 7452927 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 1 ParentFont = False TabOrder = 3 Visible = False end end