Chip 1999 Extra/Chip_Extra_1999.iso/share/office/pczeit/pczeita.exe/PCZeit.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1998-10-03 | 50KB | 2,022 lines

object Form1: TForm1
  Left = 200
  Top = 168
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'PC Zeit'
  ClientHeight = 419
  ClientWidth = 689
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object UrlLabel1: TUrlLabel
    Left = 486
    Top = 369
    Width = 129
    Height = 24
    Cursor = 5
    Caption = 'www.babe.de'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -19
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    PopupMenu = UrlLabel1.
    URL = 'www.babe.de'
  end
  object TransparentButton3: TTransparentButton
    Left = 653
    Top = 366
    Width = 29
    Height = 32
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
      33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
      FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
      FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
      FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
      FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
      FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
      3333333773FFFF77333333333FBFBF3333333333377777333333}
    NumGlyphs = 2
    ParentFont = False
    OnClick = TransparentButton3Click
  end
  object TransparentButton1: TTransparentButton
    Left = 456
    Top = 365
    Width = 186
    Height = 33
    Hint = 'Win-Protokoll, Krypter und weiter Software'
    ParentShowHint = False
    ShowHint = True
    OnClick = TransparentButton1Click
  end
  object Panel1: TPanel
    Left = 10
    Top = 368
    Width = 171
    Height = 25
    Color = clWhite
    TabOrder = 2
    object la_monat: TLabel
      Left = 24
      Top = 5
      Width = 121
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = 'la_monat'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object bu_mon_next: TPanel
      Left = 146
      Top = 0
      Width = 24
      Height = 24
      Caption = '>'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = bu_mon_nex_Click
    end
    object bu_mon_back: TPanel
      Left = 0
      Top = 0
      Width = 24
      Height = 24
      Caption = '<'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = bu_mon_backClick
    end
  end
  object Panel4: TPanel
    Left = 10
    Top = 368
    Width = 171
    Height = 25
    Color = clWhite
    TabOrder = 4
    object la_tag: TLabel
      Left = 24
      Top = 5
      Width = 121
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = 'la_tag'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Panel5: TPanel
      Left = 0
      Top = 0
      Width = 24
      Height = 24
      Caption = '<'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = bu_day_backClick
    end
    object Panel6: TPanel
      Left = 146
      Top = 0
      Width = 24
      Height = 24
      Caption = '>'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = bu_day_nextClick
    end
  end
  object Button1: TButton
    Left = 24
    Top = 416
    Width = 75
    Height = 25
    Caption = 'SetValues'
    TabOrder = 0
    Visible = False
    OnClick = Button1Click
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 400
    Width = 689
    Height = 19
    Panels = <
      item
        Text = 'Gesamtzeit: 00:23'
        Width = 0
      end>
    SimplePanel = False
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 690
    Height = 358
    ActivePage = ts_tag
    TabOrder = 3
    OnChange = PageControl1Change
    object ts_tag: TTabSheet
      Caption = 'Tag'
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 681
        Height = 329
        BevelInner = bvLowered
        BevelOuter = bvNone
        Color = clInfoBk
        TabOrder = 0
        object Shape1: TShape
          Left = 52
          Top = 274
          Width = 609
          Height = 1
        end
        object Shape2: TShape
          Left = 50
          Top = 234
          Width = 609
          Height = 1
        end
        object Shape3: TShape
          Left = 50
          Top = 194
          Width = 609
          Height = 1
        end
        object Shape4: TShape
          Left = 50
          Top = 154
          Width = 609
          Height = 1
        end
        object Shape5: TShape
          Left = 50
          Top = 114
          Width = 609
          Height = 1
        end
        object Shape6: TShape
          Left = 50
          Top = 74
          Width = 609
          Height = 1
        end
        object Shape7: TShape
          Left = 50
          Top = 34
          Width = 609
          Height = 1
        end
        object Label1: TLabel
          Left = 32
          Top = 28
          Width = 15
          Height = 13
          Caption = '60'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label2: TLabel
          Left = 32
          Top = 68
          Width = 15
          Height = 13
          Caption = '50'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label3: TLabel
          Left = 32
          Top = 108
          Width = 15
          Height = 13
          Caption = '40'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label4: TLabel
          Left = 32
          Top = 148
          Width = 15
          Height = 13
          Caption = '30'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label5: TLabel
          Left = 32
          Top = 188
          Width = 15
          Height = 13
          Caption = '20'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label6: TLabel
          Left = 32
          Top = 228
          Width = 15
          Height = 13
          Caption = '10'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label7: TLabel
          Left = 38
          Top = 268
          Width = 8
          Height = 13
          Caption = '0'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object ALabel1: TALabel
          Left = 8
          Top = 144
          Width = 19
          Height = 55
          Caption = 'Minuten'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          Angle = 900
        end
        object ALabel2: TALabel
          Left = 328
          Top = 296
          Width = 49
          Height = 20
          Caption = 'Uhrzeit'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label8: TLabel
          Left = 60
          Top = 280
          Width = 6
          Height = 13
          Caption = '0'
        end
        object Label9: TLabel
          Left = 84
          Top = 280
          Width = 6
          Height = 13
          Caption = '1'
        end
        object Label10: TLabel
          Left = 108
          Top = 280
          Width = 6
          Height = 13
          Caption = '2'
        end
        object Label11: TLabel
          Left = 132
          Top = 280
          Width = 6
          Height = 13
          Caption = '3'
        end
        object Label12: TLabel
          Left = 156
          Top = 280
          Width = 6
          Height = 13
          Caption = '4'
        end
        object Label13: TLabel
          Left = 181
          Top = 280
          Width = 6
          Height = 13
          Caption = '5'
        end
        object Label15: TLabel
          Left = 204
          Top = 280
          Width = 6
          Height = 13
          Caption = '6'
        end
        object Label18: TLabel
          Left = 228
          Top = 280
          Width = 6
          Height = 13
          Caption = '7'
        end
        object Label21: TLabel
          Left = 252
          Top = 280
          Width = 6
          Height = 13
          Caption = '8'
        end
        object Label22: TLabel
          Left = 275
          Top = 280
          Width = 6
          Height = 13
          Caption = '9'
        end
        object Label14: TLabel
          Left = 298
          Top = 280
          Width = 12
          Height = 13
          Caption = '10'
        end
        object Label17: TLabel
          Left = 322
          Top = 280
          Width = 12
          Height = 13
          Caption = '11'
        end
        object Label19: TLabel
          Left = 346
          Top = 280
          Width = 12
          Height = 13
          Caption = '12'
        end
        object Label23: TLabel
          Left = 370
          Top = 280
          Width = 12
          Height = 13
          Caption = '13'
        end
        object Label24: TLabel
          Left = 394
          Top = 280
          Width = 12
          Height = 13
          Caption = '14'
        end
        object Label25: TLabel
          Left = 418
          Top = 280
          Width = 12
          Height = 13
          Caption = '15'
        end
        object Label26: TLabel
          Left = 442
          Top = 280
          Width = 12
          Height = 13
          Caption = '16'
        end
        object Label27: TLabel
          Left = 466
          Top = 280
          Width = 12
          Height = 13
          Caption = '17'
        end
        object Label28: TLabel
          Left = 490
          Top = 280
          Width = 12
          Height = 13
          Caption = '18'
        end
        object Label29: TLabel
          Left = 514
          Top = 280
          Width = 12
          Height = 13
          Caption = '19'
        end
        object Label30: TLabel
          Left = 538
          Top = 280
          Width = 12
          Height = 13
          Caption = '20'
        end
        object Label31: TLabel
          Left = 562
          Top = 280
          Width = 12
          Height = 13
          Caption = '21'
        end
        object Label20: TLabel
          Left = 586
          Top = 280
          Width = 12
          Height = 13
          Caption = '22'
        end
        object Label32: TLabel
          Left = 610
          Top = 280
          Width = 12
          Height = 13
          Caption = '23'
        end
        object Label16: TLabel
          Left = 51
          Top = 8
          Width = 607
          Height = 20
          Alignment = taCenter
          AutoSize = False
          Caption = 'Kein Protokoll vorhanden'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clMaroon
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object p0: TPanel
          Left = 56
          Top = 34
          Width = 16
          Height = 240
          BevelOuter = bvNone
          BevelWidth = 2
          Caption = 'p0'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object p1: TPanel
          Left = 80
          Top = 64
          Width = 16
          Height = 210
          BevelOuter = bvNone
          Caption = 'p1'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object p2: TPanel
          Left = 104
          Top = 94
          Width = 16
          Height = 180
          BevelOuter = bvNone
          Caption = 'p2'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
        object p3: TPanel
          Left = 128
          Top = 124
          Width = 16
          Height = 150
          BevelOuter = bvNone
          Caption = 'p3'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
        end
        object p4: TPanel
          Left = 152
          Top = 154
          Width = 16
          Height = 120
          BevelOuter = bvNone
          Caption = 'p4'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 4
        end
        object p5: TPanel
          Left = 176
          Top = 184
          Width = 16
          Height = 90
          BevelOuter = bvNone
          Caption = 'p5'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 5
        end
        object p6: TPanel
          Left = 200
          Top = 214
          Width = 16
          Height = 60
          BevelOuter = bvNone
          Caption = 'p6'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 6
        end
        object p7: TPanel
          Left = 224
          Top = 244
          Width = 16
          Height = 30
          BevelOuter = bvNone
          Caption = 'p7'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 7
        end
        object P8: TPanel
          Left = 248
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P8'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 8
        end
        object P9: TPanel
          Left = 272
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P9'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 9
        end
        object P10: TPanel
          Left = 296
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P10'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 10
        end
        object P11: TPanel
          Left = 344
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P11'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 11
        end
        object P12: TPanel
          Left = 320
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P12'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 12
        end
        object P13: TPanel
          Left = 368
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P13'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 13
        end
        object P14: TPanel
          Left = 392
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P14'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 14
        end
        object P15: TPanel
          Left = 416
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P15'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 15
        end
        object P16: TPanel
          Left = 440
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P16'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 16
        end
        object P17: TPanel
          Left = 464
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P17'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 17
        end
        object P18: TPanel
          Left = 488
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P18'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 18
        end
        object P19: TPanel
          Left = 512
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P19'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 19
        end
        object P20: TPanel
          Left = 536
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P20'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 20
        end
        object P21: TPanel
          Left = 560
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P21'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 21
        end
        object P22: TPanel
          Left = 584
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P22'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 22
        end
        object P23: TPanel
          Left = 608
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P23'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 23
        end
      end
    end
    object ts_monat: TTabSheet
      Caption = 'Monat'
      object Panel3: TPanel
        Left = 0
        Top = -1
        Width = 681
        Height = 329
        BevelInner = bvLowered
        BevelOuter = bvNone
        Color = clInfoBk
        TabOrder = 0
        object shape8: TShape
          Left = 52
          Top = 274
          Width = 619
          Height = 1
        end
        object shape9: TShape
          Left = 52
          Top = 264
          Width = 619
          Height = 1
        end
        object shape10: TShape
          Left = 52
          Top = 254
          Width = 619
          Height = 1
        end
        object shape11: TShape
          Left = 52
          Top = 264
          Width = 619
          Height = 1
        end
        object shape12: TShape
          Left = 52
          Top = 244
          Width = 619
          Height = 1
        end
        object shape13: TShape
          Left = 52
          Top = 234
          Width = 619
          Height = 1
          Pen.Color = clBlue
        end
        object shape14: TShape
          Left = 52
          Top = 224
          Width = 619
          Height = 1
        end
        object shape15: TShape
          Left = 52
          Top = 214
          Width = 619
          Height = 1
        end
        object shape16: TShape
          Left = 52
          Top = 204
          Width = 619
          Height = 1
        end
        object shape17: TShape
          Left = 52
          Top = 194
          Width = 619
          Height = 1
          Pen.Color = clBlue
        end
        object shape18: TShape
          Left = 52
          Top = 184
          Width = 619
          Height = 1
        end
        object shape19: TShape
          Left = 52
          Top = 174
          Width = 619
          Height = 1
        end
        object shape191: TShape
          Left = 52
          Top = 164
          Width = 619
          Height = 1
        end
        object shape20: TShape
          Left = 52
          Top = 154
          Width = 619
          Height = 1
          Pen.Color = clBlue
        end
        object shape21: TShape
          Left = 52
          Top = 144
          Width = 619
          Height = 1
        end
        object shape22: TShape
          Left = 52
          Top = 134
          Width = 619
          Height = 1
        end
        object shape23: TShape
          Left = 52
          Top = 124
          Width = 619
          Height = 1
        end
        object shape24: TShape
          Left = 52
          Top = 114
          Width = 619
          Height = 1
          Pen.Color = clBlue
        end
        object shape25: TShape
          Left = 52
          Top = 104
          Width = 619
          Height = 1
        end
        object shape26: TShape
          Left = 52
          Top = 94
          Width = 619
          Height = 1
        end
        object shape27: TShape
          Left = 52
          Top = 84
          Width = 619
          Height = 1
        end
        object shape28: TShape
          Left = 52
          Top = 74
          Width = 619
          Height = 1
          Pen.Color = clBlue
        end
        object shape29: TShape
          Left = 52
          Top = 64
          Width = 619
          Height = 1
        end
        object shape30: TShape
          Left = 52
          Top = 54
          Width = 619
          Height = 1
        end
        object shape31: TShape
          Left = 52
          Top = 44
          Width = 619
          Height = 1
        end
        object shape32: TShape
          Left = 52
          Top = 34
          Width = 619
          Height = 1
          Pen.Color = clBlue
        end
        object Label39: TLabel
          Left = 38
          Top = 268
          Width = 8
          Height = 13
          Caption = '0'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object ALabel3: TALabel
          Left = 8
          Top = 144
          Width = 19
          Height = 57
          Caption = 'Stunden'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          Angle = 900
        end
        object ALabel4: TALabel
          Left = 328
          Top = 304
          Width = 28
          Height = 20
          Caption = 'Tag'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label41: TLabel
          Left = 58
          Top = 280
          Width = 6
          Height = 13
          Caption = '1'
        end
        object Label42: TLabel
          Left = 77
          Top = 287
          Width = 6
          Height = 13
          Caption = '2'
        end
        object Label43: TLabel
          Left = 97
          Top = 280
          Width = 6
          Height = 13
          Caption = '3'
        end
        object Label44: TLabel
          Left = 116
          Top = 287
          Width = 6
          Height = 13
          Caption = '4'
        end
        object Label45: TLabel
          Left = 135
          Top = 280
          Width = 6
          Height = 13
          Caption = '5'
        end
        object Label46: TLabel
          Left = 153
          Top = 287
          Width = 6
          Height = 13
          Caption = '6'
        end
        object Label47: TLabel
          Left = 172
          Top = 280
          Width = 6
          Height = 13
          Caption = '7'
        end
        object Label48: TLabel
          Left = 193
          Top = 287
          Width = 6
          Height = 13
          Caption = '8'
        end
        object Label49: TLabel
          Left = 211
          Top = 280
          Width = 6
          Height = 13
          Caption = '9'
        end
        object Label50: TLabel
          Left = 228
          Top = 287
          Width = 12
          Height = 13
          Caption = '10'
        end
        object Label51: TLabel
          Left = 248
          Top = 280
          Width = 12
          Height = 13
          Caption = '11'
        end
        object Label52: TLabel
          Left = 264
          Top = 287
          Width = 12
          Height = 13
          Caption = '12'
        end
        object Label53: TLabel
          Left = 285
          Top = 280
          Width = 12
          Height = 13
          Caption = '13'
        end
        object Label54: TLabel
          Left = 304
          Top = 287
          Width = 12
          Height = 13
          Caption = '14'
        end
        object Label55: TLabel
          Left = 323
          Top = 280
          Width = 12
          Height = 13
          Caption = '15'
        end
        object Label56: TLabel
          Left = 342
          Top = 287
          Width = 12
          Height = 13
          Caption = '16'
        end
        object Label57: TLabel
          Left = 361
          Top = 280
          Width = 12
          Height = 13
          Caption = '17'
        end
        object Label58: TLabel
          Left = 381
          Top = 287
          Width = 12
          Height = 13
          Caption = '18'
        end
        object Label59: TLabel
          Left = 402
          Top = 280
          Width = 12
          Height = 13
          Caption = '19'
        end
        object Label60: TLabel
          Left = 421
          Top = 287
          Width = 12
          Height = 13
          Caption = '20'
        end
        object Label61: TLabel
          Left = 440
          Top = 280
          Width = 12
          Height = 13
          Caption = '21'
        end
        object Label62: TLabel
          Left = 458
          Top = 287
          Width = 12
          Height = 13
          Caption = '22'
        end
        object Label63: TLabel
          Left = 478
          Top = 280
          Width = 12
          Height = 13
          Caption = '23'
        end
        object Label100: TLabel
          Left = 51
          Top = 8
          Width = 607
          Height = 20
          Alignment = taCenter
          AutoSize = False
          Caption = 'Kein Protokoll vorhanden'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clMaroon
          Font.Height = -16
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label33: TLabel
          Left = 32
          Top = 28
          Width = 15
          Height = 13
          Caption = '24'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label34: TLabel
          Left = 32
          Top = 68
          Width = 15
          Height = 13
          Caption = '20'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label35: TLabel
          Left = 32
          Top = 108
          Width = 15
          Height = 13
          Caption = '16'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label36: TLabel
          Left = 32
          Top = 148
          Width = 15
          Height = 13
          Caption = '12'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label37: TLabel
          Left = 36
          Top = 188
          Width = 8
          Height = 13
          Caption = '8'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label38: TLabel
          Left = 37
          Top = 228
          Width = 8
          Height = 13
          Caption = '4'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label64: TLabel
          Left = 496
          Top = 287
          Width = 12
          Height = 13
          Caption = '24'
        end
        object Label66: TLabel
          Left = 537
          Top = 287
          Width = 12
          Height = 13
          Caption = '26'
        end
        object Label67: TLabel
          Left = 554
          Top = 280
          Width = 12
          Height = 13
          Caption = '27'
        end
        object Label68: TLabel
          Left = 574
          Top = 287
          Width = 12
          Height = 13
          Caption = '28'
        end
        object Label70: TLabel
          Left = 611
          Top = 287
          Width = 12
          Height = 13
          Caption = '30'
        end
        object Label69: TLabel
          Left = 592
          Top = 278
          Width = 12
          Height = 13
          Caption = '29'
        end
        object Label65: TLabel
          Left = 517
          Top = 280
          Width = 12
          Height = 13
          Caption = '25'
        end
        object Label71: TLabel
          Left = 630
          Top = 280
          Width = 12
          Height = 13
          Caption = '31'
        end
        object d1: TPanel
          Left = 54
          Top = 34
          Width = 16
          Height = 240
          BevelOuter = bvNone
          Caption = 'p0'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          OnDblClick = d9Click
        end
        object d2: TPanel
          Left = 73
          Top = 64
          Width = 16
          Height = 210
          BevelOuter = bvNone
          Caption = 'p1'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnDblClick = d9Click
        end
        object d3: TPanel
          Left = 92
          Top = 94
          Width = 16
          Height = 180
          BevelOuter = bvNone
          Caption = 'p2'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnDblClick = d9Click
        end
        object d4: TPanel
          Left = 111
          Top = 124
          Width = 16
          Height = 150
          BevelOuter = bvNone
          Caption = 'p3'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnDblClick = d9Click
        end
        object d5: TPanel
          Left = 130
          Top = 154
          Width = 16
          Height = 120
          BevelOuter = bvNone
          Caption = 'p4'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 4
          OnDblClick = d9Click
        end
        object d6: TPanel
          Left = 149
          Top = 184
          Width = 16
          Height = 90
          BevelOuter = bvNone
          Caption = 'p5'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 5
          OnDblClick = d9Click
        end
        object d7: TPanel
          Left = 168
          Top = 214
          Width = 16
          Height = 60
          BevelOuter = bvNone
          Caption = 'p6'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 6
          OnDblClick = d9Click
        end
        object d8: TPanel
          Left = 187
          Top = 244
          Width = 16
          Height = 30
          BevelOuter = bvNone
          Caption = 'p7'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 7
          OnDblClick = d9Click
        end
        object d9: TPanel
          Left = 206
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P8'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 8
          OnDblClick = d9Click
        end
        object d10: TPanel
          Left = 225
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P9'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 9
          OnDblClick = d9Click
        end
        object d11: TPanel
          Left = 245
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P10'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 10
          OnDblClick = d9Click
        end
        object d13: TPanel
          Left = 283
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P11'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 11
          OnDblClick = d9Click
        end
        object d12: TPanel
          Left = 264
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P12'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 12
          OnDblClick = d9Click
        end
        object d14: TPanel
          Left = 302
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P13'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 13
          OnDblClick = d9Click
        end
        object d15: TPanel
          Left = 321
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P14'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 14
          OnDblClick = d9Click
        end
        object d16: TPanel
          Left = 340
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P15'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 15
          OnDblClick = d9Click
        end
        object d17: TPanel
          Left = 360
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P16'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 16
          OnDblClick = d9Click
        end
        object d18: TPanel
          Left = 379
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P17'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 17
          OnDblClick = d9Click
        end
        object d19: TPanel
          Left = 399
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P18'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 18
          OnDblClick = d9Click
        end
        object d20: TPanel
          Left = 419
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P19'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 19
          OnDblClick = d9Click
        end
        object d21: TPanel
          Left = 438
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P20'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 20
          OnDblClick = d9Click
        end
        object d22: TPanel
          Left = 457
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P21'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 21
          OnDblClick = d9Click
        end
        object d23: TPanel
          Left = 476
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P22'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 22
          OnDblClick = d9Click
        end
        object d24: TPanel
          Left = 495
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P23'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 23
          OnDblClick = d9Click
        end
        object d25: TPanel
          Left = 514
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P24'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 24
          OnDblClick = d9Click
        end
        object d26: TPanel
          Left = 533
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P25'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 25
          OnDblClick = d9Click
        end
        object d27: TPanel
          Left = 552
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P26'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 26
          OnDblClick = d9Click
        end
        object d28: TPanel
          Left = 571
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P27'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 27
          OnDblClick = d9Click
        end
        object d29: TPanel
          Left = 590
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P28'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 28
          OnDblClick = d9Click
        end
        object d30: TPanel
          Left = 609
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P29'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 29
          OnDblClick = d9Click
        end
        object d31: TPanel
          Left = 628
          Top = 97
          Width = 16
          Height = 177
          BevelOuter = bvNone
          Caption = 'P30'
          Color = clPurple
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 30
          OnDblClick = d9Click
        end
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 140
    Top = 48
    object Datei1: TMenuItem
      Caption = 'Datei'
      object Automatischstarten1: TMenuItem
        Caption = '&Automatisch starten'
        OnClick = Automatischstarten1Click
      end
      object Beenden1: TMenuItem
        Caption = '&Beenden'
        OnClick = Beenden1Click
      end
    end
  end
  object FormStorage1: TFormStorage
    IniFileName = 'position'
    Left = 108
    Top = 47
  end
end