PC World Komputer 1998 July & August/Pcwk78a98.iso/E-MAIL/Clmail32/CLMAIL32.EXE/0/RCDATA/TFRMMAIN/TFRMMAIN.txt

Text File | 1997-11-20 | 4KB | 195 lines

object frmMain: TfrmMain
  Left = 434
  Top = 114
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'ClickMail 32'
  ClientHeight = 355
  ClientWidth = 357
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label4: TLabel
    Left = 5
    Top = 32
    Width = 28
    Height = 13
    Caption = 'E-mail'
  end
  object Label1: TLabel
    Left = 5
    Top = 8
    Width = 28
    Height = 13
    Caption = 'Name'
  end
  object Label2: TLabel
    Left = 5
    Top = 56
    Width = 36
    Height = 13
    Caption = 'Subject'
  end
  object Label3: TLabel
    Left = 5
    Top = 80
    Width = 24
    Height = 13
    Caption = 'Body'
  end
  object lblStatus: TLabel
    Left = 69
    Top = 337
    Width = 45
    Height = 13
    Caption = 'Waiting...'
  end
  object cmdMake: TButton
    Left = 68
    Top = 308
    Width = 65
    Height = 21
    Caption = '&Send'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    OnClick = cmdMakeClick
  end
  object edsEmail: TEdit
    Left = 69
    Top = 27
    Width = 280
    Height = 21
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnChange = edsEmailChange
  end
  object edsMemo: TMemo
    Left = 68
    Top = 76
    Width = 281
    Height = 225
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnChange = edsMemoChange
  end
  object Sockets1: TSockets
    Left = 1
    Top = 105
    Width = 32
    Height = 32
    MaximumReceiveLength = 8192
    OnDataAvailable = DataAvailable
    OnSessionClosed = Sockets1SessionClosed
    OnErrorOccurred = ErrorOccurred
  end
  object edsSubj: TEdit
    Left = 69
    Top = 51
    Width = 280
    Height = 21
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnChange = edsSubjChange
  end
  object TaskIcon: TTaskIcon
    Left = 1
    Top = 141
    Width = 28
    Height = 28
    Hint = 'Click here to send an e-mail!'
    Enabled = False
    TaskIconID = 0
    OnClick = TaskIconClick
    OnRightClick = TaskIconRightClick
  end
  object edsName: TComboBox
    Left = 69
    Top = 3
    Width = 279
    Height = 21
    ItemHeight = 13
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnChange = edsNameChange
    OnClick = edsNameClick
  end
  object cmdAdd: TButton
    Left = 140
    Top = 308
    Width = 65
    Height = 21
    Caption = '&Add'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
    OnClick = cmdAddClick
  end
  object cmdDel: TButton
    Left = 212
    Top = 308
    Width = 65
    Height = 21
    Caption = '&Delete'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 6
    OnClick = cmdDelClick
  end
  object cmdMin: TButton
    Left = 284
    Top = 308
    Width = 65
    Height = 21
    Caption = '&Close'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 7
    OnClick = cmdMinClick
  end
  object PopupMenu1: TPopupMenu
    Left = 3
    Top = 192
    object ShowQuickSend1: TMenuItem
      Caption = '&Show Quick Send'
      ShortCut = 0
      OnClick = ShowQuickSend1Click
    end
    object AboutQuickMail1: TMenuItem
      Caption = '&About ClickMail'
      ShortCut = 0
      OnClick = AboutQuickMail1Click
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Properties1: TMenuItem
      Caption = '&Properties'
      ShortCut = 0
      OnClick = Properties1Click
    end
    object Close1: TMenuItem
      Caption = '&Close'
      Default = True
      ShortCut = 0
      OnClick = Close1Click
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 60000
    OnTimer = Timer1Timer
    Left = 4
    Top = 235
  end
end