object Form1: TForm1
  Left = 385
  Top = 199
  Width = 800
  Height = 600
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  Caption = 'Komputerowy Katalog P�yt 1998'
  Color = clTeal
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poDefault
  OnClose = FormClose
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Background1: TBackground
    Left = 0
    Top = 2
    Width = 828
    Height = 552
    Align = alClient
    Color1 = clWhite
    Color2 = clBlack
    BackStyle = bgTileBitmap
  end
  object Label1: TLabelEffect
    Left = 0
    Top = 7
    Width = 828
    Height = 36
    ColourHighlight = clBlack
    GraduateFrom = clBlack
    ColourScheme = csCustom
    Alignment = taCenter
    Caption = 'Komputerowy  Katalog  P�yt  1998'
    Color = clBlack
    Font.Color = clYellow
    Font.Height = -27
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label2: TLabelEffect
    Left = 0
    Top = 39
    Width = 828
    Height = 22
    DepthShadow = 5
    DirectionHighlight = edDownRight
    ColourHighlight = clBlack
    GraduateFrom = clWindowText
    EffectStyle = esFlying
    ColourScheme = csCustom
    Alignment = taCenter
    Caption = 'Wybranie pierwszej litery nazwy u�atwi odnalezienie wykonawcy'
    Color = clBlack
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 828
    Height = 2
    Align = alTop
    Shape = bsTopLine
  end
  object DLabel1: TLabelEffect
    Left = 232
    Top = 508
    Width = 261
    Height = 33
    ColourHighlight = clBlack
    GraduateFrom = clWindowText
    ColourScheme = csCustom
    Alignment = taCenter
    Caption = 'DLabel1'
    Color = clBlack
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object DBGrid1: TBSDBGrid
    Left = 12
    Top = 96
    Width = 185
    Height = 409
    Color = clBtnFace
    Ctl3D = True
    DataSource = dsWykonawca2
    FixedColor = clYellow
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgConfirmDelete, dgCancelOnExit]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
    TitleFont.Color = clRed
    TitleFont.Height = -12
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    Cellstyle = csNone
  end
  object DBGrid2: TBSDBGrid
    Left = 208
    Top = 96
    Width = 213
    Height = 409
    Color = clBtnFace
    DataSource = dsPlyty
    FixedColor = clYellow
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 1
    TitleFont.Color = clRed
    TitleFont.Height = -12
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    Cellstyle = csNone
  end
  object DBGrid3: TBSDBGrid
    Left = 432
    Top = 96
    Width = 201
    Height = 409
    Color = clBtnFace
    DataSource = dsUtwory
    FixedColor = clYellow
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [dgEditing, dgTitles, dgColumnResize, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 2
    TitleFont.Color = clRed
    TitleFont.Height = -12
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    Cellstyle = csNone
  end
  object Button1: TColorButton
    Left = 12
    Top = 508
    Width = 213
    Height = 29
    Hint = 'Przejd� do okna wyszukiwania'
    BevelSize = 1
    Caption = 'Wyszukiwanie'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 3
    TabStop = True
    OnClick = Button1Click
  end
  object Button2: TColorButton
    Left = 500
    Top = 508
    Width = 201
    Height = 29
    Hint = 'Zako�cz prac� programu'
    BevelSize = 1
    Caption = 'Koniec pracy'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 4
    TabStop = True
    OnClick = Button2Click
  end
  object b_wszystkie: TColorButton
    Left = 8
    Top = 56
    Width = 97
    Height = 25
    Hint = 'Wczytaj pe�n� list� wykonawc�w'
    BevelSize = 1
    Caption = 'Wszystkie'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 5
    TabStop = True
    OnClick = b_wszystkieClick
  end
  object b_a: TColorButton
    Left = 104
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� A'
    BevelSize = 1
    Caption = 'A'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 6
    TabStop = True
    OnClick = b_aClick
  end
  object b_b: TColorButton
    Left = 128
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� B'
    BevelSize = 1
    Caption = 'B'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 7
    TabStop = True
    OnClick = b_bClick
  end
  object b_c: TColorButton
    Left = 152
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� C'
    BevelSize = 1
    Caption = 'C'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 8
    TabStop = True
    OnClick = b_cClick
  end
  object b_d: TColorButton
    Left = 176
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� D'
    BevelSize = 1
    Caption = 'D'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 9
    TabStop = True
    OnClick = b_dClick
  end
  object b_e: TColorButton
    Left = 200
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� E'
    BevelSize = 1
    Caption = 'E'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 10
    TabStop = True
    OnClick = b_eClick
  end
  object b_f: TColorButton
    Left = 224
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� F'
    BevelSize = 1
    Caption = 'F'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 11
    TabStop = True
    OnClick = b_fClick
  end
  object b_g: TColorButton
    Left = 248
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� G'
    BevelSize = 1
    Caption = 'G'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 12
    TabStop = True
    OnClick = b_gClick
  end
  object b_h: TColorButton
    Left = 272
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� H'
    BevelSize = 1
    Caption = 'H'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 13
    TabStop = True
    OnClick = b_hClick
  end
  object b_i: TColorButton
    Left = 296
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� I'
    BevelSize = 1
    Caption = 'I'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 14
    TabStop = True
    OnClick = b_iClick
  end
  object b_j: TColorButton
    Left = 320
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� J'
    BevelSize = 1
    Caption = 'J'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 15
    TabStop = True
    OnClick = AClick
  end
  object b_k: TColorButton
    Left = 344
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� K'
    BevelSize = 1
    Caption = 'K'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 16
    TabStop = True
    OnClick = AClick
  end
  object b_l: TColorButton
    Left = 368
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� L'
    BevelSize = 1
    Caption = 'L'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 17
    TabStop = True
    OnClick = AClick
  end
  object b_m: TColorButton
    Left = 392
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� M'
    BevelSize = 1
    Caption = 'M'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 18
    TabStop = True
    OnClick = AClick
  end
  object b_n: TColorButton
    Left = 416
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� N'
    BevelSize = 1
    Caption = 'N'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 19
    TabStop = True
    OnClick = AClick
  end
  object b_o: TColorButton
    Left = 440
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� O'
    BevelSize = 1
    Caption = 'O'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 20
    TabStop = True
    OnClick = AClick
  end
  object b_p: TColorButton
    Left = 464
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� P'
    BevelSize = 1
    Caption = 'P'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 21
    TabStop = True
    OnClick = AClick
  end
  object b_q: TColorButton
    Left = 488
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� Q'
    BevelSize = 1
    Caption = 'Q'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 22
    TabStop = True
    OnClick = AClick
  end
  object b_r: TColorButton
    Left = 512
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� R'
    BevelSize = 1
    Caption = 'R'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 23
    TabStop = True
    OnClick = AClick
  end
  object b_s: TColorButton
    Left = 536
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� S'
    BevelSize = 1
    Caption = 'S'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 24
    TabStop = True
    OnClick = AClick
  end
  object b_t: TColorButton
    Left = 560
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� T'
    BevelSize = 1
    Caption = 'T'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 25
    TabStop = True
    OnClick = AClick
  end
  object b_u: TColorButton
    Left = 584
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� U'
    BevelSize = 1
    Caption = 'U'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 26
    TabStop = True
    OnClick = AClick
  end
  object b_v: TColorButton
    Left = 608
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� V'
    BevelSize = 1
    Caption = 'V'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 27
    TabStop = True
    OnClick = AClick
  end
  object b_w: TColorButton
    Left = 632
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� W'
    BevelSize = 1
    Caption = 'W'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 28
    TabStop = True
    OnClick = AClick
  end
  object b_x: TColorButton
    Left = 656
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� X'
    BevelSize = 1
    Caption = 'X'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 29
    TabStop = True
    OnClick = AClick
  end
  object b_y: TColorButton
    Left = 680
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� Y'
    BevelSize = 1
    Caption = 'Y'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 30
    TabStop = True
    OnClick = AClick
  end
  object b_z: TColorButton
    Left = 704
    Top = 56
    Width = 25
    Height = 25
    Hint = 'Wczytaj wykonawc�w na liter� Z'
    BevelSize = 1
    Caption = 'Z'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 31
    TabStop = True
    OnClick = AClick
  end
  object b_pozostale: TColorButton
    Left = 728
    Top = 56
    Width = 85
    Height = 25
    Hint = 'Wczytaj wykonawc�w, kt�rych nazwy zaczynaj� si� cyframi'
    BevelSize = 1
    Caption = '0 - 9'
    Color = clTeal
    Font.Color = clYellow
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Style = [bsCenter, bsShowFocus, bsShowKey]
    TabOrder = 32
    TabStop = True
    OnClick = b_pozostaleClick
  end
  object Wykonawca: TTable
    IndexFieldNames = 'Wykonawca'
    ReadOnly = True
    TableName = 'WYKONAW.DB'
    Left = 20
    Top = 364
    object WykonawcaWykonawca: TStringField
      FieldName = 'Wykonawca'
      Required = True
      Size = 30
    end
  end
  object Plyty: TTable
    IndexName = 'sortuj_plyty'
    MasterFields = 'Wykonawca'
    MasterSource = dsWykonawca2
    ReadOnly = True
    TableName = 'PLYTY.DB'
    Left = 216
    Top = 388
    object PlytyPlyta: TStringField
      DisplayLabel = 'P�yta'
      DisplayWidth = 32
      FieldName = 'Plyta'
      Required = True
      Size = 50
    end
    object PlytyRok: TStringField
      FieldName = 'Rok'
      Size = 4
    end
    object PlytyCzas: TStringField
      FieldName = 'Czas'
      Visible = False
      Size = 5
    end
    object PlytyPlyta_index: TIntegerField
      FieldName = 'Plyta_index'
      Visible = False
    end
    object PlytyWykonawca: TStringField
      FieldName = 'Wykonawca'
      Required = True
      Visible = False
      Size = 30
    end
  end
  object Utwory: TTable
    IndexFieldNames = 'Plyta_index'
    MasterFields = 'Plyta_index'
    MasterSource = dsPlyty
    ReadOnly = True
    TableName = 'UTWORY.DB'
    Left = 440
    Top = 384
    object UtworyUtwor: TStringField
      DisplayLabel = 'Utw�r'
      DisplayWidth = 120
      FieldName = 'Utwor'
      Size = 120
    end
    object UtworyCzas: TStringField
      FieldName = 'Czas'
      Visible = False
      Size = 5
    end
    object UtworyPlyta_index: TIntegerField
      FieldName = 'Plyta_index'
      Visible = False
    end
    object UtworyUtwor_index: TIntegerField
      FieldName = 'Utwor_index'
      Visible = False
    end
  end
  object dsWykonawca: TDataSource
    DataSet = Wykonawca
    Left = 48
    Top = 364
  end
  object dsPlyty: TDataSource
    DataSet = Plyty
    Left = 244
    Top = 388
  end
  object dsUtwory: TDataSource
    DataSet = Utwory
    Left = 468
    Top = 384
  end
  object Query1: TQuery
    DatabaseName = '\kkp_dat\'
    DataSource = dsWykonawca
    SQL.Strings = (
      'SELECT * FROM Wykonaw')
    Left = 20
    Top = 392
  end
  object dsWykonawca2: TDataSource
    DataSet = Query1
    Left = 48
    Top = 392
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 4
    object menu_koniec_pracy: TMenuItem
      Caption = '&Koniec pracy'
      ShortCut = 16459
      OnClick = menu_koniec_pracyClick
    end
    object menu_wyszukiwanie: TMenuItem
      Caption = '&Wyszukiwanie'
      Hint = 'Ctrl+W'
      ShortCut = 16471
      object Okno1: TMenuItem
        Caption = 'Otw�rz okno wyszukiwania'
        ShortCut = 0
        OnClick = Button1Click
      end
      object N7: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Okno2: TMenuItem
        Caption = 'Okno zawsze na wierzchu'
        Checked = True
        ShortCut = 0
        OnClick = Okno2Click
      end
      object Okno3: TMenuItem
        Caption = 'Zamykaj okno automatycznie'
        ShortCut = 0
        OnClick = Okno3Click
      end
    end
    object Kolor1: TMenuItem
      Caption = '&Pulpit'
      ShortCut = 16464
      object KolorPulpit: TMenuItem
        Caption = 'Kolor pulpitu'
        GroupIndex = 1
        ShortCut = 0
        OnClick = Kolor1Click
      end
      object Tapeta1: TMenuItem
        Caption = 'Tapeta pulpitu'
        GroupIndex = 1
        ShortCut = 0
        object Brak1: TMenuItem
          Caption = 'Brak'
          ShortCut = 0
          OnClick = Brak1Click
        end
        object N6: TMenuItem
          Caption = '-'
          ShortCut = 0
        end
        object Aqua2: TMenuItem
          Caption = 'Aqua'
          ShortCut = 0
          OnClick = Aqua2Click
        end
        object Bluestone1: TMenuItem
          Caption = 'Bluestone'
          ShortCut = 0
          OnClick = Bluestone1Click
        end
        object Cool1: TMenuItem
          Caption = 'Cool'
          ShortCut = 0
          OnClick = Cool1Click
        end
        object Grass1: TMenuItem
          Caption = 'Grass'
          ShortCut = 0
          OnClick = Grass1Click
        end
        object Levis1: TMenuItem
          Caption = 'Jeans'
          ShortCut = 0
          OnClick = Levis1Click
        end
        object RedBlack1: TMenuItem
          Caption = 'Mars'
          ShortCut = 0
          OnClick = RedBlack1Click
        end
        object Lines1: TMenuItem
          Caption = 'Paint'
          ShortCut = 0
          OnClick = Lines1Click
        end
        object Quartz1: TMenuItem
          Caption = 'Quartz'
          ShortCut = 0
          OnClick = Quartz1Click
        end
        object Rainbow1: TMenuItem
          Caption = 'Rainbow'
          ShortCut = 0
          OnClick = Rainbow1Click
        end
        object Rings1: TMenuItem
          Caption = 'Rock'
          ShortCut = 0
          OnClick = Rings1Click
        end
        object Sky1: TMenuItem
          Caption = 'Sky'
          ShortCut = 0
          OnClick = Sky1Click
        end
        object Space1: TMenuItem
          Caption = 'Space'
          ShortCut = 0
          OnClick = Space1Click
        end
        object Squares1: TMenuItem
          Caption = 'Squares'
          ShortCut = 0
          OnClick = Squares1Click
        end
        object Rings2: TMenuItem
          Caption = 'Stone'
          ShortCut = 0
          OnClick = Rings2Click
        end
        object Volcano1: TMenuItem
          Caption = 'Volcano'
          ShortCut = 0
          OnClick = Volcano1Click
        end
        object Wall1: TMenuItem
          Caption = 'Wall'
          ShortCut = 0
          OnClick = Wall1Click
        end
        object Baumwolle1: TMenuItem
          Caption = 'Wood'
          ShortCut = 0
          OnClick = Baumwolle1Click
        end
      end
      object Czcionkapulpitu1: TMenuItem
        Caption = 'Kolor czcionki pulpitu'
        GroupIndex = 1
        ShortCut = 0
        OnClick = Czcionkapulpitu1Click
      end
      object Efektczcionkipulpitu1: TMenuItem
        Caption = 'Efekt czcionki pulpitu'
        GroupIndex = 1
        ShortCut = 0
        object None1: TMenuItem
          Caption = 'Brak'
          ShortCut = 0
          OnClick = None1Click
        end
        object N4: TMenuItem
          Caption = '-'
          ShortCut = 0
        end
        object Raised1: TMenuItem
          Caption = 'Ramka'
          ShortCut = 0
          OnClick = Raised1Click
        end
        object Shadow1: TMenuItem
          Caption = 'Po�wiata'
          ShortCut = 0
          OnClick = Shadow1Click
        end
        object Flying1: TMenuItem
          Caption = 'Cie�'
          ShortCut = 0
          OnClick = Flying1Click
        end
      end
      object BtnKolor: TMenuItem
        Caption = 'Kolor przycisk�w'
        GroupIndex = 1
        ShortCut = 0
        OnClick = BtnKolorClick
      end
      object BtnFontKolor: TMenuItem
        Caption = 'Kolor czcionki na przyciskach'
        GroupIndex = 1
        ShortCut = 0
        OnClick = BtnFontKolorClick
      end
      object Czcionka1: TMenuItem
        Caption = 'Czcionka okien katalogu'
        GroupIndex = 1
        ShortCut = 0
        OnClick = Czcionka1Click
      end
      object Etykietyprzyciskw1: TMenuItem
        Caption = 'Etykiety przycisk�w'
        Checked = True
        GroupIndex = 1
        ShortCut = 0
        OnClick = Etykietyprzyciskw1Click
      end
      object N5: TMenuItem
        Caption = '-'
        GroupIndex = 1
        ShortCut = 0
      end
      object WinKol: TMenuItem
        Caption = 'Kolory Windows'
        GroupIndex = 1
        ShortCut = 0
        OnClick = WinKolClick
      end
    end
    object d1: TMenuItem
      Caption = '&D�wi�k'
      Hint = 'Ctrl+D'
      ShortCut = 16452
      object g1: TMenuItem
        Caption = 'G�o�no'
        ShortCut = 0
        OnClick = g1Click
      end
      object g2: TMenuItem
        Caption = 'Normalnie'
        ShortCut = 0
        OnClick = g2Click
      end
      object g3: TMenuItem
        Caption = 'Cicho'
        ShortCut = 0
        OnClick = g3Click
      end
      object g4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object g5: TMenuItem
        Caption = 'Bez d�wi�ku'
        ShortCut = 0
        OnClick = g5Click
      end
    end
    object menu_pomoc: TMenuItem
      Caption = 'Pomoc'
      ShortCut = 112
      OnClick = menu_pomocClick
    end
    object menu_o_programie: TMenuItem
      Caption = '&O programie'
      Hint = 'Ctrl+O'
      ShortCut = 16463
      OnClick = menu_o_programieClick
    end
    object Zam1: TMenuItem
      Caption = '&Zam�wienie'
      ShortCut = 16474
      OnClick = Zam1Click
    end
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 37
    Top = 4
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Left = 66
    Top = 4
  end
  object MarsCaption1: TMarsCaption
    ActiveBeginColor = clRed
    ActiveEndColor = clYellow
    ActiveFontColor = clYellow
    InactiveBeginColor = clBlack
    InactiveEndColor = clSilver
    InactiveFontColor = clSilver
    ApplicationNameFont.Color = clYellow
    ApplicationNameFont.Height = -11
    ApplicationNameFont.Name = 'MS Sans Serif'
    ApplicationNameFont.Style = []
    CaptionFont.Color = clYellow
    CaptionFont.Height = -11
    CaptionFont.Name = 'MS Sans Serif'
    CaptionFont.Style = []
    NumColors = 64
    AutoSize = False
    Left = 184
    Top = 4
  end
  object Volume1: TVolumeControl
    Left = 156
    Top = 4
  end
end