usendemaiconstructorform.dfm

Delphi函数工厂。。。。。。。。。。。。。

inherited SendEmaiConstructorForm: TSendEmaiConstructorForm
  Left = 417
  Top = 284
  BorderIcons = [biSystemMenu, biMinimize]
  ClientHeight = 347
  ClientWidth = 464
  OldCreateOrder = True
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 12
  inherited btnClose: TButton
    Left = 384
    Top = 319
  end
  inherited btnHelp: TButton
    Top = 319
  end
  object btnCopy: TButton
    Left = 306
    Top = 319
    Width = 75
    Height = 23
    Anchors = [akRight, akBottom]
    Caption = #22797#21046'(&C)'
    TabOrder = 3
    OnClick = btnCopyClick
  end
  object PageControl1: TPageControl
    Left = 5
    Top = 9
    Width = 452
    Height = 304
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 2
    object TabSheet1: TTabSheet
      Caption = #21457#37038#20214#20989#25968
      object Label3: TLabel
        Left = 0
        Top = 256
        Width = 81
        Height = 42
        AutoSize = False
        OnMouseMove = Label3MouseMove
      end
      object lblPreview: TLabel
        Left = 9
        Top = 260
        Width = 48
        Height = 12
        Cursor = crHandPoint
        Caption = #28857#20987#39044#35272
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsUnderline]
        ParentFont = False
        OnClick = lblPreviewClick
        OnMouseMove = lblPreviewMouseMove
      end
      object Label5: TLabel
        Left = 254
        Top = 260
        Width = 198
        Height = 12
        Caption = #27880#24847': '#35831#22312'USES'#37096#20998#21152#19978'ShellApi.  '
      end
      object GroupBox1: TGroupBox
        Left = 8
        Top = 0
        Width = 433
        Height = 182
        TabOrder = 0
        object Label1: TLabel
          Left = 6
          Top = 57
          Width = 42
          Height = 12
          Caption = #25220#36865':  '
        end
        object Label2: TLabel
          Left = 6
          Top = 99
          Width = 36
          Height = 12
          Caption = #20027#39064': '
        end
        object lblMessageMB: TLabel
          Left = 6
          Top = 15
          Width = 54
          Height = 12
          Caption = #25910#20214#20154':  '
        end
        object Label4: TLabel
          Left = 6
          Top = 139
          Width = 60
          Height = 12
          Caption = #26174#31034#26041#24335': '
        end
        object Label6: TLabel
          Left = 175
          Top = 15
          Width = 42
          Height = 12
          Caption = #20869#23481':  '
        end
        object Bevel1: TBevel
          Left = 168
          Top = 11
          Width = 2
          Height = 165
        end
        object edtAddressee: TEdit
          Left = 6
          Top = 31
          Width = 156
          Height = 20
          TabOrder = 0
          OnChange = edtAddresseeChange
        end
        object edtAnotherAddressee: TEdit
          Left = 6
          Top = 73
          Width = 156
          Height = 20
          TabOrder = 1
          OnChange = edtAnotherAddresseeChange
        end
        object edtSubject: TEdit
          Left = 6
          Top = 114
          Width = 156
          Height = 20
          TabOrder = 2
          OnChange = edtAnotherAddresseeChange
        end
        object cbShowCmd: TComboBox
          Left = 7
          Top = 155
          Width = 154
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          ItemIndex = 5
          TabOrder = 3
          Text = 'SW_SHOW'
          OnChange = edtAnotherAddresseeChange
          Items.Strings = (
            'SW_HIDE'
            'SW_SHOWNORMAL'
            'SW_SHOWMINIMIZED'
            'SW_SHOWMAXIMIZED'
            'SW_SHOWNOACTIVATE'
            'SW_SHOW'
            'SW_MINIMIZE'
            'SW_SHOWMINNOACTIVE'
            'SW_SHOWNA'
            'SW_RESTORE'
            'SW_SHOWDEFAULT')
        end
        object mmContent: TMemo
          Left = 175
          Top = 32
          Width = 250
          Height = 143
          ScrollBars = ssBoth
          TabOrder = 4
          OnChange = edtAnotherAddresseeChange
        end
      end
      object mmCodePre: TMemo
        Left = 8
        Top = 187
        Width = 433
        Height = 65
        ScrollBars = ssVertical
        TabOrder = 1
      end
    end
  end
end