tcvscmdfrmunit.dfm

CVS IDE plugin for Borland Delphi this is a good program,i like this kind of practise

inherited CvsCmdFrm: TCvsCmdFrm
  Left = 250
  Top = 274
  Width = 600
  Height = 400
  Caption = 'CVS command'
  Constraints.MinHeight = 250
  Constraints.MinWidth = 350
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PPageControl: TPageControl [0]
    Left = 0
    Top = 0
    Width = 592
    Height = 373
    ActivePage = PCvsrootTab
    Align = alClient
    TabOrder = 2
    object PTabCommand: TTabSheet
      Caption = 'Command'
      object Label1: TLabel
        Left = 13
        Top = 260
        Width = 49
        Height = 13
        Anchors = [akLeft, akBottom]
        Caption = 'Last used:'
      end
      object Label2: TLabel
        Left = 13
        Top = 220
        Width = 86
        Height = 13
        Anchors = [akLeft, akBottom]
        Caption = 'Working directory:'
      end
      object PCommand: TMemo
        Left = 13
        Top = 7
        Width = 560
        Height = 206
        Anchors = [akLeft, akTop, akRight, akBottom]
        ScrollBars = ssVertical
        TabOrder = 0
        WordWrap = False
      end
      object PLastCmd: TComboBox
        Left = 13
        Top = 276
        Width = 560
        Height = 21
        Style = csDropDownList
        Anchors = [akLeft, akRight, akBottom]
        DropDownCount = 10
        ItemHeight = 0
        TabOrder = 3
        OnChange = PLastCmdChange
      end
      object PDirBtn: TButton
        Left = 544
        Top = 236
        Width = 27
        Height = 21
        Anchors = [akRight, akBottom]
        Caption = '...'
        TabOrder = 2
        OnClick = PDirBtnClick
      end
      object PWorkDir: TComboBox
        Left = 13
        Top = 236
        Width = 524
        Height = 21
        Anchors = [akLeft, akRight, akBottom]
        DropDownCount = 10
        ItemHeight = 0
        TabOrder = 1
      end
    end
    object PTabFiles: TTabSheet
      Caption = 'Files'
      ImageIndex = 1
      inline PFilesFrame: TFilesFrame
        Width = 584
        Height = 301
        Align = alTop
        inherited PListView: TListView
          Width = 584
          Height = 271
        end
        inherited PToolbar: TPanel
          Width = 584
        end
      end
    end
    object PCvsrootTab: TTabSheet
      Caption = 'CVSROOT'
      ImageIndex = 2
      inline PCvsrootFrame: TCvsrootFrame
        Left = 10
        Top = 10
      end
    end
  end
  inherited POkBtn: TButton
    Left = 389
    Top = 331
    OnClick = POkBtnClick
  end
  inherited PCancelBtn: TButton
    Left = 490
    Top = 331
  end
end