www.pudn.com > otsms > UnitD.dfm
object Form1: TForm1
Left = 190
Top = 106
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Oxygen SMS Component - Demo'
ClientHeight = 347
ClientWidth = 533
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GBox4: TGroupBox
Left = 200
Top = 140
Width = 333
Height = 189
Caption = 'Receiving'
TabOrder = 4
object Label3: TLabel
Left = 237
Top = 43
Width = 32
Height = 13
Caption = 'Label3'
end
object Label4: TLabel
Left = 237
Top = 56
Width = 32
Height = 13
Caption = 'Label4'
end
object Label6: TLabel
Left = 237
Top = 83
Width = 32
Height = 13
Caption = 'Label6'
end
object Label7: TLabel
Left = 237
Top = 96
Width = 32
Height = 13
Caption = 'Label7'
end
object Label2: TLabel
Left = 237
Top = 29
Width = 32
Height = 13
Caption = 'Label2'
end
object Label5: TLabel
Left = 237
Top = 69
Width = 32
Height = 13
Caption = 'Label5'
end
object Button7: TButton
Left = 240
Top = 124
Width = 41
Height = 25
Caption = 'Info'
TabOrder = 1
OnClick = Button7Click
end
object MsgGrid: TStringGrid
Left = 4
Top = 16
Width = 325
Height = 169
ColCount = 6
DefaultRowHeight = 16
FixedCols = 0
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goRowSelect]
TabOrder = 0
OnClick = MsgGridClick
end
end
object GBox2: TGroupBox
Left = 200
Top = 0
Width = 333
Height = 137
Caption = 'Inbox'
TabOrder = 1
object TotalL: TLabel
Left = 23
Top = 56
Width = 30
Height = 13
Caption = 'Total :'
end
object TotalMsgL: TLabel
Left = 60
Top = 56
Width = 6
Height = 13
Caption = '0'
end
object BusyL: TLabel
Left = 24
Top = 78
Width = 29
Height = 13
Caption = 'Busy :'
end
object BusyMsgL: TLabel
Left = 60
Top = 78
Width = 6
Height = 13
Caption = '0'
end
object CurMsgL: TLabel
Left = 13
Top = 104
Width = 40
Height = 13
Caption = 'Current :'
end
object TextL: TLabel
Left = 140
Top = 20
Width = 27
Height = 13
Caption = 'Text :'
end
object MsgTextL: TLabel
Left = 176
Top = 20
Width = 149
Height = 37
AutoSize = False
WordWrap = True
end
object TimeL: TLabel
Left = 138
Top = 59
Width = 29
Height = 13
Caption = 'Time :'
end
object MsgTimeL: TLabel
Left = 176
Top = 59
Width = 3
Height = 13
end
object FromL: TLabel
Left = 138
Top = 81
Width = 29
Height = 13
Caption = 'From :'
end
object MsgFromL: TLabel
Left = 176
Top = 81
Width = 3
Height = 13
end
object PictureL: TLabel
Left = 128
Top = 104
Width = 39
Height = 13
Caption = 'Picture :'
end
object NoPictureL: TLabel
Left = 176
Top = 104
Width = 24
Height = 13
Caption = 'none'
end
object Image1: TImage
Left = 177
Top = 105
Width = 72
Height = 28
Visible = False
OnDblClick = Image1DblClick
end
object Bevel1: TBevel
Left = 120
Top = 12
Width = 9
Height = 117
Shape = bsLeftLine
end
object DelMsg_Btn: TButton
Left = 254
Top = 108
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 2
OnClick = DelMsg_BtnClick
end
object ReadMsg_Btn: TButton
Left = 254
Top = 36
Width = 75
Height = 25
Caption = 'Read'
TabOrder = 3
Visible = False
OnClick = ReadMsg_BtnClick
end
object GetInbox_Btn: TButton
Left = 8
Top = 20
Width = 75
Height = 25
Caption = 'Get Inbox'
TabOrder = 0
OnClick = GetInbox_BtnClick
end
object MsgNumCB: TComboBox
Left = 60
Top = 100
Width = 45
Height = 21
ItemHeight = 13
TabOrder = 1
OnChange = MsgNumCBChange
end
end
object StBar: TStatusBar
Left = 0
Top = 328
Width = 533
Height = 19
Panels = <
item
Text = 'Not Connected'
Width = 82
end
item
Text = 'Phone type: none'
Width = 113
end
item
Text = 'IMEI:'
Width = 130
end
item
Width = 100
end>
SimplePanel = False
end
object GBox1: TGroupBox
Left = 0
Top = 0
Width = 197
Height = 137
Caption = 'Connection'
TabOrder = 0
object PhoneML: TLabel
Left = 20
Top = 20
Width = 68
Height = 13
Caption = 'Phone model :'
end
object PortL: TLabel
Left = 39
Top = 48
Width = 49
Height = 13
Caption = 'Com Port :'
end
object ConnTypeL: TLabel
Left = 25
Top = 76
Width = 63
Height = 13
Caption = 'Connect via :'
end
object PhoneMCB: TComboBox
Left = 96
Top = 16
Width = 70
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = PhoneMCBChange
Items.Strings = (
'3***'
'51**'
'61**'
'62**'
'71**'
'8***')
end
object PortE: TSpinEdit
Left = 96
Top = 44
Width = 70
Height = 22
MaxLength = 2
MaxValue = 99
MinValue = 1
TabOrder = 1
Value = 2
OnChange = PortEChange
end
object ConnTCB: TComboBox
Left = 96
Top = 72
Width = 70
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnChange = ConnTCBChange
Items.Strings = (
'DAU-9P'
'DLR-3'
'InfraRed')
end
object ConnBtn: TButton
Left = 16
Top = 104
Width = 75
Height = 25
Caption = 'Connect'
TabOrder = 3
OnClick = ConnBtnClick
end
object DisConnBtn: TButton
Left = 104
Top = 104
Width = 75
Height = 25
Caption = 'Disconnect'
TabOrder = 4
OnClick = DisConnBtnClick
end
end
object GBox3: TGroupBox
Left = 0
Top = 140
Width = 197
Height = 189
Caption = 'Sending'
TabOrder = 2
object Bevel2: TBevel
Left = 15
Top = 131
Width = 74
Height = 30
end
object SendToL: TLabel
Left = 28
Top = 24
Width = 19
Height = 13
Caption = 'To :'
end
object SendTextL: TLabel
Left = 20
Top = 52
Width = 27
Height = 13
Caption = 'Text :'
end
object SendValidL: TLabel
Left = 8
Top = 80
Width = 39
Height = 13
Caption = 'Validity :'
end
object Picture_Btn: TSpeedButton
Left = 16
Top = 132
Width = 72
Height = 28
Caption = 'No Picture'
Flat = True
OnClick = Picture_BtnClick
end
object SpeedButton1: TSpeedButton
Left = 24
Top = 164
Width = 57
Height = 17
Caption = 'Clear'
Flat = True
OnClick = SpeedButton1Click
end
object NRepChB: TCheckBox
Left = 12
Top = 108
Width = 97
Height = 17
Caption = 'Request report'
TabOrder = 0
end
object UnicodeChB: TCheckBox
Left = 120
Top = 108
Width = 65
Height = 17
Caption = 'Unicode'
TabOrder = 1
end
object SendMsgBtn: TButton
Left = 106
Top = 132
Width = 75
Height = 25
Caption = 'Send'
TabOrder = 2
OnClick = SendMsgBtnClick
end
object SendToE: TEdit
Left = 56
Top = 20
Width = 132
Height = 21
TabOrder = 3
Text = '+79021234567'
end
object SendTextE: TEdit
Left = 56
Top = 48
Width = 132
Height = 21
TabOrder = 4
Text = 'www.oxygensoftware.com'
end
object SendValidE: TSpinEdit
Left = 56
Top = 76
Width = 69
Height = 22
MaxLength = 1
MaxValue = 255
MinValue = 0
TabOrder = 5
Value = 2
end
end
object SMS1: TOxygenSMS
ComNumber = 0
ConnectionMode = 0
Model = 0
SendTimeOut = 17
OnSMSMessageReceived = SMSMSGReceived
OnSMSReportReceived = SMSRepReceived
Left = 348
Top = 272
end
object OPD1: TOpenPictureDialog
Title = 'Select a picture to send'
Left = 240
Top = 272
end
object PopupMenu1: TPopupMenu
TrackButton = tbLeftButton
Left = 276
Top = 272
object Load1: TMenuItem
Caption = 'Load'
OnClick = Load1Click
end
object Clear1: TMenuItem
Caption = 'Clear'
OnClick = Clear1Click
end
end
object SPD: TSavePictureDialog
Title = 'Save picture to file'
Left = 312
Top = 272
end
end