www.pudn.com > ¶ÌÐÅ·¢ËÍ2.0.rar > smsform.dfm
object smsfrm: Tsmsfrm
Left = 142
Top = 55
AlphaBlendValue = 100
AutoScroll = False
Caption = #30701#28040#24687#21457#36865#31383#21475
ClientHeight = 485
ClientWidth = 629
Color = clBtnFace
TransparentColor = True
TransparentColorValue = clNavy
Constraints.MinHeight = 465
Constraints.MinWidth = 637
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnActivate = FormActivate
OnCreate = FormCreate
OnMouseMove = tvMouseMove
DesignSize = (
629
485)
PixelsPerInch = 96
TextHeight = 12
object Shape18: TShape
Left = 535
Top = 356
Width = 83
Height = 26
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBlue
end
object Shape5: TShape
Left = 535
Top = 388
Width = 83
Height = 26
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBlue
end
object Shape3: TShape
Left = 535
Top = 323
Width = 83
Height = 26
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBlue
end
object Shape4: TShape
Left = 535
Top = 289
Width = 83
Height = 26
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBlue
end
object SpeedButton1: TSpeedButton
Left = 536
Top = 389
Width = 81
Height = 24
Anchors = [akLeft, akBottom]
Caption = #36864#20986
Flat = True
OnClick = SpeedButton1Click
end
object btnsend: TSpeedButton
Left = 536
Top = 290
Width = 81
Height = 24
Anchors = [akLeft, akBottom]
Caption = #31435#21363#21457#36865
Flat = True
OnClick = btnsendClick
end
object btntimesend: TSpeedButton
Left = 536
Top = 324
Width = 81
Height = 24
Anchors = [akLeft, akBottom]
Caption = #20462#25913#29992#25143#20449#24687
Flat = True
OnClick = btntimesendClick
end
object Shape9: TShape
Tag = 100
Left = 534
Top = 322
Width = 85
Height = 28
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape10MouseMove
end
object Shape10: TShape
Tag = 100
Left = 534
Top = 288
Width = 85
Height = 28
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape10MouseMove
end
object Shape11: TShape
Tag = 100
Left = 534
Top = 387
Width = 85
Height = 28
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape10MouseMove
end
object SpeedButton5: TSpeedButton
Left = 536
Top = 357
Width = 81
Height = 24
Anchors = [akLeft, akBottom]
Caption = #32852#31995#20316#32773
Flat = True
OnClick = SpeedButton5Click
end
object Shape17: TShape
Tag = 100
Left = 534
Top = 355
Width = 85
Height = 28
Anchors = [akLeft, akBottom]
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape17MouseMove
end
object gb: TGroupBox
Left = 4
Top = 269
Width = 517
Height = 151
Anchors = [akLeft, akBottom]
Caption = #21457#36865#20449#24687
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
OnMouseMove = tvMouseMove
object Label3: TLabel
Left = 267
Top = 128
Width = 84
Height = 12
Caption = #23545#26041#30340#25163#26426#21495#65306
end
object Label4: TLabel
Left = 11
Top = 43
Width = 246
Height = 12
Caption = #30041#35328#65306'('#19981#36229#36807'60'#20010#27721#23383','#36229#36807#37096#20998#23558#20998#27573#21457#36865')'
end
object Label7: TLabel
Left = 11
Top = 134
Width = 36
Height = 12
Caption = #23383#25968#65306
end
object Label8: TLabel
Left = 51
Top = 134
Width = 6
Height = 12
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 275
Top = 49
Width = 72
Height = 12
Caption = #24744#30340#25163#26426#21495#65306
end
object Label2: TLabel
Left = 264
Top = 77
Width = 84
Height = 12
Caption = #25163#26426#27880#20876#23494#30721#65306
end
object Shape1: TShape
Left = 257
Top = 40
Width = 1
Height = 107
Pen.Color = clWhite
end
object Shape2: TShape
Left = 258
Top = 42
Width = 1
Height = 106
end
object Label14: TLabel
Left = 97
Top = 16
Width = 120
Height = 12
Caption = #35831#36873#25321#30701#20449#26381#21153#20013#24515#65306
end
object Shape15: TShape
Left = 8
Top = 36
Width = 501
Height = 1
end
object Shape16: TShape
Left = 9
Top = 37
Width = 501
Height = 1
Pen.Color = clWhite
end
object myphonebook: TFlatComboBox
Left = 352
Top = 98
Width = 153
Height = 20
Style = csDropDownList
Color = clWindow
ColorBorder = clBlack
ItemHeight = 12
TabOrder = 0
ItemIndex = -1
OnChange = myphonebookChange
end
object memomsg: TMemo
Left = 11
Top = 59
Width = 233
Height = 73
ScrollBars = ssVertical
TabOrder = 1
OnChange = memomsgChange
OnKeyPress = memomsgKeyPress
end
object mypwd: TEdit
Left = 352
Top = 73
Width = 153
Height = 18
AutoSize = False
PasswordChar = '*'
TabOrder = 2
OnClick = mypwdClick
end
object mycode: TFlatComboBox
Left = 352
Top = 44
Width = 153
Height = 20
Color = clWindow
ColorBorder = clBlack
ItemHeight = 12
TabOrder = 3
ItemIndex = -1
OnClick = mycodeClick
end
object CheckBox1: TXP_CheckBox
Left = 264
Top = 100
Width = 85
Height = 17
Checked = False
Caption = #20351#29992#30005#35805#31807
Color = clBtnFace
TabStop = True
TabOrder = 4
OnClick = CheckBox1Click
end
object frendcode: TFlatComboBox
Left = 352
Top = 124
Width = 153
Height = 20
Color = clWindow
ColorBorder = clBlack
ItemHeight = 12
TabOrder = 5
ItemIndex = -1
OnClick = mycodeClick
end
object cbcenter: TFlatComboBox
Left = 216
Top = 12
Width = 289
Height = 20
Style = csDropDownList
Color = clWindow
ColorBorder = clBlack
ItemHeight = 12
Items.Strings = (
#20013#22269#30701#20449#24687#26381#21153#32593'(www.smschina.com)'
#25628#29392#30701#20449#20013#24515#65288'sms.sohu.com'#65289
#26032#28010#30701#20449#20013#24515'(sms.sina.com.cn)'
#20013#21326#32593#30701#20449#20013#24515'(sms.china.com)')
TabOrder = 6
Text = #20013#22269#30701#20449#24687#26381#21153#32593'(www.smschina.com)'
ItemIndex = 0
OnChange = cbcenterChange
end
end
object Panel1: TPanel
Left = 0
Top = 424
Width = 629
Height = 61
Align = alBottom
BevelOuter = bvLowered
TabOrder = 1
DesignSize = (
629
61)
object Label5: TLabel
Left = 8
Top = 8
Width = 60
Height = 12
Caption = #20351#29992#35828#26126#65306
Transparent = True
end
object Label6: TLabel
Left = 7
Top = 24
Width = 631
Height = 17
Anchors = []
AutoSize = False
Caption = ' '#25163#26426#27880#20876#23494#30721#20026#24744#30340#25163#26426#22312#30456#24212#30701#20449#24687#26381#21153#20013#24515#32593#31449#20013#27880#20876#30340#23494#30721
Transparent = True
WordWrap = True
end
object Label9: TLabel
Left = 32
Top = 40
Width = 192
Height = 12
Caption = #19981#25903#25345#20013#22269#31227#21160#21644#20013#22269#32852#36890#20114#21457#30701#20449
end
end
object Panel2: TPanel
Left = 2
Top = 8
Width = 623
Height = 257
Anchors = [akLeft, akTop, akRight, akBottom]
BevelOuter = bvLowered
Caption = 'Panel2'
TabOrder = 2
DesignSize = (
623
257)
object PageControl1: TPageControl
Left = 3
Top = 4
Width = 618
Height = 252
ActivePage = TabSheet2
Anchors = [akLeft, akTop, akRight, akBottom]
TabIndex = 1
TabOrder = 0
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = #39044#35774#30701#20449
object Panel3: TPanel
Left = 0
Top = 0
Width = 610
Height = 225
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
DesignSize = (
610
225)
object sp: TSplitter
Left = 146
Top = 1
Width = 7
Height = 223
Cursor = crHSplit
Beveled = True
ResizeStyle = rsUpdate
OnMoved = spMoved
end
object tv: TTreeView
Left = 1
Top = 1
Width = 145
Height = 223
Cursor = crHandPoint
Align = alLeft
AutoExpand = True
BevelInner = bvSpace
Ctl3D = False
Indent = 19
ParentCtl3D = False
ReadOnly = True
ShowRoot = False
TabOrder = 0
OnClick = tvClick
OnMouseMove = tvMouseMove
Items.Data = {
01000000210000000000000000000000FFFFFFFFFFFFFFFF0000000004000000
08D4A4C9E8B6CCD0C5210000000000000000000000FFFFFFFFFFFFFFFF000000
000000000008D7EED0C2D1D4D3EF210000000000000000000000FFFFFFFFFFFF
FFFF000000000200000008D6D4D0C4D7A3B8A31D0000000000000000000000FF
FFFFFFFFFFFFFF000000000000000004C9FAC8D51D0000000000000000000000
FFFFFFFFFFFFFFFF000000000000000004BDDAC8D52100000000000000000000
00FFFFFFFFFFFFFFFF000000000000000008B0AEC7E9C9FABBEE210000000000
000000000000FFFFFFFFFFFFFFFF000000000000000008C9FABBEED3C4C4AC}
end
object sg: TStringGrid
Left = 153
Top = 1
Width = 457
Height = 223
Anchors = [akLeft, akTop, akRight, akBottom]
ColCount = 3
Ctl3D = False
DefaultRowHeight = 18
FixedCols = 0
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
ParentCtl3D = False
TabOrder = 1
OnDblClick = sgDblClick
OnMouseMove = sgMouseMove
ColWidths = (
64
345
42)
end
end
end
object TabSheet2: TTabSheet
Caption = #35774#32622#30005#35805#31807
ImageIndex = 1
object Panel4: TPanel
Left = 0
Top = 0
Width = 610
Height = 225
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
OnMouseMove = tvMouseMove
DesignSize = (
610
225)
object Shape8: TShape
Left = 212
Top = 7
Width = 75
Height = 25
Brush.Style = bsClear
Pen.Color = clBlue
end
object Shape7: TShape
Left = 111
Top = 7
Width = 75
Height = 25
Brush.Style = bsClear
Pen.Color = clBlue
end
object Shape6: TShape
Left = 15
Top = 7
Width = 75
Height = 25
Brush.Style = bsClear
Pen.Color = clBlue
end
object SpeedButton2: TSpeedButton
Left = 16
Top = 8
Width = 73
Height = 23
Caption = #22686#21152
Flat = True
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 112
Top = 8
Width = 73
Height = 23
Caption = #20462#25913
Flat = True
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 213
Top = 8
Width = 73
Height = 23
Caption = #21024#38500
Flat = True
OnClick = SpeedButton4Click
end
object Shape12: TShape
Tag = 100
Left = 14
Top = 6
Width = 77
Height = 27
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape10MouseMove
end
object Shape13: TShape
Tag = 100
Left = 110
Top = 6
Width = 77
Height = 27
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape10MouseMove
end
object Shape14: TShape
Tag = 100
Left = 211
Top = 6
Width = 77
Height = 27
Brush.Style = bsClear
Pen.Color = clBtnText
OnMouseMove = Shape10MouseMove
end
object GroupBox1: TGroupBox
Left = 16
Top = 37
Width = 577
Height = 108
Anchors = [akLeft, akTop, akRight]
Caption = #26379#21451#20449#24687
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
DesignSize = (
577
108)
object Label11: TLabel
Left = 232
Top = 22
Width = 36
Height = 12
Caption = #24615#21035#65306
end
object Label12: TLabel
Left = 237
Top = 48
Width = 36
Height = 12
Caption = #22791#27880#65306
end
object edtname: TLabeledEdit
Left = 53
Top = 18
Width = 154
Height = 18
Ctl3D = False
EditLabel.Width = 36
EditLabel.Height = 12
EditLabel.Caption = #22995#21517#65306
LabelPosition = lpLeft
LabelSpacing = 3
ParentCtl3D = False
TabOrder = 0
OnKeyPress = edtnameKeyPress
end
object rb1: TRadioButton
Left = 280
Top = 18
Width = 49
Height = 17
Caption = #30007
Checked = True
TabOrder = 1
TabStop = True
end
object rb2: TRadioButton
Left = 328
Top = 18
Width = 49
Height = 17
Caption = #22899
TabOrder = 2
end
object edtphone: TLabeledEdit
Left = 53
Top = 48
Width = 154
Height = 18
Ctl3D = False
EditLabel.Width = 36
EditLabel.Height = 12
EditLabel.Caption = #25163#26426#65306
LabelPosition = lpLeft
LabelSpacing = 3
ParentCtl3D = False
TabOrder = 3
OnKeyPress = edtphoneKeyPress
end
object Memo1: TMemo
Left = 277
Top = 48
Width = 284
Height = 49
Anchors = [akLeft, akTop, akRight]
TabOrder = 4
end
end
object sg2: TStringGrid
Left = 16
Top = 148
Width = 577
Height = 73
Anchors = [akLeft, akTop, akRight, akBottom]
Ctl3D = False
DefaultRowHeight = 18
FixedCols = 0
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect]
ParentCtl3D = False
TabOrder = 1
OnClick = sg2Click
OnDblClick = sg2DblClick
OnMouseMove = sg2MouseMove
ColWidths = (
43
72
64
120
270)
end
end
end
object TabSheet3: TTabSheet
Caption = #26381#21153#20013#24515#32593#22336
ImageIndex = 2
object Web: TWebBrowser
Left = 0
Top = 0
Width = 610
Height = 225
Align = alClient
TabOrder = 0
OnBeforeNavigate2 = WebBeforeNavigate2
OnDocumentComplete = WebDocumentComplete
ControlData = {
4C0000000C3F0000411700000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E126208000000000000004C0000000114020000000000C000000000000046
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
end
end
object Edit1: TEdit
Left = 224
Top = 6
Width = 397
Height = 18
Anchors = [akLeft, akTop, akRight]
Color = clScrollBar
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
Visible = False
end
end
object memosms: TFlatPanel
Left = 164
Top = 223
Width = 297
Height = 25
Color = clInfoBk
Visible = False
TabOrder = 3
object Label10: TLabel
Left = 6
Top = 6
Width = 288
Height = 16
AutoSize = False
Caption = 'kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk'
Transparent = True
WordWrap = True
end
end
object pp: TPanel
Left = 184
Top = 256
Width = 273
Height = 57
BevelOuter = bvNone
Color = clBlack
TabOrder = 5
Visible = False
end
object pp1: TFlatPanel
Left = 176
Top = 248
Width = 273
Height = 57
Caption = #27491#22312#21457#36865#65292#35831#31245#20505'......'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentColor = True
Visible = False
ColorShadow = clGreen
TabOrder = 4
end
end