PC World Komputer 1998 July & August/Pcwk78a98.iso/E-MAIL/Emailnot/_SETUP.1/CIECHECK.exe/0/RCDATA/TLOCALMAILFORM/TLOCALMAILFORM.txt

Text File | 1998-05-06 | 4KB | 170 lines

object LocalMailForm: TLocalMailForm
  Left = 13
  Top = 104
  Width = 602
  Height = 293
  HelpContext = 820
  Caption = 'LocalMailForm'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnResize = FormResize
  PixelsPerInch = 120
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 594
    Height = 28
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 239
      Top = 7
      Width = 161
      Height = 16
      Alignment = taCenter
      Caption = 'You have 1 new E-mail  !'
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 219
    Width = 594
    Height = 41
    Align = alBottom
    BevelOuter = bvLowered
    TabOrder = 1
    object Button1: TButton
      Left = 15
      Top = 8
      Width = 69
      Height = 27
      Caption = 'View Mail'
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button3: TButton
      Left = 84
      Top = 8
      Width = 82
      Height = 27
      Caption = 'Delete Mail'
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button3Click
    end
    object ProgressBar1: TProgressBar
      Left = 434
      Top = 10
      Width = 143
      Height = 21
      Min = 0
      Max = 100
      TabOrder = 2
      Visible = False
    end
    object Button2: TButton
      Left = 166
      Top = 8
      Width = 125
      Height = 27
      Caption = 'Add to Address Book'
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = Button2Click
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 28
    Width = 594
    Height = 191
    Align = alClient
    Caption = 'Panel4'
    TabOrder = 2
    object StringGrid1: TSortGrid
      Left = 1
      Top = 1
      Width = 592
      Height = 189
      Hint = 'Click right button to activate menu'
      Align = alClient
      ColCount = 4
      DefaultRowHeight = 18
      FixedCols = 0
      RowCount = 2
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
      ParentFont = False
      ParentShowHint = False
      PopupMenu = PopupMenu1
      ShowHint = True
      TabOrder = 0
      OnDblClick = StringGrid1DblClick
      OnMouseUp = StringGrid1MouseUp
      MultiSelect = True
      OnEndSort = StringGrid1EndSort
      ColWidths = (
        159
        190
        160
        74)
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 114
    Top = 9
    object ViewMail1: TMenuItem
      Caption = 'View Mail'
      HelpContext = 1110
      ShortCut = 0
      OnClick = ViewMail1Click
    end
    object DeleteMail1: TMenuItem
      Caption = 'Delete Mail'
      HelpContext = 1120
      ShortCut = 0
      OnClick = DeleteMail1Click
    end
    object AddtoAddressBook1: TMenuItem
      Caption = 'Add to Address Book'
      HelpContext = 1130
      ShortCut = 0
      OnClick = AddtoAddressBook1Click
    end
    object Setconfirmtodeletemail1: TMenuItem
      Caption = 'Set confirm to delete'
      HelpContext = 1140
      ShortCut = 0
      OnClick = Setconfirmtodeletemail1Click
    end
  end
end