object Form1: TForm1
  Left = 379
  Top = 146
  BorderIcons = [biMinimize, biMaximize]
  BorderStyle = bsNone
  ClientHeight = 155
  ClientWidth = 307
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnPaint = FormPaint
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Shape4: TShape
    Left = 0
    Top = 0
    Width = 76
    Height = 20
    Brush.Color = clOlive
  end
  object Label9: TLabel
    Left = 8
    Top = 4
    Width = 66
    Height = 13
    Caption = 'Dne�n� den'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label10: TLabel
    Left = 7
    Top = 3
    Width = 66
    Height = 13
    Caption = 'Dne�n� den'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Shape2: TShape
    Left = 1
    Top = 1
    Width = 305
    Height = 153
    Brush.Style = bsClear
    Pen.Color = clOlive
    Pen.Width = 2
  end
  object Shape3: TShape
    Left = 3
    Top = 3
    Width = 301
    Height = 149
    Brush.Style = bsClear
  end
  object Label2: TLabel
    Left = 80
    Top = 32
    Width = 44
    Height = 19
    Caption = 'Dnes '
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label1: TLabel
    Left = 79
    Top = 31
    Width = 44
    Height = 19
    Caption = 'Dnes '
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clMaroon
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 16
    Top = 56
    Width = 90
    Height = 18
    Caption = 'Sv�tek slav�:'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWhite
    Font.Height = -15
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label4: TLabel
    Left = 15
    Top = 55
    Width = 90
    Height = 18
    Caption = 'Sv�tek slav�:'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label5: TLabel
    Left = 112
    Top = 56
    Width = 90
    Height = 18
    Caption = 'Sv�tek slav�:'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWhite
    Font.Height = -15
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label6: TLabel
    Left = 111
    Top = 55
    Width = 90
    Height = 18
    Caption = 'Sv�tek slav�:'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clBlue
    Font.Height = -15
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label7: TLabel
    Left = 16
    Top = 32
    Width = 63
    Height = 19
    Caption = 'Dnes je:'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label8: TLabel
    Left = 15
    Top = 31
    Width = 63
    Height = 19
    Caption = 'Dnes je:'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Shape1: TShape
    Left = 0
    Top = 0
    Width = 307
    Height = 155
    Brush.Style = bsClear
    OnMouseDown = Shape1MouseDown
    OnMouseMove = Shape1MouseMove
    OnMouseUp = Shape1MouseUp
  end
  object ImageTl1: TImageTl
    Left = 275
    Top = 4
    Width = 26
    Height = 26
    Hint = 'Zav��t'
    Posuv = 2
    ParentShowHint = False
    Picture.Data = {07544269746D617000000000}<image000.unknown>}
    ShowHint = False
    Pozadi = FormAnekdoty.ImagePozadi
    BMS_cislo = 16
    BMS_soubor = 'anekdot'
    MouseClick = ImageTl2MouseClick
  end
end