PC World Komputer 1998 July & August/Pcwk78a98.iso/E-MAIL/Chkml32/CHKML32.EXE/0/RCDATA/TFRMHEAD/TFRMHEAD.txt

Text File | 1998-03-26 | 5.1 KB | 223 lines

object frmHead: TfrmHead
  Tag = 1
  Left = 396
  Top = 102
  BorderIcons = [biMinimize]
  BorderStyle = bsSingle
  Caption = 'View Headers'
  ClientHeight = 410
  ClientWidth = 378
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Sockets1: TSockets
    Tag = 1
    Left = 1
    Top = 4
    Width = 0
    Height = 32
    MaximumReceiveLength = 16384
    IPAddr = 'mailbox.kalmar.net'
    Port = '110'
    Timeout = 10
    OnDataAvailable = DataAvailable
    OnSessionClosed = Sockets1SessionClosed
    OnSessionConnected = Sockets1SessionConnected
    OnErrorOccurred = ErrorOccurred
  end
  object lstHeaders: TListBox
    Left = 14
    Top = 12
    Width = 351
    Height = 353
    ExtendedSelect = False
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    ParentShowHint = False
    ShowHint = False
    Style = lbOwnerDrawFixed
    TabOrder = 0
    TabWidth = 40
    OnDblClick = lstHeadersDblClick
    OnDrawItem = lstHeadersDrawItem
    OnMouseUp = lstHeadersMouseUp
  end
  object cmdClose: TButton
    Left = 12
    Top = 378
    Width = 69
    Height = 25
    Hint = 'Minimizes CheckMail to the tasktray.'
    Caption = '&Close'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnClick = cmdCloseClick
  end
  object cmdStart: TButton
    Left = 216
    Top = 378
    Width = 149
    Height = 25
    Hint = 'Starts your default e-mail program.'
    Caption = '&Start default E-mail program'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnClick = cmdStartClick
  end
  object cmdCheckMail: TButton
    Left = 88
    Top = 378
    Width = 121
    Height = 25
    Hint = 'Checks for new mail instantly.'
    Caption = 'Check &Mailboxes'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnClick = cmdCheckMailClick
  end
  object edsClipBoard: TEdit
    Left = 241
    Top = 12
    Width = 121
    Height = 21
    TabOrder = 6
    Visible = False
  end
  object TaskIcon: TTaskIcon
    Left = 5
    Top = 37
    Width = 28
    Height = 28
    Hint = 'CheckMail32 is starting...'
    Enabled = False
    TaskIconID = 0
    OnClick = TaskIconClick
    OnDblClick = TaskIconDblClick
    OnRightClick = TaskIconRightClick
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 2000
    OnTimer = Timer1Timer
    Left = 5
    Top = 64
  end
  object PopupMenu1: TPopupMenu
    Left = 5
    Top = 92
    object Checkmailboxes: TMenuItem
      Caption = '&Check mailboxes'
      ShortCut = 0
      OnClick = CheckmailboxesClick
    end
    object ShowHeaders: TMenuItem
      Caption = 'Show &headers'
      ShortCut = 0
      OnClick = ShowHeadersClick
    end
    object Startemailprog: TMenuItem
      Caption = '&Start default email program'
      ShortCut = 0
      OnClick = StartemailprogClick
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Sendmailtoauthor: TMenuItem
      Caption = 'Send &mail to Andreas'
      ShortCut = 0
      OnClick = SendmailtoauthorClick
    end
    object OrderNow1: TMenuItem
      Caption = '&Order Now!'
      Default = True
      ShortCut = 0
      OnClick = OrderNow1Click
    end
    object Registrationinfo: TMenuItem
      Caption = '&Registration info'
      ShortCut = 0
      OnClick = RegistrationinfoClick
    end
    object AboutCheckMail1: TMenuItem
      Caption = '&About CheckMail'
      ShortCut = 0
      OnClick = AboutCheckMail1Click
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Sy1: TMenuItem
      Caption = 'Suspend &pager use'
      ShortCut = 0
      Visible = False
      OnClick = Sy1Click
    end
    object SuspendCheckMail1: TMenuItem
      Caption = 'S&uspend CheckMail'
      ShortCut = 0
      OnClick = SuspendCheckMail1Click
    end
    object CloseCheckMail: TMenuItem
      Caption = 'C&lose'
      ShortCut = 0
      OnClick = CloseCheckMailClick
    end
    object Properties: TMenuItem
      Caption = '&Properties'
      ShortCut = 0
      OnClick = PropertiesClick
    end
  end
  object PopupMenu2: TPopupMenu
    Left = 5
    Top = 120
    object Disabled: TMenuItem
      Caption = '&Mailbox disabled'
      ShortCut = 0
      OnClick = DisabledClick
    end
    object Deletemessage1: TMenuItem
      Caption = '&Delete message'
      ShortCut = 0
      OnClick = Deletemessage1Click
    end
    object StartEmailprogram1: TMenuItem
      Caption = '&Start E-mail program'
      ShortCut = 0
      OnClick = StartEmailprogram1Click
    end
    object Copythisline1: TMenuItem
      Caption = '&Copy this line'
      ShortCut = 0
      OnClick = Copythisline1Click
    end
    object Addthisaddresstotheremovelist1: TMenuItem
      Caption = '&Add address to remove list'
      ShortCut = 0
      OnClick = Addthisaddresstotheremovelist1Click
    end
    object Addaddresstoremovelist1: TMenuItem
      Caption = '&Add address to important list'
      ShortCut = 0
      OnClick = Addaddresstoremovelist1Click
    end
  end
end