object fmOptionen: TfmOptionen
  Left = 722
  Top = 233
  ActiveControl = udNumDesks
  BorderStyle = bsDialog
  Caption = 'Optionen'
  ClientHeight = 232
  ClientWidth = 409
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCloseQuery = fmOptionenCloseQuery
  OnCreate = fmOptionenCreate
  PixelsPerInch = 120
  TextHeight = 16
  object btnOK: TButton
    Left = 9
    Top = 192
    Width = 89
    Height = 33
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 1
  end
  object btnAbbrechen: TButton
    Left = 105
    Top = 192
    Width = 89
    Height = 33
    Cancel = True
    Caption = 'Abbrechen'
    ModalResult = 2
    TabOrder = 2
  end
  object pctOptionen: TPageControl
    Left = 8
    Top = 8
    Width = 393
    Height = 177
    ActivePage = tsPrgStart
    TabOrder = 0
    object tsPrgStart: TTabSheet
      Caption = 'Allgemein'
      object pnPrgStart: TPanel
        Left = 8
        Top = 8
        Width = 361
        Height = 121
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label4: TLabel
          Left = 8
          Top = 17
          Width = 129
          Height = 24
          AutoSize = False
          Caption = '&Anzahl Desktops'
        end
        object Label5: TLabel
          Left = 8
          Top = 49
          Width = 113
          Height = 24
          AutoSize = False
          Caption = '&Fenster-Position'
        end
        object lbSichtbar: TLabel
          Left = 8
          Top = 80
          Width = 121
          Height = 25
          AutoSize = False
          Caption = '&Sichtbar'
          FocusControl = cbAFenster
        end
        object edNumDesks: TEdit
          Left = 144
          Top = 17
          Width = 193
          Height = 24
          Hint = 'Anzahl der wechselbaren Desktops'
          TabStop = False
          ParentShowHint = False
          ReadOnly = True
          ShowHint = True
          TabOrder = 0
          Text = '2'
        end
        object udNumDesks: TUpDown
          Left = 337
          Top = 17
          Width = 12
          Height = 24
          Associate = edNumDesks
          Min = 2
          Max = 9
          Position = 2
          TabOrder = 1
          TabStop = True
          Wrap = False
        end
        object cbStartPos: TComboBox
          Left = 144
          Top = 49
          Width = 209
          Height = 24
          Hint = 'Automatische Fensterposition beim Programmstart'
          Style = csDropDownList
          ItemHeight = 16
          Items.Strings = (
            'Oben links'
            'Oben rechts'
            'Unten links'
            'Unten rechts'
            'Letzter Start')
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
        end
        object cbAFenster: TCheckBox
          Left = 144
          Top = 80
          Width = 145
          Height = 25
          Hint = 'Fenster (Desktop) anzeigen ?'
          Caption = 'Desktop-Fenster'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          OnClick = cbAFensterClick
        end
      end
    end
    object tsSichtbar: TTabSheet
      Caption = 'Taskleiste'
      object pnSichtbar: TPanel
        Left = 8
        Top = 8
        Width = 361
        Height = 105
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object cbATaskButtons: TCheckBox
          Left = 16
          Top = 16
          Width = 257
          Height = 25
          Hint = 'Desktop-Wahl-Buttons in Taskleiste anzeigen ?'
          Caption = 'Desktop-&Buttons'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
        end
        object cbATaskMini: TCheckBox
          Left = 16
          Top = 40
          Width = 257
          Height = 25
          Hint = '"Fenster minimieren"-Button in Taskleiste anzeigen ?'
          Caption = 'Fenster &minimieren'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
        end
        object cbATaskMaxi: TCheckBox
          Left = 16
          Top = 64
          Width = 257
          Height = 25
          Hint = '"Fenster wiederherstellen"-Button in Taskleiste anzeigen ?'
          Caption = 'Fenster &wiederherstellen '
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
        end
      end
    end
    object tsHotkeys: TTabSheet
      Caption = 'Hotkeys'
      object pnHotkeys: TPanel
        Left = 8
        Top = 8
        Width = 361
        Height = 121
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object lbDskNext: TLabel
          Left = 8
          Top = 17
          Width = 113
          Height = 24
          AutoSize = False
          Caption = 'Desktop &weiter'
          FocusControl = hkDskNext
          Transparent = True
        end
        object lbDskPrev: TLabel
          Left = 8
          Top = 48
          Width = 113
          Height = 25
          AutoSize = False
          Caption = 'Desktop &zur�ck'
          FocusControl = hkDskPrev
          Transparent = True
        end
        object lbDsk1: TLabel
          Left = 8
          Top = 81
          Width = 113
          Height = 24
          AutoSize = False
          Caption = 'Desktop &1 (bis 9)'
          FocusControl = hkDsk1
        end
        object cbDskNext: TCheckBox
          Left = 121
          Top = 17
          Width = 24
          Height = 24
          Hint = 'Hotkey f�r "Desktop vor" aktiv ?'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 0
          OnClick = cbDskNextClick
        end
        object cbDskPrev: TCheckBox
          Left = 121
          Top = 48
          Width = 24
          Height = 25
          Hint = 'Hotkey f�r "Desktop zur�ck" aktiv ?'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 2
          OnClick = cbDskPrevClick
        end
        object cbDsk1: TCheckBox
          Left = 121
          Top = 81
          Width = 24
          Height = 24
          Hint = 'Hotkey f�r direkte Desktop-Wahl aktiv ?'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 4
          OnClick = cbDsk1Click
        end
        object hkDskNext: THotKey
          Left = 152
          Top = 17
          Width = 200
          Height = 24
          Hint = 'Hotkey f�r "Desktop vor"'
          HotKey = 0
          InvalidKeys = [hcNone, hcShift]
          Modifiers = []
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
        end
        object hkDskPrev: THotKey
          Left = 152
          Top = 48
          Width = 200
          Height = 25
          Hint = 'Hotkey f�r "Desktop zur�ck"'
          HotKey = 0
          InvalidKeys = [hcNone, hcShift]
          Modifiers = []
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
        end
        object hkDsk1: THotKey
          Left = 152
          Top = 81
          Width = 200
          Height = 24
          Hint = 'Hotkey f�r direkte Desktop-Wahl'
          HotKey = 0
          InvalidKeys = [hcNone, hcShift]
          Modifiers = []
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
        end
      end
    end
    object tsRegistry: TTabSheet
      Caption = 'Registrierung'
      object pnRegistry: TPanel
        Left = 8
        Top = 8
        Width = 361
        Height = 89
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object lbPrivate: TLabel
          Left = 8
          Top = 16
          Width = 105
          Height = 25
          AutoSize = False
          Caption = 'Ihr &Text'
        end
        object lbCode: TLabel
          Left = 8
          Top = 48
          Width = 105
          Height = 25
          AutoSize = False
          Caption = '&Codewort'
        end
        object edPrivate: TEdit
          Left = 121
          Top = 16
          Width = 232
          Height = 24
          TabOrder = 0
          OnChange = edRegistryChange
          OnKeyDown = edPrivateKeyDown
        end
        object edCode: TEdit
          Left = 121
          Top = 48
          Width = 232
          Height = 24
          CharCase = ecUpperCase
          TabOrder = 1
          OnChange = edRegistryChange
        end
      end
    end
  end
end