WDR Computer Club Digital 1996 October/CLUB10_96.BIN/share95/95kalend/kalender.exe/0/RCDATA/TSPEZIAL/TSPEZIAL.txt

Text File | 1996-06-23 | 9KB | 375 lines

object Spezial: TSpezial
  Left = 97
  Top = 98
  ActiveControl = OKBtn
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Sondereintragungen des Kalender'
  ClientHeight = 282
  ClientWidth = 516
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  FormStyle = fsMDIForm
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 417
    Height = 265
    Shape = bsFrame
    IsControl = True
  end
  object OKBtn: TBitBtn
    Left = 428
    Top = 8
    Width = 77
    Height = 27
    Caption = '&OK'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = OKBtnClick
    Kind = bkOK
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 428
    Top = 40
    Width = 77
    Height = 27
    Caption = 'A&bbruch'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = CancelBtnClick
    Kind = bkCancel
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object HelpBtn: TBitBtn
    Left = 428
    Top = 72
    Width = 77
    Height = 27
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = HelpBtnClick
    Kind = bkHelp
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object LB: TListBox
    Left = 16
    Top = 16
    Width = 153
    Height = 241
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 14
    ParentFont = False
    TabOrder = 0
    OnClick = LBClick
  end
  object GroupBox1: TGroupBox
    Left = 176
    Top = 24
    Width = 129
    Height = 169
    Caption = 'Wochentag'
    TabOrder = 1
    object Label1: TLabel
      Left = 9
      Top = 19
      Width = 21
      Height = 13
      Caption = 'Der'
    end
    object versatz: TSpinEdit
      Left = 40
      Top = 16
      Width = 41
      Height = 22
      MaxLength = 2
      MaxValue = 50
      MinValue = 1
      TabOrder = 0
      Value = 1
      OnClick = rb1Click
    end
    object rb1: TRadioButton
      Tag = 2
      Left = 8
      Top = 38
      Width = 113
      Height = 17
      Caption = 'Montag'
      Checked = True
      TabOrder = 1
      TabStop = True
      OnClick = rb1Click
    end
    object rb2: TRadioButton
      Tag = 3
      Left = 8
      Top = 56
      Width = 113
      Height = 17
      Caption = 'Dienstag'
      TabOrder = 2
      OnClick = rb1Click
    end
    object rb3: TRadioButton
      Tag = 4
      Left = 8
      Top = 75
      Width = 113
      Height = 17
      Caption = 'Mittwoch'
      TabOrder = 3
      OnClick = rb1Click
    end
    object rb4: TRadioButton
      Tag = 5
      Left = 8
      Top = 93
      Width = 113
      Height = 17
      Caption = 'Donnertag'
      TabOrder = 4
      OnClick = rb1Click
    end
    object rb5: TRadioButton
      Tag = 6
      Left = 8
      Top = 111
      Width = 113
      Height = 17
      Caption = 'Freitag'
      TabOrder = 5
      OnClick = rb1Click
    end
    object rb6: TRadioButton
      Tag = 7
      Left = 8
      Top = 130
      Width = 113
      Height = 16
      Caption = 'Samstag'
      TabOrder = 6
      OnClick = rb1Click
    end
    object rb7: TRadioButton
      Tag = 1
      Left = 8
      Top = 148
      Width = 113
      Height = 17
      Caption = 'Sonntag'
      TabOrder = 7
      OnClick = rb1Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 312
    Top = 24
    Width = 105
    Height = 169
    Caption = 'Versatz'
    TabOrder = 2
    object Label2: TLabel
      Left = 6
      Top = 86
      Width = 23
      Height = 13
      Caption = 'Tag'
    end
    object Label3: TLabel
      Left = 6
      Top = 118
      Width = 36
      Height = 13
      Caption = 'Monat'
    end
    object rbvor: TRadioButton
      Tag = -1
      Left = 9
      Top = 38
      Width = 80
      Height = 17
      Caption = 'vor dem'
      TabOrder = 0
      OnClick = rb1Click
    end
    object rbnach: TRadioButton
      Tag = 1
      Left = 9
      Top = 55
      Width = 83
      Height = 17
      Caption = 'nach dem'
      Checked = True
      TabOrder = 1
      TabStop = True
      OnClick = rb1Click
    end
    object tag: TSpinEdit
      Left = 48
      Top = 81
      Width = 49
      Height = 22
      MaxLength = 2
      MaxValue = 31
      MinValue = 1
      TabOrder = 2
      Value = 1
      OnChange = rb1Click
    end
    object monat: TSpinEdit
      Left = 48
      Top = 114
      Width = 49
      Height = 22
      MaxLength = 2
      MaxValue = 12
      MinValue = 1
      TabOrder = 3
      Value = 1
      OnChange = monatChange
    end
  end
  object GroupBox3: TGroupBox
    Left = 176
    Top = 208
    Width = 241
    Height = 49
    Caption = 'Kalendertext'
    TabOrder = 3
    object text: TEdit
      Left = 8
      Top = 16
      Width = 225
      Height = 21
      TabOrder = 0
    end
  end
  object neu: TBitBtn
    Left = 428
    Top = 184
    Width = 77
    Height = 25
    Caption = '&Neu'
    Default = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnClick = neuClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      003337777777777777F330FFFFFFFFFFF03337F3333FFF3337F330FFFF000FFF
      F03337F33377733337F330FFFFF0FFFFF03337F33337F33337F330FFFF00FFFF
      F03337F33377F33337F330FFFFF0FFFFF03337F33337333337F330FFFFFFFFFF
      F03337FFF3F3F3F3F7F33000F0F0F0F0F0333777F7F7F7F7F7F330F0F000F070
      F03337F7F777F777F7F330F0F0F0F070F03337F7F7373777F7F330F0FF0FF0F0
      F03337F733733737F7F330FFFFFFFF00003337F33333337777F330FFFFFFFF0F
      F03337FFFFFFFF7F373330999999990F033337777777777F733330FFFFFFFF00
      333337FFFFFFFF77333330000000000333333777777777733333}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object aendern: TBitBtn
    Left = 428
    Top = 216
    Width = 77
    Height = 25
    Caption = '�n&dern'
    Default = True
    Enabled = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnClick = aendernClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
      000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
      FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
      00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
      00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
      FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
      0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
      05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
      55557F77777775555555000000055555555577777775555555550000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object loeschen: TBitBtn
    Left = 428
    Top = 248
    Width = 77
    Height = 25
    Caption = '&L�schen'
    Default = True
    Enabled = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    OnClick = loeschenClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
      305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
      005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
      B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
      B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
      B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
      B0557777FF577777F7F500000E055550805577777F7555575755500000555555
      05555777775555557F55550005555555055555777555555575550000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
end