Hot Shareware 35/hot35.iso/ficheros/9UTI/MEMOPAD.ZIP/_SETUP.1/MemoPadPro.exe/0/RCDATA/TMAIN/TMAIN.txt

Text File | 1998-05-28 | 15KB | 971 lines

object main: Tmain
  Left = 353
  Top = 141
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'MemoPad Pro  '
  ClientHeight = 307
  ClientWidth = 240
  Color = 14547961
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 288
    Width = 225
    Height = 13
    Alignment = taCenter
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 240
    Width = 225
    Height = 14
    Alignment = taCenter
    AutoSize = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 8
    Top = 240
    Width = 225
    Height = 13
    Alignment = taCenter
    AutoSize = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Bevel1: TBevel
    Left = 8
    Top = 0
    Width = 225
    Height = 49
    Shape = bsFrame
  end
  object RadioButton2: TRadioButton
    Left = 16
    Top = 8
    Width = 57
    Height = 17
    Caption = 'Public'
    Color = 14547961
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    TabOrder = 4
    OnClick = RadioButton2Click
  end
  object combobox1: TComboBox
    Left = 80
    Top = 8
    Width = 97
    Height = 27
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Comic Sans MS'
    Font.Style = [fsBold]
    ItemHeight = 19
    Items.Strings = (
      '')
    ParentFont = False
    TabOrder = 1
    Text = 'mainboard'
    OnKeyPress = combobox1KeyPress
  end
  object Memo1: TMemo
    Left = 8
    Top = 48
    Width = 225
    Height = 193
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 0
    WantTabs = True
    OnKeyPress = Memo1KeyPress
  end
  object Button5: TButton
    Left = 184
    Top = 8
    Width = 41
    Height = 25
    Caption = 'Go!'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = Button5Click
  end
  object RadioButton1: TRadioButton
    Left = 16
    Top = 24
    Width = 57
    Height = 17
    Caption = 'Private'
    Color = 14547961
    Ctl3D = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 3
    OnClick = RadioButton1Click
  end
  object Memo2: TMemo
    Left = 488
    Top = 16
    Width = 113
    Height = 257
    Lines.Strings = (
      '')
    TabOrder = 5
  end
  object ListBox2: TListBox
    Left = 400
    Top = 128
    Width = 65
    Height = 25
    ItemHeight = 13
    Items.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 6
    Visible = False
  end
  object Edit1: TEdit
    Left = 400
    Top = 176
    Width = 57
    Height = 21
    TabOrder = 7
    Visible = False
  end
  object ListBox3: TListBox
    Left = 400
    Top = 96
    Width = 65
    Height = 25
    ItemHeight = 13
    Items.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 8
    Visible = False
  end
  object ListBox4: TListBox
    Left = 400
    Top = 72
    Width = 65
    Height = 17
    ItemHeight = 13
    Items.Strings = (
      '0'
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 9
    Visible = False
  end
  object ListBox5: TListBox
    Left = 400
    Top = 200
    Width = 41
    Height = 25
    ItemHeight = 13
    Items.Strings = (
      '')
    TabOrder = 10
    Visible = False
  end
  object Memo3: TMemo
    Left = 400
    Top = 264
    Width = 49
    Height = 41
    Lines.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 11
    Visible = False
  end
  object logradio: TCheckBox
    Left = 400
    Top = 224
    Width = 41
    Height = 25
    Caption = 'logradio'
    State = cbChecked
    TabOrder = 12
    Visible = False
  end
  object ListBox6: TListBox
    Left = 400
    Top = 152
    Width = 25
    Height = 17
    ItemHeight = 13
    Items.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 13
    Visible = False
  end
  object ListBoxco: TListBox
    Left = 400
    Top = 48
    Width = 65
    Height = 17
    ItemHeight = 13
    Items.Strings = (
      ''
      ''
      '')
    TabOrder = 14
    Visible = False
  end
  object ListBox7: TListBox
    Left = 400
    Top = 24
    Width = 41
    Height = 17
    ItemHeight = 13
    Items.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 15
    Visible = False
  end
  object Memo4: TMemo
    Left = 552
    Top = 280
    Width = 17
    Height = 33
    Lines.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 16
    WordWrap = False
  end
  object Memo5: TMemo
    Left = 520
    Top = 280
    Width = 17
    Height = 33
    Lines.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 17
    WordWrap = False
  end
  object Memo6: TMemo
    Left = 488
    Top = 280
    Width = 17
    Height = 33
    Lines.Strings = (
      'Quit trying to mess with this man!'
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 18
    WordWrap = False
  end
  object ListBox8: TListBox
    Left = 400
    Top = 8
    Width = 49
    Height = 17
    ItemHeight = 13
    Items.Strings = (
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 19
    Visible = False
  end
  object ListBox1: TListBox
    Left = 496
    Top = 320
    Width = 65
    Height = 17
    ItemHeight = 13
    Items.Strings = (
      'pub')
    TabOrder = 20
  end
  object Checkprivate: TButton
    Left = 304
    Top = 312
    Width = 25
    Height = 17
    Caption = 'Checkprivate'
    TabOrder = 21
    Visible = False
  end
  object Button7: TButton
    Left = 8
    Top = 258
    Width = 57
    Height = 25
    Caption = 'Post It!'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 22
    OnClick = Button7Click
  end
  object Button6: TButton
    Left = 185
    Top = 258
    Width = 48
    Height = 25
    Caption = 'Clear'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 23
    OnClick = Button2Click
  end
  object Button4: TButton
    Left = 137
    Top = 258
    Width = 48
    Height = 25
    Caption = 'Break'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 24
    OnClick = Button6Click
  end
  object Button2: TButton
    Left = 65
    Top = 258
    Width = 72
    Height = 25
    Caption = 'Time/Date'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 25
    OnClick = Button4Click
  end
  object Button3: TButton
    Left = 112
    Top = 368
    Width = 65
    Height = 17
    Caption = 'Main Board'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 26
    Visible = False
    OnClick = Button3Click
  end
  object ListBox9: TListBox
    Left = 328
    Top = 152
    Width = 33
    Height = 9
    ItemHeight = 13
    TabOrder = 27
    Visible = False
  end
  object ListBox10: TListBox
    Left = 336
    Top = 176
    Width = 25
    Height = 9
    ItemHeight = 13
    TabOrder = 28
    Visible = False
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Device = fdBoth
    MinFontSize = 0
    MaxFontSize = 0
    Options = [fdEffects, fdApplyButton]
    Left = 360
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Options = [cdAnyColor]
    Left = 328
  end
  object MainMenu1: TMainMenu
    Left = 328
    Top = 32
    object File1: TMenuItem
      Caption = 'File'
      object Startupoptions1: TMenuItem
        Caption = 'Startup options'
        OnClick = Startupoptions1Click
      end
      object Visual1: TMenuItem
        Caption = 'Visual'
        object ChangeBGColor1: TMenuItem
          Caption = 'Change BG Color'
          OnClick = ChangeBGColor1Click
        end
        object ChangeFont1: TMenuItem
          Caption = 'Change Font'
          OnClick = ChangeFont1Click
        end
        object Compactwindow1: TMenuItem
          Caption = 'Compact main window'
          OnClick = Compactwindow1Click
        end
      end
      object Exit1: TMenuItem
        Caption = 'Exit'
        OnClick = Exit1Click
      end
    end
    object Msgs1: TMenuItem
      Caption = 'Msg'#39's'
      object Mainboard1: TMenuItem
        Caption = 'Go to Mainboard'
        OnClick = Mainboard1Click
      end
      object NetworkMemo1: TMenuItem
        Caption = 'Network Memo'
        OnClick = NetworkMemo1Click
      end
      object TimeDateStamp1: TMenuItem
        Caption = 'Time/Date Stamp'
        OnClick = TimeDateStamp1Click
      end
      object Clear1: TMenuItem
        Caption = 'Clear'
        OnClick = Clear1Click
      end
    end
    object User1: TMenuItem
      Caption = 'Users'
      object DeleteUser1: TMenuItem
        Caption = 'Add User'
        OnClick = DeleteUser1Click
      end
      object DeleteUser2: TMenuItem
        Caption = 'Delete User'
        OnClick = DeleteUser2Click
      end
      object Changethemasterpassword1: TMenuItem
        Caption = 'Change the master password'
        OnClick = Changethemasterpassword1Click
      end
      object ReadPrivateMessages1: TMenuItem
        Caption = 'Read Private Messages'
        OnClick = ReadPrivateMessages1Click
      end
    end
    object Logging1: TMenuItem
      Caption = 'Log'
      object Activate1: TMenuItem
        Caption = 'Activate'
        OnClick = Activate1Click
      end
      object Deactivate1: TMenuItem
        Caption = 'Deactivate'
        OnClick = Deactivate1Click
      end
      object ViewLog1: TMenuItem
        Caption = 'View Log'
        OnClick = ViewLog1Click
      end
    end
    object Reminder1: TMenuItem
      Caption = 'Reminder'
      object Schedulereminder1: TMenuItem
        Caption = 'Schedule reminder'
        OnClick = Schedulereminder1Click
      end
      object Organizere1: TMenuItem
        Caption = 'Organize reminders'
        OnClick = Organizere1Click
      end
      object Todolist1: TMenuItem
        Caption = 'To Do list'
        OnClick = Todolist1Click
      end
    end
    object Help1: TMenuItem
      Caption = 'Help '
      object About1: TMenuItem
        Caption = 'About'
        OnClick = About1Click
      end
      object Help2: TMenuItem
        Caption = 'Help'
        OnClick = Help2Click
      end
      object Register1: TMenuItem
        Caption = 'Register'
        OnClick = Register1Click
      end
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 360
    Top = 88
  end
end