PC World Plus! (NZ) 2001 June/HDC50.iso/Runimage/Delphi50/Bin/CORIDE50.BPL/0/RCDATA/TVERSIONINFOPAGE/TVERSIONINFOPAGE.txt

Text File | 1999-08-11 | 6KB | 281 lines

object VersionInfoPage: TVersionInfoPage
  Left = 0
  Top = 0
  Width = 400
  Height = 283
  HelpContext = 1740
  Caption = 'Version Info'
  OnCreate = VersionInfoPageCreate
  OnBroadcast = VersionInfoPageBroadcast
  object Panel1: TPanel
    Left = 8
    Top = 13
    Width = 385
    Height = 265
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object ModVerGroup: TGroupBox
      Left = 9
      Top = 10
      Width = 368
      Height = 79
      Caption = ' Module version number '
      TabOrder = 0
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 63
        Height = 13
        Caption = '&Major version'
        FocusControl = MVN1
      end
      object Label2: TLabel
        Left = 101
        Top = 16
        Width = 63
        Height = 13
        Caption = 'Mi&nor version'
        FocusControl = MVN2
      end
      object Label3: TLabel
        Left = 194
        Top = 16
        Width = 39
        Height = 13
        Caption = '&Release'
        FocusControl = MVN3
      end
      object Label4: TLabel
        Left = 288
        Top = 16
        Width = 23
        Height = 13
        Caption = '&Build'
        FocusControl = MVN4
      end
      object MVN1: TMaskEdit
        Left = 8
        Top = 32
        Width = 60
        Height = 21
        TabOrder = 0
        Text = '1'
        OnChange = MVN4Change
      end
      object MVN2: TMaskEdit
        Left = 101
        Top = 32
        Width = 60
        Height = 21
        TabOrder = 1
        Text = '0'
        OnChange = MVN4Change
      end
      object MVN3: TMaskEdit
        Left = 194
        Top = 32
        Width = 60
        Height = 21
        TabOrder = 2
        Text = '0'
        OnChange = MVN4Change
      end
      object MVN4: TMaskEdit
        Left = 288
        Top = 32
        Width = 60
        Height = 21
        TabOrder = 3
        Text = '0'
        OnChange = MVN4Change
      end
      object UD4: TUpDown
        Left = 348
        Top = 32
        Width = 15
        Height = 21
        Associate = MVN4
        Min = 0
        Max = 32767
        Position = 0
        TabOrder = 4
        Thousands = False
        Wrap = False
      end
      object UD3: TUpDown
        Left = 254
        Top = 32
        Width = 16
        Height = 21
        Associate = MVN3
        Min = 0
        Max = 32767
        Position = 0
        TabOrder = 5
        Thousands = False
        Wrap = False
      end
      object UD2: TUpDown
        Left = 161
        Top = 32
        Width = 16
        Height = 21
        Associate = MVN2
        Min = 0
        Max = 32767
        Position = 0
        TabOrder = 6
        Thousands = False
        Wrap = False
      end
      object UD1: TUpDown
        Left = 68
        Top = 32
        Width = 16
        Height = 21
        Associate = MVN1
        Min = 0
        Max = 32767
        Position = 1
        TabOrder = 7
        Thousands = False
        Wrap = False
      end
      object cbIncBuildNum: TCheckBox
        Left = 8
        Top = 60
        Width = 161
        Height = 13
        Caption = '&Auto-increment build number'
        TabOrder = 8
      end
    end
    object ModAttrGroup: TGroupBox
      Left = 9
      Top = 89
      Width = 183
      Height = 67
      Caption = ' Module attributes '
      TabOrder = 1
      object DebugBuild: TCheckBox
        Left = 8
        Top = 16
        Width = 88
        Height = 16
        Caption = '&Debug build'
        TabOrder = 0
      end
      object PreRelease: TCheckBox
        Left = 8
        Top = 32
        Width = 88
        Height = 16
        TabStop = False
        Caption = 'Pre-r&elease '
        TabOrder = 2
      end
      object PrivateBuild: TCheckBox
        Left = 97
        Top = 32
        Width = 79
        Height = 16
        TabStop = False
        Caption = '&Private build'
        TabOrder = 3
        OnClick = PrivateBuildClick
      end
      object SpecialBuild: TCheckBox
        Left = 97
        Top = 16
        Width = 81
        Height = 16
        TabStop = False
        Caption = '&Special build'
        TabOrder = 1
        OnClick = SpecialBuildClick
      end
      object DLL: TCheckBox
        Left = 8
        Top = 48
        Width = 47
        Height = 15
        TabStop = False
        Caption = 'D&LL'
        TabOrder = 4
      end
    end
    object ValueGrid: TVerInfoStringGrid
      Left = 10
      Top = 160
      Width = 367
      Height = 97
      ColCount = 2
      DefaultColWidth = 150
      DefaultRowHeight = 18
      Enabled = False
      FixedCols = 0
      RowCount = 2
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goAlwaysShowEditor, goThumbTracking]
      PopupMenu = PopupMenu1
      TabOrder = 3
      ColWidths = (
        136
        208)
    end
    object LangGroup: TGroupBox
      Left = 198
      Top = 89
      Width = 179
      Height = 67
      Caption = ' Language '
      TabOrder = 2
      object LangIDLbl: TLabel
        Left = 8
        Top = 16
        Width = 49
        Height = 13
        Caption = 'Locale &ID:'
        FocusControl = LangID
      end
      object LocaleLabel: TLabel
        Left = 64
        Top = 16
        Width = 3
        Height = 13
      end
      object LangID: TComboBox
        Left = 8
        Top = 32
        Width = 163
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnClick = LangIDChange
        OnExit = LangIDChange
      end
    end
  end
  object cbIncludeVerInfo: TCheckBox
    Left = 18
    Top = 5
    Width = 194
    Height = 18
    Caption = 'Include &version information in project'
    TabOrder = 0
    OnClick = cbIncludeVerInfoClick
  end
  object PopupMenu1: TPopupMenu
    Left = 336
    Top = 200
    object AddKey1: TMenuItem
      Caption = '&Add Key'
      OnClick = AddKey1Click
    end
    object RemoveKey1: TMenuItem
      Caption = '&Remove Key'
      OnClick = RemoveKey1Click
    end
  end
end