gzdx.dfm

人事系统.合同,一些基本的人事信息,培训管理

object frm_gzdx: Tfrm_gzdx
  Left = 177
  Top = 157
  Width = 482
  Height = 380
  Caption = '工资短信'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object panel1: TPanel
    Left = 0
    Top = 0
    Width = 474
    Height = 353
    Align = alClient
    Caption = 'panel1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Bevel2: TBevel
      Left = 8
      Top = 42
      Width = 457
      Height = 49
      Shape = bsFrame
      Style = bsRaised
    end
    object Label1: TLabel
      Left = 24
      Top = 58
      Width = 90
      Height = 15
      Caption = '短信中心号码'
    end
    object Label2: TLabel
      Left = 248
      Top = 58
      Width = 75
      Height = 15
      Caption = '接收方号码'
    end
    object Bevel1: TBevel
      Left = 8
      Top = 89
      Width = 113
      Height = 247
      Shape = bsFrame
      Style = bsRaised
    end
    object Bevel3: TBevel
      Left = 119
      Top = 89
      Width = 347
      Height = 247
      Shape = bsFrame
      Style = bsRaised
    end
    object Bevel4: TBevel
      Left = 4
      Top = 0
      Width = 466
      Height = 41
      Style = bsRaised
    end
    object Label3: TLabel
      Left = 172
      Top = 6
      Width = 101
      Height = 24
      Caption = '工资短信'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clInfoBk
      Font.Height = -24
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label4: TLabel
      Left = 171
      Top = 6
      Width = 101
      Height = 24
      Caption = '工资短信'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -24
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label5: TLabel
      Left = 16
      Top = 208
      Width = 97
      Height = 125
      AutoSize = False
      Caption = 
        '  首先保证手机连在串口上，同时本月工资已出盘，点击连接钮，成功后' +
        ',点击工资短信,系统会将本月的工资信息发出。若要发其它信息输入接收' +
        '方电话和内容后点信息发送即可'
      Font.Charset = GB2312_CHARSET
      Font.Color = clGreen
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object smc: TEdit
      Left = 120
      Top = 54
      Width = 105
      Height = 23
      TabOrder = 0
      Text = '13800733500'
    end
    object phone: TEdit
      Left = 336
      Top = 54
      Width = 113
      Height = 23
      TabOrder = 1
      Text = '13800733500'
    end
    object Button1: TButton
      Left = 28
      Top = 99
      Width = 75
      Height = 25
      Caption = '连   接'
      TabOrder = 2
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 28
      Top = 134
      Width = 75
      Height = 25
      Caption = '工资短信'
      TabOrder = 3
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 28
      Top = 171
      Width = 75
      Height = 25
      Caption = '信息发送'
      TabOrder = 4
      OnClick = Button3Click
    end
    object Memo1: TMemo
      Left = 128
      Top = 104
      Width = 329
      Height = 95
      Lines.Strings = (
        '请于某月某日后到某银行领取')
      TabOrder = 5
    end
    object Memo2: TMemo
      Left = 128
      Top = 222
      Width = 329
      Height = 97
      TabOrder = 6
    end
  end
  object Query_gzdx: TQuery
    DatabaseName = 'rsgzgl'
    Left = 64
    Top = 24
  end
end