object Form1: TForm1 Left = 313 Top = 224 Width = 833 Height = 675 Caption = 'M'#243'j notatnik' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False OnClose = FormClose PixelsPerInch = 120 TextHeight = 16 object tresc: TMemo Left = 0 Top = 0 Width = 815 Height = 605 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -23 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentFont = False ScrollBars = ssVertical TabOrder = 0 OnKeyDown = trescKeyDown end object MainMenu1: TMainMenu Left = 424 Top = 104 object Plik1: TMenuItem Caption = '&Plik' object Nowy1: TMenuItem Caption = '&Nowy Ctrl+N' OnClick = Nowy1Click end object Otwrz1: TMenuItem Caption = '-' end object Otwrz2: TMenuItem Caption = '&Otw'#243'rz Ctrl+O' OnClick = Otwrz2Click end object Zapisz1: TMenuItem Caption = 'Za&pisz Ctrl+S' OnClick = Zapisz1Click end object Zapiszjako1: TMenuItem Caption = 'Zapi&sz jako' OnClick = Zapiszjako1Click end object N1: TMenuItem Caption = '-' end object Zakocz1: TMenuItem Caption = 'Zako&'#324'cz' OnClick = Zakocz1Click end end object Edycja1: TMenuItem Caption = '&Edycja' object Wytnijcrtx1: TMenuItem Caption = 'W&ytnij Ctrt+X' OnClick = Wytnijcrtx1Click end object Kopiiuj1: TMenuItem Caption = 'Kop&iuj Ctrl+C ' OnClick = Kopiiuj1Click end object WklejCtrlV1: TMenuItem Caption = 'Wkl&ej Ctrl+V' OnClick = WklejCtrlV1Click end end object Format1: TMenuItem Caption = '&Format' object Zawijaniewierszy1: TMenuItem Caption = 'Z&awijanie wierszy' Checked = True OnClick = Zawijaniewierszy1Click end object Ccionka1: TMenuItem Caption = 'C&zcionka' OnClick = Ccionka1Click end end object Pomoc1: TMenuItem Caption = '&Pomoc' object Informacje1: TMenuItem Caption = 'In&formacje' object Oprogramie1: TMenuItem Caption = 'O &programie' OnClick = Oprogramie1Click end end object WujekGoogle1: TMenuItem Caption = 'W&ujek Google' OnClick = WujekGoogle1Click end end object Kalkulator1: TMenuItem Caption = '&Kalkulator' OnClick = Kalkulator1Click end object Zegar1: TMenuItem Caption = ' ' end end object OpenDialog1: TOpenDialog Filter = 'Pliki tekstowe (txt)|*.txt|Wszystkie pliki|*.*' Left = 368 Top = 112 end object SaveDialog1: TSaveDialog Filter = 'Plik tekstowy (txt)|*txt|Wszystkie pliki|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing] Left = 320 Top = 120 end object FontDialog1: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 264 Top = 120 end end