tcommitfrmunit.dfm

来自「CVS IDE plugin for Borland Delphi this 」· DFM 代码 · 共 127 行

inherited CommitFrm: TCommitFrm
  Left = 335
  Top = 132
  Width = 600
  Height = 400
  Caption = 'Commit'
  Constraints.MinHeight = 300
  Constraints.MinWidth = 400
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PPageControl: TPageControl [0]
    Left = 0
    Top = 0
    Width = 592
    Height = 373
    ActivePage = PFilesTab
    Align = alClient
    TabOrder = 2
    object PMessageTab: TTabSheet
      Caption = 'Log message'
      object Label1: TLabel
        Left = 13
        Top = 34
        Width = 66
        Height = 13
        Caption = 'Log message:'
      end
      object Label2: TLabel
        Left = 13
        Top = 261
        Width = 111
        Height = 13
        Anchors = [akLeft, akBottom]
        Caption = 'Previous log messages:'
      end
      object PMessage: TMemo
        Left = 13
        Top = 50
        Width = 559
        Height = 205
        Anchors = [akLeft, akTop, akRight, akBottom]
        TabOrder = 1
      end
      object PPrevMsg: TComboBox
        Left = 13
        Top = 277
        Width = 559
        Height = 21
        Style = csDropDownList
        Anchors = [akLeft, akRight, akBottom]
        ItemHeight = 0
        TabOrder = 2
        OnChange = PPrevMsgChange
      end
      object PFilesCheck: TCheckBox
        Left = 13
        Top = 12
        Width = 283
        Height = 14
        Caption = 'Commit all files in project directory and subdirectories'
        TabOrder = 0
        OnClick = PFilesCheckClick
      end
    end
    object PFilesTab: TTabSheet
      Caption = 'Files'
      ImageIndex = 1
      inline PFilesFrame: TFilesFrame
        Left = 13
        Top = 10
        Width = 559
        Height = 293
        Anchors = [akLeft, akTop, akRight, akBottom]
        inherited PListView: TListView
          Width = 559
          Height = 263
        end
        inherited PToolbar: TPanel
          Width = 559
        end
      end
    end
    object POptionsTab: TTabSheet
      Caption = 'Commit options'
      ImageIndex = 2
      object PForceCheck: TCheckBox
        Left = 13
        Top = 102
        Width = 170
        Height = 13
        Anchors = [akLeft]
        Caption = 'Force commit'
        TabOrder = 2
      end
      object PRevisionCheck: TCheckBox
        Left = 13
        Top = 27
        Width = 144
        Height = 14
        Anchors = [akLeft]
        Caption = 'Commit to revision:'
        TabOrder = 0
        OnClick = PRevisionCheckClick
      end
      object PRevisionEdit: TEdit
        Left = 29
        Top = 52
        Width = 543
        Height = 21
        Anchors = [akLeft, akRight]
        TabOrder = 1
      end
    end
  end
  inherited POkBtn: TButton
    Left = 391
    Top = 337
    OnClick = POkBtnClick
  end
  inherited PCancelBtn: TButton
    Left = 492
    Top = 337
  end
end