object Form1: TForm1 Left = 200 Top = 108 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Multi-renamer' ClientHeight = 370 ClientWidth = 483 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 0 Top = 0 Width = 188 Height = 13 Caption = 'Files to rename: (drop files from explorer)' end object Label5: TLabel Left = 240 Top = 0 Width = 3 Height = 13 end object Label6: TLabel Left = 240 Top = 0 Width = 59 Height = 13 Caption = 'New names:' end object HyperLink1: THyperLink Left = 0 Top = 352 Width = 156 Height = 17 Cursor = crHandPoint LinkType = ltHttp ShowHint = True ParentShowHint = False Caption = 'home.c2i.net/heanders/' end object Button1: TButton Left = 168 Top = 344 Width = 313 Height = 25 Caption = 'Start rename' TabOrder = 0 OnClick = Button1Click end object ListBox1: TListBox Left = 0 Top = 16 Width = 233 Height = 233 ItemHeight = 13 TabOrder = 1 end object Edit3: TEdit Left = 0 Top = 232 Width = 481 Height = 21 TabOrder = 2 Visible = False end object ListBox2: TListBox Left = 240 Top = 16 Width = 241 Height = 233 ItemHeight = 13 TabOrder = 3 end object RadioGroup1: TRadioGroup Left = 0 Top = 256 Width = 97 Height = 89 ItemIndex = 0 Items.Strings = ( 'name001.ext' 'fullname.001' 'fullname.new') TabOrder = 4 OnClick = RadioGroup1Click end object Panel1: TPanel Left = 104 Top = 264 Width = 377 Height = 25 TabOrder = 5 object fname1: TEdit Left = 2 Top = 2 Width = 201 Height = 21 TabOrder = 0 Text = 'new' OnKeyUp = fname1KeyUp end object fnum1: TEdit Left = 202 Top = 2 Width = 57 Height = 21 TabOrder = 1 Text = '0' OnChange = fnum1Change end object fsiff1: TEdit Left = 274 Top = 2 Width = 25 Height = 21 TabOrder = 2 Text = '3' OnChange = fsiff1Change end object UpDown1: TUpDown Left = 259 Top = 2 Width = 15 Height = 21 Associate = fnum1 Min = 0 Position = 0 TabOrder = 3 Wrap = False end object UpDown2: TUpDown Left = 299 Top = 2 Width = 15 Height = 21 Associate = fsiff1 Min = 0 Position = 3 TabOrder = 4 Wrap = False end end object Panel2: TPanel Left = 104 Top = 289 Width = 377 Height = 25 TabOrder = 6 Visible = False object fext2: TEdit Left = 250 Top = 2 Width = 65 Height = 21 TabOrder = 0 Text = '0' OnChange = fext2Change end object fextnum2: TEdit Left = 330 Top = 2 Width = 23 Height = 21 TabOrder = 1 Text = '3' OnChange = fextnum2Change end object UpDown3: TUpDown Left = 315 Top = 2 Width = 15 Height = 21 Associate = fext2 Min = 0 Position = 0 TabOrder = 2 Wrap = False end object UpDown4: TUpDown Left = 353 Top = 2 Width = 15 Height = 21 Associate = fextnum2 Min = 0 Position = 3 TabOrder = 3 Wrap = False end end object Panel3: TPanel Left = 104 Top = 314 Width = 377 Height = 25 TabOrder = 7 Visible = False object Edit1: TEdit Left = 250 Top = 2 Width = 65 Height = 21 TabOrder = 0 Text = 'new' OnChange = Edit1Change end end object FileDrag1: TFileDrag OnDrop = FileDrag1Drop Left = 440 end end