PC User 1998 October/Image.iso/educat/pencils1/_SETUP.1/noteload.exe/0/RCDATA/TFORM2/TFORM2.txt

Text File | 1998-06-29 | 3.4 KB | 154 lines

object Form2: TForm2
  Left = 724
  Top = 146
  Width = 336
  Height = 193
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSizeToolWin
  Caption = 'Sticky Notes'
  Color = clYellow
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poDefault
  Visible = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Edit1: TEdit
    Left = 144
    Top = 24
    Width = 1
    Height = 21
    AutoSelect = False
    BorderStyle = bsNone
    TabOrder = 1
    Text = 'Edit1'
  end
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 328
    Height = 166
    Align = alClient
    Color = clYellow
    MaxLength = 5000
    PopupMenu = PopupMenu1
    TabOrder = 0
    OnChange = Memo1Change
    OnClick = Memo1Click
    OnDblClick = Memo1DblClick
    OnKeyPress = Memo1KeyPress
  end
  object PopupMenu1: TPopupMenu
    Left = 48
    Top = 72
    object ThisNote1: TMenuItem
      Caption = '&Note'
      ShortCut = 0
      object HideNote1: TMenuItem
        Caption = '&Hide Note'
        ShortCut = 16456
        OnClick = HideNote1Click
      end
      object Closeinstance1: TMenuItem
        Caption = '&Close Note'
        ShortCut = 16499
        OnClick = Closeinstance1Click
      end
      object DeleteNote1: TMenuItem
        Caption = '&Delete Note'
        ShortCut = 16452
        OnClick = DeleteNote1Click
      end
      object Locke1: TMenuItem
        Caption = '&Locked'
        ShortCut = 16460
        OnClick = Locke1Click
      end
      object Properties1: TMenuItem
        Caption = '&Properties'
        ShortCut = 113
        OnClick = Properties1Click
      end
    end
    object Edit2: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object Cut1: TMenuItem
        Caption = 'C&ut'
        ShortCut = 16472
        OnClick = Cut1Click
      end
      object Copy1: TMenuItem
        Caption = '&Copy'
        ShortCut = 16451
        OnClick = Copy1Click
      end
      object Paste1: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
        OnClick = Paste1Click
      end
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object File1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object LoadText1: TMenuItem
        Caption = '&Append Text'
        ShortCut = 16463
        OnClick = LoadText1Click
      end
      object SaveText1: TMenuItem
        Caption = '&Save Text'
        ShortCut = 16467
        OnClick = SaveText1Click
      end
    end
    object N3: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Help1: TMenuItem
      Caption = '&Help'
      ShortCut = 112
      OnClick = Help1Click
    end
    object AboutStickyNotes1: TMenuItem
      Caption = '&About Sticky Notes'
      ShortCut = 121
      OnClick = AboutStickyNotes1Click
    end
  end
  object Timer1: TTimer
    Interval = 50
    Left = 177
    Top = 64
  end
  object Timer2: TTimer
    Interval = 10000
    OnTimer = Timer2Timer
    Left = 16
    Top = 8
  end
  object OpenDialog1: TOpenDialog
    FileEditStyle = fsEdit
    Filter = 'Text files (*.txt)|*.txt|All files (*.doc)|*.*'
    Options = [ofHideReadOnly, ofFileMustExist]
    Left = 104
    Top = 56
  end
  object SaveDialog1: TSaveDialog
    FileEditStyle = fsEdit
    Filter = 'Text files (*.txt)|*.txt|All files (*.*)|*.*'
    Options = [ofHideReadOnly]
    Left = 104
    Top = 96
  end
end