object CRename: TCRename Left = 267 Top = 233 Width = 423 Height = 126 BorderIcons = [biSystemMenu, biHelp] Caption = 'Rename module' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 TextHeight = 13 object GroupBox1: TGroupBox Left = 4 Top = 4 Width = 321 Height = 37 HelpContext = 130100 Caption = 'Path to module' TabOrder = 0 object ediPath: TLabel Left = 12 Top = 15 Width = 301 Height = 18 AutoSize = False WordWrap = True end end object GroupBox2: TGroupBox Left = 4 Top = 48 Width = 321 Height = 45 HelpContext = 130200 Caption = 'New name of module' TabOrder = 1 object ediName: TEdit Left = 8 Top = 16 Width = 305 Height = 21 HelpContext = 130200 TabOrder = 0 end end object btnOK: TNewButton Left = 336 Top = 4 Width = 75 Height = 23 HelpContext = 90100 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 2 OnClick = btnOKClick end object btnCancel: TNewButton Left = 336 Top = 32 Width = 75 Height = 23 HelpContext = 90200 Caption = '&Cancel' ModalResult = 2 TabOrder = 3 OnClick = btnCancelClick end end