home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2003 November A / PCWK1103A.iso / Top10FreewarePL-SOFT / TerminarzUcznia / Dane / TU.exe / 0 / RCDATA / TFORM1 / TFORM1.txt
Text File  |  2003-02-10  |  19KB  |  802 lines
  1. object Form1: TForm1
  2.   Left = 228
  3.   Top = 152
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Terminarz ucznia - Wersja 2.0'
  7.   ClientHeight = 381
  8.   ClientWidth = 675
  9.   Color = clWhite
  10.   TransparentColorValue = clWhite
  11.   Font.Charset = DEFAULT_CHARSET
  12.   Font.Color = clWindowText
  13.   Font.Height = -11
  14.   Font.Name = 'MS Sans Serif'
  15.   Font.Style = []
  16.   Menu = MainMenu1
  17.   OldCreateOrder = False
  18.   Position = poDesktopCenter
  19.   ShowHint = True
  20.   OnClose = FormClose
  21.   OnCreate = FormCreate
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object Label2: TLabel
  25.     Left = 144
  26.     Top = 136
  27.     Width = 36
  28.     Height = 13
  29.     Hint = 'To jest informacja o dacie wpisu.'
  30.     Caption = 'Data: '
  31.     Font.Charset = DEFAULT_CHARSET
  32.     Font.Color = clWindowText
  33.     Font.Height = -11
  34.     Font.Name = 'MS Sans Serif'
  35.     Font.Style = [fsBold]
  36.     ParentFont = False
  37.     Visible = False
  38.   end
  39.   object SpeedButton1: TSpeedButton
  40.     Left = 456
  41.     Top = 344
  42.     Width = 0
  43.     Height = 0
  44.     Hint = 'Zapisuje wpis'
  45.     Caption = 'Zapisz'
  46.     Flat = True
  47.     Visible = False
  48.     OnClick = SpeedButton1Click
  49.   end
  50.   object Label1: TLabel
  51.     Left = 8
  52.     Top = 32
  53.     Width = 177
  54.     Height = 313
  55.     Alignment = taCenter
  56.     AutoSize = False
  57.     Caption = 'TERMINARZ  UCZNIA                                  Wersja 2.0'
  58.     Font.Charset = EASTEUROPE_CHARSET
  59.     Font.Color = clWindowText
  60.     Font.Height = -32
  61.     Font.Name = 'Courier New'
  62.     Font.Style = [fsBold]
  63.     ParentFont = False
  64.     Transparent = True
  65.     WordWrap = True
  66.   end
  67.   object Panel: TPanel
  68.     Left = 0
  69.     Top = 0
  70.     Width = 228
  71.     Height = 381
  72.     Align = alLeft
  73.     AutoSize = True
  74.     BevelOuter = bvNone
  75.     Color = clWhite
  76.     TabOrder = 0
  77.     object Label6: TLabel
  78.       Left = 0
  79.       Top = 166
  80.       Width = 228
  81.       Height = 13
  82.       Align = alTop
  83.       Alignment = taCenter
  84.       Caption = 'NOTATKI'
  85.       Font.Charset = DEFAULT_CHARSET
  86.       Font.Color = clWindowText
  87.       Font.Height = -11
  88.       Font.Name = 'MS Sans Serif'
  89.       Font.Style = [fsBold]
  90.       ParentFont = False
  91.     end
  92.     object Kalendarz: TMonthCalendar
  93.       Left = 0
  94.       Top = 0
  95.       Width = 228
  96.       Height = 153
  97.       Hint = 
  98.         'To jest kalendarz. Z niego mo'#380'esz wybiera'#263' wpis, kt'#243'ry chcesz ut' +
  99.         'worzy'#263' lub zmieni'#263'.'
  100.       Align = alTop
  101.       AutoSize = True
  102.       CalColors.TitleBackColor = clSkyBlue
  103.       CalColors.MonthBackColor = clWindow
  104.       Date = 37626.404184988420000000
  105.       FirstDayOfWeek = dowMonday
  106.       TabOrder = 0
  107.       WeekNumbers = True
  108.       OnClick = KalendarzClick
  109.     end
  110.     object Panel1: TPanel
  111.       Left = 0
  112.       Top = 153
  113.       Width = 228
  114.       Height = 13
  115.       Align = alTop
  116.       BevelOuter = bvNone
  117.       Color = clWhite
  118.       TabOrder = 1
  119.     end
  120.     object editor: TFlatMemo
  121.       Left = 8
  122.       Top = 188
  123.       Width = 210
  124.       Height = 187
  125.       Hint = 'Tutaj mo'#380'esz wpiywa'#263' r'#243#380'ne notatki'
  126.       ColorFlat = 14872561
  127.       PopupMenu = menu
  128.       TabOrder = 2
  129.     end
  130.   end
  131.   object Panel3: TPanel
  132.     Left = 224
  133.     Top = 1
  134.     Width = 305
  135.     Height = 48
  136.     BevelOuter = bvNone
  137.     Color = clWhite
  138.     TabOrder = 1
  139.     object Label8: TLabel
  140.       Left = 1
  141.       Top = 4
  142.       Width = 32
  143.       Height = 13
  144.       Caption = 'Data:'
  145.       Font.Charset = DEFAULT_CHARSET
  146.       Font.Color = clBlack
  147.       Font.Height = -11
  148.       Font.Name = 'MS Sans Serif'
  149.       Font.Style = [fsBold]
  150.       ParentFont = False
  151.     end
  152.     object Label12: TLabel
  153.       Left = 0
  154.       Top = 20
  155.       Width = 5
  156.       Height = 13
  157.       Font.Charset = DEFAULT_CHARSET
  158.       Font.Color = clBlack
  159.       Font.Height = -11
  160.       Font.Name = 'MS Sans Serif'
  161.       Font.Style = [fsBold]
  162.       ParentFont = False
  163.     end
  164.     object Bevel2: TBevel
  165.       Left = 0
  166.       Top = 40
  167.       Width = 120
  168.       Height = 3
  169.       Shape = bsTopLine
  170.     end
  171.   end
  172.   object ppanel: TPanel
  173.     Left = 555
  174.     Top = 0
  175.     Width = 120
  176.     Height = 381
  177.     Align = alRight
  178.     BevelOuter = bvNone
  179.     Color = clWhite
  180.     TabOrder = 2
  181.     object Label10: TLabel
  182.       Left = 0
  183.       Top = 8
  184.       Width = 44
  185.       Height = 13
  186.       Hint = 'Tu program podaje informacje o liczbie wpis'#243'w...'
  187.       Caption = 'Wpis'#243'w: '
  188.     end
  189.     object Label11: TLabel
  190.       Left = 0
  191.       Top = 24
  192.       Width = 26
  193.       Height = 13
  194.       Hint = 'To jest zegar'
  195.       Caption = 'Czas:'
  196.     end
  197.     object FlatSpeedButton1: TFlatSpeedButton
  198.       Left = 0
  199.       Top = 240
  200.       Width = 113
  201.       Height = 25
  202.       Hint = 'Je'#380'eli chcesz zmieni'#263' plan lekcji, kliknij tu'
  203.       ColorHighLight = clSkyBlue
  204.       ColorShadow = clSkyBlue
  205.       Caption = 'Ustaw plan lekcji'
  206.       OnClick = FlatSpeedButton1Click
  207.     end
  208.     object FlatSpeedButton2: TFlatSpeedButton
  209.       Left = 0
  210.       Top = 288
  211.       Width = 0
  212.       Height = 0
  213.       ColorHighLight = clSkyBlue
  214.       ColorShadow = clSkyBlue
  215.       Caption = 'Pomoc'
  216.       Visible = False
  217.       OnClick = FlatSpeedButton2Click
  218.     end
  219.     object Bevel1: TBevel
  220.       Left = 0
  221.       Top = 40
  222.       Width = 120
  223.       Height = 3
  224.       Shape = bsTopLine
  225.     end
  226.     object FlatButton1: TFlatButton
  227.       Left = 0
  228.       Top = 192
  229.       Width = 113
  230.       Height = 25
  231.       Hint = 
  232.         'Kliknij tu aby wyczy'#347'ci'#263' pola ocen. Je'#380'eli klikniesz tu prawym p' +
  233.         'rzyciskiem myszy uzyskasz wi'#281'cej opcji...'
  234.       ColorHighLight = clSkyBlue
  235.       ColorShadow = clSkyBlue
  236.       Caption = 'Wyczy'#347#263' pola'
  237.       PopupMenu = PopupMenu1
  238.       TabOrder = 0
  239.       OnClick = FlatButton1Click
  240.     end
  241.     object FlatButton2: TFlatButton
  242.       Left = 0
  243.       Top = 80
  244.       Width = 113
  245.       Height = 25
  246.       Hint = 'Kliknij tu, aby wydrukowa'#263' wpis'
  247.       ColorHighLight = clSkyBlue
  248.       ColorShadow = clSkyBlue
  249.       Caption = 'Drukuj wpis'
  250.       TabOrder = 1
  251.       OnClick = FlatButton2Click
  252.     end
  253.     object Laduj: TFlatButton
  254.       Left = 0
  255.       Top = 112
  256.       Width = 113
  257.       Height = 25
  258.       Hint = 
  259.         'Je'#380'eli klikniesz na ten przycisk w pola przedmiot'#243'w zostan'#261' auto' +
  260.         'matycznie wpisane przedmioty...'
  261.       ColorHighLight = clSkyBlue
  262.       ColorShadow = clSkyBlue
  263.       Caption = #321'aduj przedmioty'
  264.       TabOrder = 2
  265.       OnClick = LadujClick
  266.     end
  267.     object FlatButton4: TFlatButton
  268.       Left = 0
  269.       Top = 48
  270.       Width = 113
  271.       Height = 25
  272.       Hint = 
  273.         'Je'#380'eli chcesz wiedzie'#263' kiedy masz najbli'#380'szy sprawdzian, kliknij' +
  274.         ' tu...'
  275.       ColorHighLight = clSkyBlue
  276.       ColorShadow = clSkyBlue
  277.       Caption = 'Najbli'#380'szy sprawdzian'
  278.       TabOrder = 3
  279.       OnClick = FlatButton4Click
  280.     end
  281.     object FlatButton5: TFlatButton
  282.       Left = 0
  283.       Top = 144
  284.       Width = 113
  285.       Height = 25
  286.       Hint = 'Kliknij tu prawym przyciskiem myszy...'
  287.       ColorHighLight = clSkyBlue
  288.       ColorShadow = clSkyBlue
  289.       Caption = 'Kopia zapasowa'
  290.       PopupMenu = PopupMenu2
  291.       TabOrder = 4
  292.     end
  293.     object FlatButton3: TFlatButton
  294.       Left = 0
  295.       Top = 256
  296.       Width = 0
  297.       Height = 0
  298.       ColorHighLight = clSkyBlue
  299.       ColorShadow = clSkyBlue
  300.       Caption = 'O programie...'
  301.       TabOrder = 5
  302.       Visible = False
  303.       OnClick = FlatButton3Click
  304.     end
  305.     object FlatButton6: TFlatButton
  306.       Left = 0
  307.       Top = 352
  308.       Width = 113
  309.       Height = 25
  310.       Hint = 'Je'#380'eli tu klikniesz zako'#324'czysz dzia'#322'anie programu...'
  311.       ColorHighLight = clSkyBlue
  312.       ColorShadow = clSkyBlue
  313.       Caption = 'Koniec'
  314.       TabOrder = 6
  315.       OnClick = FlatButton6Click
  316.     end
  317.   end
  318.   object Panel2: TPanel
  319.     Left = 224
  320.     Top = 48
  321.     Width = 313
  322.     Height = 329
  323.     BevelOuter = bvNone
  324.     Color = clWhite
  325.     TabOrder = 3
  326.     object Label4: TLabel
  327.       Left = 8
  328.       Top = 0
  329.       Width = 70
  330.       Height = 13
  331.       Caption = 'Sprawdzian:'
  332.       Font.Charset = DEFAULT_CHARSET
  333.       Font.Color = clWindowText
  334.       Font.Height = -11
  335.       Font.Name = 'MS Sans Serif'
  336.       Font.Style = [fsBold]
  337.       ParentFont = False
  338.     end
  339.     object Label5: TLabel
  340.       Left = 8
  341.       Top = 48
  342.       Width = 61
  343.       Height = 13
  344.       Caption = 'Kartk'#243'wki:'
  345.       Font.Charset = DEFAULT_CHARSET
  346.       Font.Color = clWindowText
  347.       Font.Height = -11
  348.       Font.Name = 'MS Sans Serif'
  349.       Font.Style = [fsBold]
  350.       ParentFont = False
  351.     end
  352.     object Label3: TLabel
  353.       Left = 138
  354.       Top = 0
  355.       Width = 30
  356.       Height = 13
  357.       Caption = 'Inne:'
  358.       Font.Charset = DEFAULT_CHARSET
  359.       Font.Color = clWindowText
  360.       Font.Height = -11
  361.       Font.Name = 'MS Sans Serif'
  362.       Font.Style = [fsBold]
  363.       ParentFont = False
  364.     end
  365.     object Panel4: TPanel
  366.       Left = 8
  367.       Top = 120
  368.       Width = 249
  369.       Height = 213
  370.       BevelOuter = bvNone
  371.       Color = clWindow
  372.       TabOrder = 0
  373.       object Label7: TLabel
  374.         Left = 32
  375.         Top = 0
  376.         Width = 62
  377.         Height = 13
  378.         Caption = 'Przedmioty'
  379.         Font.Charset = DEFAULT_CHARSET
  380.         Font.Color = clWindowText
  381.         Font.Height = -11
  382.         Font.Name = 'MS Sans Serif'
  383.         Font.Style = [fsBold]
  384.         ParentFont = False
  385.       end
  386.       object Label9: TLabel
  387.         Left = 168
  388.         Top = 0
  389.         Width = 37
  390.         Height = 13
  391.         Caption = 'Oceny'
  392.         Font.Charset = DEFAULT_CHARSET
  393.         Font.Color = clWindowText
  394.         Font.Height = -11
  395.         Font.Name = 'MS Sans Serif'
  396.         Font.Style = [fsBold]
  397.         ParentFont = False
  398.       end
  399.       object Edit2: TFlatEdit
  400.         Left = 0
  401.         Top = 44
  402.         Width = 121
  403.         Height = 19
  404.         Hint = 'Tutaj wpisz przedmiot...'
  405.         ColorFlat = 14872561
  406.         MaxLength = 20
  407.         TabOrder = 0
  408.       end
  409.       object Edit3: TFlatEdit
  410.         Left = 0
  411.         Top = 68
  412.         Width = 121
  413.         Height = 19
  414.         Hint = 'Tutaj wpisz przedmiot...'
  415.         ColorFlat = 14872561
  416.         MaxLength = 20
  417.         TabOrder = 1
  418.       end
  419.       object Edit4: TFlatEdit
  420.         Left = 0
  421.         Top = 92
  422.         Width = 121
  423.         Height = 19
  424.         Hint = 'Tutaj wpisz przedmiot...'
  425.         ColorFlat = 14872561
  426.         MaxLength = 20
  427.         TabOrder = 2
  428.       end
  429.       object Edit5: TFlatEdit
  430.         Left = 0
  431.         Top = 116
  432.         Width = 121
  433.         Height = 19
  434.         Hint = 'Tutaj wpisz przedmiot...'
  435.         ColorFlat = 14872561
  436.         MaxLength = 20
  437.         TabOrder = 3
  438.       end
  439.       object Edit6: TFlatEdit
  440.         Left = 0
  441.         Top = 140
  442.         Width = 121
  443.         Height = 19
  444.         Hint = 'Tutaj wpisz przedmiot...'
  445.         ColorFlat = 14872561
  446.         MaxLength = 20
  447.         TabOrder = 4
  448.       end
  449.       object Edit7: TFlatEdit
  450.         Left = 0
  451.         Top = 164
  452.         Width = 121
  453.         Height = 19
  454.         Hint = 'Tutaj wpisz przedmiot...'
  455.         ColorFlat = 14872561
  456.         MaxLength = 20
  457.         TabOrder = 5
  458.       end
  459.       object Edit8: TFlatEdit
  460.         Left = 0
  461.         Top = 188
  462.         Width = 121
  463.         Height = 19
  464.         Hint = 'Tutaj wpisz przedmiot...'
  465.         ColorFlat = 14872561
  466.         MaxLength = 20
  467.         TabOrder = 6
  468.       end
  469.       object edit9: TFlatEdit
  470.         Left = 128
  471.         Top = 20
  472.         Width = 121
  473.         Height = 19
  474.         Hint = 'Tutaj wpisz oceny...'
  475.         ColorFlat = 14872561
  476.         MaxLength = 20
  477.         PopupMenu = Lista_ocen
  478.         TabOrder = 7
  479.       end
  480.       object Edit10: TFlatEdit
  481.         Left = 128
  482.         Top = 44
  483.         Width = 121
  484.         Height = 19
  485.         Hint = 'Tutaj wpisz oceny...'
  486.         ColorFlat = 14872561
  487.         MaxLength = 20
  488.         PopupMenu = Lista_ocen
  489.         TabOrder = 8
  490.       end
  491.       object Edit11: TFlatEdit
  492.         Left = 128
  493.         Top = 68
  494.         Width = 121
  495.         Height = 19
  496.         Hint = 'Tutaj wpisz oceny...'
  497.         ColorFlat = 14872561
  498.         MaxLength = 20
  499.         PopupMenu = Lista_ocen
  500.         TabOrder = 9
  501.       end
  502.       object Edit12: TFlatEdit
  503.         Left = 128
  504.         Top = 92
  505.         Width = 121
  506.         Height = 19
  507.         Hint = 'Tutaj wpisz oceny...'
  508.         ColorFlat = 14872561
  509.         MaxLength = 20
  510.         PopupMenu = Lista_ocen
  511.         TabOrder = 10
  512.       end
  513.       object Edit13: TFlatEdit
  514.         Left = 128
  515.         Top = 116
  516.         Width = 121
  517.         Height = 19
  518.         Hint = 'Tutaj wpisz oceny...'
  519.         ColorFlat = 14872561
  520.         MaxLength = 20
  521.         PopupMenu = Lista_ocen
  522.         TabOrder = 11
  523.       end
  524.       object Edit14: TFlatEdit
  525.         Left = 128
  526.         Top = 140
  527.         Width = 121
  528.         Height = 19
  529.         Hint = 'Tutaj wpisz oceny...'
  530.         ColorFlat = 14872561
  531.         MaxLength = 20
  532.         PopupMenu = Lista_ocen
  533.         TabOrder = 12
  534.       end
  535.       object Edit15: TFlatEdit
  536.         Left = 128
  537.         Top = 164
  538.         Width = 121
  539.         Height = 19
  540.         Hint = 'Tutaj wpisz oceny...'
  541.         ColorFlat = 14872561
  542.         MaxLength = 20
  543.         PopupMenu = Lista_ocen
  544.         TabOrder = 13
  545.       end
  546.       object Edit16: TFlatEdit
  547.         Left = 128
  548.         Top = 188
  549.         Width = 121
  550.         Height = 19
  551.         Hint = 'Tutaj wpisz oceny...'
  552.         ColorFlat = 14872561
  553.         MaxLength = 20
  554.         PopupMenu = Lista_ocen
  555.         TabOrder = 14
  556.       end
  557.       object Edit1: TFlatEdit
  558.         Left = 0
  559.         Top = 20
  560.         Width = 121
  561.         Height = 19
  562.         Hint = 'Tutaj wpisz przedmiot...'
  563.         ColorFlat = 14872561
  564.         MaxLength = 20
  565.         TabOrder = 15
  566.       end
  567.     end
  568.     object RichEdit1: TFlatMemo
  569.       Left = 136
  570.       Top = 20
  571.       Width = 175
  572.       Height = 91
  573.       Hint = 
  574.         'Tutaj mo'#380'esz wpisywa'#263' inne notatki. Notatka mo'#380'e zajmowa'#263' maksym' +
  575.         'alnie 255 znak'#243'w.'
  576.       ColorFlat = 14872561
  577.       MaxLength = 255
  578.       ScrollBars = ssVertical
  579.       TabOrder = 1
  580.     end
  581.     object Combobox1: TFlatEdit
  582.       Left = 8
  583.       Top = 20
  584.       Width = 121
  585.       Height = 19
  586.       Hint = 'Tu wpisz nazw'#281' przedmiotu, z jakiego masz sprawdzian...'
  587.       ColorFlat = 14872561
  588.       MaxLength = 20
  589.       TabOrder = 2
  590.     end
  591.     object Combobox2: TFlatEdit
  592.       Left = 8
  593.       Top = 68
  594.       Width = 121
  595.       Height = 19
  596.       Hint = 'Tu wpisz nazw'#281' przedmiotu, z jakiego masz kartk'#243'wk'#281'...'
  597.       ColorFlat = 14872561
  598.       MaxLength = 20
  599.       TabOrder = 3
  600.     end
  601.     object Combobox3: TFlatEdit
  602.       Left = 8
  603.       Top = 92
  604.       Width = 121
  605.       Height = 19
  606.       Hint = 'Tu wpisz nazw'#281' przedmiotu, z jakiego masz kartk'#243'wk'#281'...'
  607.       ColorFlat = 14872561
  608.       MaxLength = 20
  609.       TabOrder = 4
  610.     end
  611.   end
  612.   object Timer1: TTimer
  613.     Interval = 800
  614.     OnTimer = Timer1Timer
  615.     Left = 72
  616.     Top = 344
  617.   end
  618.   object PrintDialog1: TPrintDialog
  619.     Left = 112
  620.     Top = 304
  621.   end
  622.   object FlatHint1: TFlatHint
  623.     ColorArrowBackground = clSkyBlue
  624.     Font.Charset = DEFAULT_CHARSET
  625.     Font.Color = clWindowText
  626.     Font.Height = -11
  627.     Font.Name = 'MS Sans Serif'
  628.     Font.Style = []
  629.     Left = 136
  630.     Top = 347
  631.   end
  632.   object menu: TPopupMenu
  633.     Left = 8
  634.     Top = 315
  635.     object Wytnij1: TMenuItem
  636.       Caption = 'Wytnij'
  637.       OnClick = Wytnij1Click
  638.     end
  639.     object Kopiuj1: TMenuItem
  640.       Caption = 'Kopiuj'
  641.       OnClick = Kopiuj1Click
  642.     end
  643.     object Wklej1: TMenuItem
  644.       Caption = 'Wklej'
  645.       OnClick = Wklej1Click
  646.     end
  647.     object N2: TMenuItem
  648.       Caption = '-'
  649.     end
  650.     object Zaznacz1: TMenuItem
  651.       Caption = 'Zaznacz wszystko'
  652.       OnClick = Zaznacz1Click
  653.     end
  654.   end
  655.   object Lista_ocen: TPopupMenu
  656.     Left = 40
  657.     Top = 347
  658.     object N11: TMenuItem
  659.       Caption = '1'
  660.       OnClick = N11Click
  661.     end
  662.     object N21: TMenuItem
  663.       Caption = '2'
  664.       OnClick = N21Click
  665.     end
  666.     object N31: TMenuItem
  667.       Caption = '3'
  668.       OnClick = N31Click
  669.     end
  670.     object N41: TMenuItem
  671.       Caption = '4'
  672.       OnClick = N41Click
  673.     end
  674.     object N51: TMenuItem
  675.       Caption = '5'
  676.       OnClick = N51Click
  677.     end
  678.     object N61: TMenuItem
  679.       Caption = '6'
  680.       OnClick = N61Click
  681.     end
  682.   end
  683.   object PopupMenu1: TPopupMenu
  684.     Left = 8
  685.     Top = 283
  686.     object ylkooceny1: TMenuItem
  687.       Caption = 'Tylko oceny'
  688.       OnClick = ylkooceny1Click
  689.     end
  690.     object Sprawdzianyikartkwki1: TMenuItem
  691.       Caption = 'Sprawdziany i kartk'#243'wki'
  692.       OnClick = Sprawdzianyikartkwki1Click
  693.     end
  694.     object Inne1: TMenuItem
  695.       Caption = 'Inne'
  696.       OnClick = Inne1Click
  697.     end
  698.     object Wszystko1: TMenuItem
  699.       Caption = 'Wszystko'
  700.       OnClick = Wszystko1Click
  701.     end
  702.   end
  703.   object PopupMenu2: TPopupMenu
  704.     Left = 8
  705.     Top = 345
  706.     object Utwrzkopi1: TMenuItem
  707.       Caption = 'Utw'#243'rz kopi'#281' zapasow'#261
  708.       OnClick = Utwrzkopi1Click
  709.     end
  710.     object Wczytajkopi1: TMenuItem
  711.       Caption = 'Wczytaj kopi'#281' zapasow'#261
  712.       OnClick = Wczytajkopi1Click
  713.     end
  714.   end
  715.   object MainMenu1: TMainMenu
  716.     Left = 40
  717.     Top = 288
  718.     object Plik1: TMenuItem
  719.       Caption = 'Plik'
  720.       object Zamknij1: TMenuItem
  721.         Caption = 'Koniec'
  722.         ShortCut = 16472
  723.         OnClick = Zamknij1Click
  724.       end
  725.     end
  726.     object Wpis1: TMenuItem
  727.       Caption = 'Wpis'
  728.       object drukuj1: TMenuItem
  729.         Caption = 'Drukuj wpis'
  730.         ShortCut = 16464
  731.         Visible = False
  732.         OnClick = drukuj1Click
  733.       end
  734.       object Najbliszysprawdzian1: TMenuItem
  735.         Caption = 'Najbli'#380'szy sprawdzian'
  736.         OnClick = Najbliszysprawdzian1Click
  737.       end
  738.       object Wyczy1: TMenuItem
  739.         Caption = 'Wyczy'#347#263' pola'
  740.         object ylkooceny2: TMenuItem
  741.           Caption = 'Tylko oceny'
  742.           OnClick = ylkooceny2Click
  743.         end
  744.         object Sprawdzianyikartkwki2: TMenuItem
  745.           Caption = 'Sprawdziany i kartk'#243'wki'
  746.           OnClick = Sprawdzianyikartkwki2Click
  747.         end
  748.         object Inne3: TMenuItem
  749.           Caption = 'Inne'
  750.           OnClick = Inne3Click
  751.         end
  752.         object Wszystko2: TMenuItem
  753.           Caption = 'Wszystko'
  754.           OnClick = Wszystko2Click
  755.         end
  756.       end
  757.       object aduj1: TMenuItem
  758.         Caption = #321'aduj przedmioty'
  759.         ShortCut = 16460
  760.         Visible = False
  761.         OnClick = aduj1Click
  762.       end
  763.       object N1: TMenuItem
  764.         Caption = '-'
  765.       end
  766.       object Utwrzkopizapasow1: TMenuItem
  767.         Caption = 'Utw'#243'rz kopi'#281' zapasow'#261
  768.         OnClick = Utwrzkopizapasow1Click
  769.       end
  770.       object Wczytajkopizapasow1: TMenuItem
  771.         Caption = 'Wczytaj kopi'#281' zapasow'#261
  772.         OnClick = Wczytajkopizapasow1Click
  773.       end
  774.     end
  775.     object Inne2: TMenuItem
  776.       Caption = 'Inne'
  777.       object Ustawplanlekcji1: TMenuItem
  778.         Caption = 'Ustaw plan lekcji'
  779.         OnClick = Ustawplanlekcji1Click
  780.       end
  781.     end
  782.     object Pomoc1: TMenuItem
  783.       Caption = 'Pomoc'
  784.       object Oprogramie1: TMenuItem
  785.         Caption = 'O programie'
  786.         ShortCut = 113
  787.         OnClick = Oprogramie1Click
  788.       end
  789.       object Pomoc2: TMenuItem
  790.         Caption = 'Pomoc'
  791.         ShortCut = 112
  792.         Visible = False
  793.         OnClick = Pomoc2Click
  794.       end
  795.       object StronaWWW1: TMenuItem
  796.         Caption = 'Strona WWW'
  797.         OnClick = StronaWWW1Click
  798.       end
  799.     end
  800.   end
  801. end
  802.