main.dfm

微雨邮件群发系统 微雨邮件群发系统 微雨邮件群发系统

object frmMain: TfrmMain
  Left = 198
  Top = 146
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #24494#38632#37038#20214#32676#21457'  V1.0  http://www.codechina.net'
  ClientHeight = 321
  ClientWidth = 520
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010002002020100000000000E80200002600000010101000000000002801
    00000E0300002800000020000000400000000100040000000000800200000000
    0000000000000000000000000000000000000000800000800000008080008000
    0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
    0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000007777777777777777777777777000000
    07000000000000000000000000000000070FFFFFFFFFFFFFFFFFFFFFFFF00000
    070FFFFFFFFFFFFFFFFFFFFFFFF00000070FFFFFFFFFF87FFFFFFFFFFFF08888
    88888F8FFF8777FF777FFFFFFFF00000000000FFFFFFFFFFFFFFFFFFFFF00000
    070FFFFFFF877777777FFFFFFFF0008888888FFFFFFFFFFFFFFFFFFFFFF00000
    000000FFFF877777777FFFFFFFF00000070FFFFFFFFFFFFFFFFFFFFFFFF00888
    88888888F888FFFFFFFFFFFFFFF00000000000000F000FFFFFF1F1F191F00000
    070FFFFFFFFFFFFFFFFFFFF979F08888880F7878FFFFFFFFFFF1F1F191F00000
    000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFF8000003F8000000F8000000F8000000F800
    00000000000000000000F8000000C0000000C0000000F8000000800000008000
    0000F80000000000000000000000FC000000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFF280000001000000020000000010004000000
    0000C00000000000000000000000000000000000000000000000000080000080
    00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
    000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000
    0000000000000000000000000000007777777777777000700000000000008888
    8FFFFFFFFFF0000008F77777FFF0888888888FFFFFF0000000000777FFF00888
    88FFFFFFFFF0000000FFFFF181100000FFFFFFF1811000000000000000000000
    00000000000000000000000000000000000000000000FFFF0000FFFF0000FFFF
    0000C0010000C000000000000000000000000000000000000000800000008000
    0000E0000000E0000000FFFF0000FFFF0000FFFF0000}
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 505
    Height = 297
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #21457#36865#37038#20214
      object Gauge: TGauge
        Left = 16
        Top = 248
        Width = 465
        Height = 16
        ForeColor = clBlue
        Progress = 0
        Visible = False
      end
      object Label1: TLabel
        Left = 16
        Top = 224
        Width = 60
        Height = 13
        Caption = #37038#20214#24635#25968#65306
      end
      object Label7: TLabel
        Left = 120
        Top = 224
        Width = 36
        Height = 13
        Caption = #25104#21151#65306
      end
      object Label8: TLabel
        Left = 200
        Top = 224
        Width = 36
        Height = 13
        Caption = #22833#36133#65306
      end
      object lblMailNum: TLabel
        Left = 72
        Top = 224
        Width = 49
        Height = 13
        AutoSize = False
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblWinNum: TLabel
        Left = 152
        Top = 224
        Width = 49
        Height = 13
        AutoSize = False
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblFailNum: TLabel
        Left = 232
        Top = 224
        Width = 48
        Height = 13
        AutoSize = False
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Button1: TButton
        Left = 288
        Top = 218
        Width = 65
        Height = 26
        Hint = #25171#24320#37038#20214#21015#34920#65292#35201#27714#25991#26412#25991#20214#65292#27599#37038#20214#22320#22336#20026#19968#34892
        Caption = #25171#24320#21015#34920
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = Button1Click
      end
      object btnSend: TButton
        Left = 360
        Top = 218
        Width = 57
        Height = 26
        Hint = #21457#36865
        Caption = #21457'  '#36865
        Enabled = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = btnSendClick
      end
      object Minfo: TMemo
        Left = 200
        Top = 16
        Width = 297
        Height = 89
        Lines.Strings = (
          '=============================================='
          #24494#38632#37038#20214#32676#21457'   '#20316#32773#65306#36763#20339#38632
          #20195#30721#20013#22269#32593' http://www.codechina.net'
          #27492#20449#24687#30001#36719#20214#20351#29992#32773#21457#20986#19982#26412#36719#20214#20316#32773#26080#20851#65281)
        TabOrder = 2
        Visible = False
      end
      object StringGrid: TStringGrid
        Left = 0
        Top = 8
        Width = 497
        Height = 204
        ColCount = 3
        Ctl3D = True
        FixedCols = 0
        RowCount = 8
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
        ParentCtl3D = False
        ScrollBars = ssVertical
        TabOrder = 3
      end
      object butClose: TButton
        Left = 424
        Top = 218
        Width = 65
        Height = 25
        Hint = #36864#20986
        Caption = #36864'  '#20986
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnClick = butCloseClick
      end
    end
    object TabSheet2: TTabSheet
      Caption = #21457#36865#20869#23481
      ImageIndex = 1
      object Label4: TLabel
        Left = 15
        Top = 68
        Width = 74
        Height = 13
        AutoSize = False
        Caption = #37038#20214#27491#25991#65306
      end
      object Label5: TLabel
        Left = 15
        Top = 23
        Width = 50
        Height = 13
        AutoSize = False
        Caption = #21457#20214#20154#65306
      end
      object Label6: TLabel
        Left = 14
        Top = 45
        Width = 48
        Height = 13
        Caption = #20027'    '#39064#65306
      end
      object mmContent: TMemo
        Left = 16
        Top = 86
        Width = 473
        Height = 161
        ScrollBars = ssVertical
        TabOrder = 0
      end
      object edtFrom: TEdit
        Left = 61
        Top = 18
        Width = 152
        Height = 21
        TabOrder = 1
      end
      object edtSubject: TEdit
        Left = 61
        Top = 42
        Width = 356
        Height = 21
        TabOrder = 2
      end
    end
    object TabSheet3: TTabSheet
      Caption = #31995#32479#35774#32622
      ImageIndex = 2
      object GroupBox1: TGroupBox