Chip 2000 January/Chip_2000-01_cd.bin/oddech/hry/click/click.exe/0/RCDATA/TFRMCFG/TFRMCFG.txt

Text File | 1999-03-07 | 14.7 KB | 660 lines

object frmCfg: TfrmCfg
  Left = 276
  Top = 120
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  ClientHeight = 234
  ClientWidth = 305
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object bttSave: TBitBtn
    Left = 135
    Top = 200
    Width = 75
    Height = 25
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnClick = bttSaveClick
  end
  object bttAbort: TBitBtn
    Left = 220
    Top = 200
    Width = 75
    Height = 25
    Cancel = True
    Default = True
    ModalResult = 2
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnClick = bttAbortClick
  end
  object bttRestore: TBitBtn
    Left = 10
    Top = 200
    Width = 65
    Height = 25
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnClick = bttRestoreClick
  end
  object pcMain: TPageControl
    Left = 8
    Top = 8
    Width = 289
    Height = 185
    ActivePage = tsSpecial
    TabOrder = 0
    object tsField: TTabSheet
      object lblTitSt: TLabel
        Left = 3
        Top = 80
        Width = 5
        Height = 13
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblStH: TLabel
        Left = 50
        Top = 80
        Width = 3
        Height = 13
        FocusControl = spinStH
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblStW: TLabel
        Left = 50
        Top = 108
        Width = 3
        Height = 13
        FocusControl = spinStW
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object shapeStone: TShape
        Left = 160
        Top = 76
        Width = 25
        Height = 25
        Brush.Color = clRed
        ParentShowHint = False
        ShowHint = True
      end
      object bevelLine1: TBevel
        Left = -36
        Top = 64
        Width = 317
        Height = 5
        Shape = bsTopLine
      end
      object lblTitF: TLabel
        Left = 3
        Top = 12
        Width = 5
        Height = 13
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblFRow: TLabel
        Left = 50
        Top = 12
        Width = 3
        Height = 13
        FocusControl = spinFRow
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblFCols: TLabel
        Left = 50
        Top = 36
        Width = 3
        Height = 13
        FocusControl = spinFCol
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblFITW: TLabel
        Left = 160
        Top = 36
        Width = 3
        Height = 13
        ParentShowHint = False
        ShowHint = True
      end
      object lblFITH: TLabel
        Left = 160
        Top = 12
        Width = 3
        Height = 13
        ParentShowHint = False
        ShowHint = True
      end
      object lblFIH: TLabel
        Left = 223
        Top = 12
        Width = 50
        Height = 13
        AutoSize = False
        ParentShowHint = False
        ShowHint = True
      end
      object lblFIW: TLabel
        Left = 223
        Top = 36
        Width = 50
        Height = 13
        AutoSize = False
        ParentShowHint = False
        ShowHint = True
      end
      object spinStH: TSpinEdit
        Left = 100
        Top = 76
        Width = 53
        Height = 22
        MaxValue = 50
        MinValue = 5
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        Value = 5
        OnChange = ShowStone
      end
      object spinStW: TSpinEdit
        Left = 100
        Top = 104
        Width = 53
        Height = 22
        MaxValue = 50
        MinValue = 5
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        Value = 5
        OnChange = ShowStone
      end
      object spinFRow: TSpinEdit
        Left = 100
        Top = 8
        Width = 53
        Height = 22
        MaxValue = 40
        MinValue = 6
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Value = 6
        OnChange = CalcWindow
      end
      object spinFCol: TSpinEdit
        Left = 100
        Top = 32
        Width = 53
        Height = 22
        MaxValue = 40
        MinValue = 6
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Value = 6
        OnChange = CalcWindow
      end
    end
    object tsStones: TTabSheet
      object lblTitC: TLabel
        Left = 3
        Top = 12
        Width = 5
        Height = 13
        FocusControl = spinC
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblCNb: TLabel
        Left = 50
        Top = 12
        Width = 3
        Height = 13
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object bev2: TBevel
        Left = 3
        Top = 108
        Width = 274
        Height = 13
        Shape = bsTopLine
      end
      object bev1: TBevel
        Left = 3
        Top = 38
        Width = 274
        Height = 13
        Shape = bsTopLine
      end
      object lblTitEff: TLabel
        Left = 3
        Top = 50
        Width = 5
        Height = 13
        FocusControl = spinC
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblTitSounds: TLabel
        Left = 3
        Top = 120
        Width = 5
        Height = 13
        FocusControl = spinC
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object spinC: TSpinEdit
        Left = 100
        Top = 8
        Width = 53
        Height = 22
        MaxValue = 15
        MinValue = 2
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Value = 5
        OnChange = CalcWindow
      end
      object chkSounds: TCheckBox
        Left = 50
        Top = 120
        Width = 150
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
      end
      object chkTextured: TCheckBox
        Left = 50
        Top = 50
        Width = 200
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = chkTexturedClick
      end
      object chkVoyeur: TCheckBox
        Left = 67
        Top = 68
        Width = 200
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
      end
      object chkDrawRect: TCheckBox
        Left = 50
        Top = 86
        Width = 200
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
      end
      object bttColSel: TButton
        Left = 160
        Top = 8
        Width = 81
        Height = 22
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = bttColSelClick
      end
    end
    object tsBack: TTabSheet
      object lblTitPic: TLabel
        Left = 3
        Top = 108
        Width = 5
        Height = 13
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblPic: TLabel
        Left = 110
        Top = 108
        Width = 150
        Height = 13
        AutoSize = False
      end
      object lblDir: TLabel
        Left = 110
        Top = 132
        Width = 150
        Height = 13
        AutoSize = False
      end
      object lblTitSource: TLabel
        Left = 3
        Top = 8
        Width = 5
        Height = 13
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bev3: TBevel
        Left = 3
        Top = 92
        Width = 275
        Height = 3
        Shape = bsTopLine
      end
      object radioPic: TRadioButton
        Left = 70
        Top = 8
        Width = 200
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = SetBackMode
        OnEnter = SetBackMode
        OnExit = SetBackMode
      end
      object radioDir: TRadioButton
        Left = 70
        Top = 28
        Width = 200
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = SetBackMode
        OnEnter = SetBackMode
        OnExit = SetBackMode
      end
      object radioNone: TRadioButton
        Left = 70
        Top = 48
        Width = 115
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = SetBackMode
      end
      object chkResize: TCheckBox
        Left = 70
        Top = 68
        Width = 200
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
      end
      object bttChoose: TBitBtn
        Left = 60
        Top = 104
        Width = 45
        Height = 21
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        OnClick = bttChooseClick
      end
      object bttchoose2: TBitBtn
        Left = 60
        Top = 128
        Width = 45
        Height = 21
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        OnClick = bttchoose2Click
      end
      object radioGray: TRadioButton
        Left = 192
        Top = 48
        Width = 85
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = SetBackMode
      end
    end
    object tsAction: TTabSheet
      object lblCountDown: TLabel
        Left = 3
        Top = 73
        Width = 5
        Height = 13
        FocusControl = spinSecs
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblSecs: TLabel
        Left = 120
        Top = 73
        Width = 3
        Height = 13
      end
      object chkAction: TCheckBox
        Left = 3
        Top = 8
        Width = 180
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object chkAnimations: TCheckBox
        Left = 3
        Top = 28
        Width = 180
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object chkAutoDrop: TCheckBox
        Left = 3
        Top = 48
        Width = 266
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = chkAutoDropClick
      end
      object spinSecs: TSpinEdit
        Left = 60
        Top = 70
        Width = 53
        Height = 22
        MaxValue = 999
        MinValue = 10
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        Value = 10
      end
    end
    object tsSpecial: TTabSheet
      object bev4: TBevel
        Left = 3
        Top = 94
        Width = 275
        Height = 3
        Shape = bsTopLine
      end
      object lblLang: TLabel
        Left = 3
        Top = 106
        Width = 5
        Height = 13
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblTranslator: TLabel
        Left = 6
        Top = 136
        Width = 267
        Height = 13
        AutoSize = False
      end
      object Bevel1: TBevel
        Left = 3
        Top = 32
        Width = 275
        Height = 3
        Shape = bsTopLine
      end
      object lblCStats: TLabel
        Left = 3
        Top = 42
        Width = 62
        Height = 13
        AutoSize = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
      end
      object chkBackup: TCheckBox
        Left = 3
        Top = 8
        Width = 170
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object comboLang: TComboBox
        Left = 72
        Top = 102
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 4
        OnChange = comboLangChange
      end
      object radioHigh: TRadioButton
        Left = 72
        Top = 42
        Width = 113
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = bttHintState
      end
      object radioLow: TRadioButton
        Left = 72
        Top = 64
        Width = 113
        Height = 17
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = bttHintState
      end
      object bttHints: TButton
        Left = 212
        Top = 40
        Width = 65
        Height = 21
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = bttHintsClick
      end
    end
  end
  object dlgOpen: TOpenPictureDialog
    DefaultExt = '*.jpg'
    FileName = ' '
    Filter =
      'Alle Dateien (*.bmp;*.ico;*.emf;*.wmf)|*.bmp;*.ico;*.emf;*.wmf|B' +
      'itmaps (*.bmp)|*.bmp|Symbole (*.ico)|*.ico|Erweiterte Metadateie' +
      'n (*.emf)|*.emf|Metadateien (*.wmf)|*.wmf'
    FilterIndex = 3
    Options = [ofHideReadOnly, ofFileMustExist]
    Left = 84
    Top = 200
  end
end