📄 pc+
字号:
object Form1: TForm1
Left = 268
Top = 250
Width = 696
Height = 533
Caption = #30701#20449#25910#21457#31243#24207
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 120
TextHeight = 16
object PageControl1: TPageControl
Left = 39
Top = 30
Width = 583
Height = 375
ActivePage = TabSheet3
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #36890#35759#20449#24687
object GroupBox1: TGroupBox
Left = 10
Top = 20
Width = 277
Height = 158
Caption = #21457#36865#21629#20196#65306
TabOrder = 0
object RichEdit1: TRichEdit
Left = 10
Top = 22
Width = 257
Height = 127
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'')
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
OnChange = RichEdit1Change
end
end
object GroupBox2: TGroupBox
Left = 295
Top = 20
Width = 267
Height = 158
Caption = #22238#25910#21629#20196
TabOrder = 1
object RichEdit2: TRichEdit
Left = 10
Top = 22
Width = 247
Height = 127
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
OnChange = RichEdit2Change
end
end
object GroupBox3: TGroupBox
Left = 10
Top = 187
Width = 552
Height = 139
Caption = 'SIM'#21345#24037#20316#21442#25968
TabOrder = 2
object Label1: TLabel
Left = 27
Top = 34
Width = 60
Height = 16
Caption = #26381#21153#20013#24515#65306
end
object Label2: TLabel
Left = 30
Top = 79
Width = 60
Height = 16
Caption = #21629#20196#24418#24335#65306
end
object Label3: TLabel
Left = 305
Top = 36
Width = 60
Height = 16
Caption = #20449#21495#36136#37327#65306
end
object Label4: TLabel
Left = 295
Top = 76
Width = 188
Height = 16
Caption = #65288#32593#32476#20449#21495#30340#24378#24230#24212#22312'10-31'#20043#38388#65289
end
object ComboBox1: TComboBox
Left = 128
Top = 30
Width = 149
Height = 24
ItemHeight = 16
TabOrder = 0
Text = '13800993500'
OnChange = ComboBox1Change
OnClick = ComboBox1Click
end
object ComboBox2: TComboBox
Left = 128
Top = 69
Width = 149
Height = 24
ItemHeight = 16
TabOrder = 1
Text = 'PDU'
OnClick = ComboBox2Click
Items.Strings = (
'PDU'
'Text')
end
object Edit1: TEdit
Left = 384
Top = 30
Width = 159
Height = 24
ReadOnly = True
TabOrder = 2
Text = 'Edit1'
end
end
end
object TabSheet2: TTabSheet
Caption = #32676#21457#30701#20449
ImageIndex = 1
object GroupBox4: TGroupBox
Left = 17
Top = 14
Width = 415
Height = 208
Caption = #30005#35805#31807
TabOrder = 0
object Label5: TLabel
Left = 10
Top = 39
Width = 84
Height = 16
Caption = #36755#20837#30005#35805#21495#30721#65306
end
object Edit2: TEdit
Left = 128
Top = 30
Width = 159
Height = 30
AutoSize = False
TabOrder = 0
Text = 'Edit2'
end
object Button1: TButton
Left = 315
Top = 30
Width = 70
Height = 30
Caption = #28155#21152
TabOrder = 1
OnClick = Button1Click
end
object CheckListBox1: TCheckListBox
Left = 10
Top = 69
Width = 385
Height = 119
ItemHeight = 16
PopupMenu = PopupMenu1
TabOrder = 2
OnClick = CheckListBox1Click
end
end
object GroupBox5: TGroupBox
Left = 20
Top = 226
Width = 414
Height = 100
Caption = #36755#20837#30701#20449#20869#23481
TabOrder = 1
object Edit3: TEdit
Left = 10
Top = 20
Width = 395
Height = 70
AutoSize = False
TabOrder = 0
end
end
object Button2: TButton
Left = 453
Top = 266
Width = 100
Height = 31
Caption = #21457#36865#30701#20449
TabOrder = 2
OnClick = Button2Click
end
end
object TabSheet3: TTabSheet
Caption = #25509#25910#30701#20449
ImageIndex = 2
object GroupBox6: TGroupBox
Left = 10
Top = 10
Width = 552
Height = 316
Caption = #30701#20449#20869#23481#65306
TabOrder = 0
object Label6: TLabel
Left = 10
Top = 49
Width = 84
Height = 16
Caption = #36755#20837#30701#20449#20301#32622#65306
end
object Label7: TLabel
Left = 10
Top = 226
Width = 84
Height = 16
Caption = #26469#30005#26174#31034#21495#30721#65306
end
object Label8: TLabel
Left = 10
Top = 276
Width = 84
Height = 16
Caption = #30701#20449#21457#36865#26102#38388#65306
end
object Edit4: TEdit
Left = 134
Top = 42
Width = 90
Height = 31
AutoSize = False
TabOrder = 0
Text = '0'
end
object Button3: TButton
Left = 276
Top = 39
Width = 90
Height = 31
Caption = #35835#21462
TabOrder = 1
OnClick = Button3Click
end
object RichEdit3: TRichEdit
Left = 10
Top = 89
Width = 533
Height = 119
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'RichEdit3')
ParentFont = False
ScrollBars = ssVertical
TabOrder = 2
end
object Edit5: TEdit
Left = 138
Top = 217
Width = 168
Height = 24
TabOrder = 3
end
object Edit6: TEdit
Left = 138
Top = 266
Width = 168
Height = 24
TabOrder = 4
end
object RadioButton1: TRadioButton
Left = 354
Top = 226
Width = 149
Height = 31
Caption = #25163#24037#26597#30475#23601#30701#20449
Checked = True
TabOrder = 5
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 354
Top = 266
Width = 179
Height = 31
Caption = #33258#21160#25910#21462#26032#30701#20449
TabOrder = 6
OnClick = RadioButton2Click
end
end
end
object TabSheet4: TTabSheet
Caption = #25320#25171#30005#35805
ImageIndex = 3
object Label9: TLabel
Left = 69
Top = 98
Width = 84
Height = 16
Caption = #36755#20837#30005#35805#21495#30721#65306
end
object Edit7: TEdit
Left = 197
Top = 89
Width = 218
Height = 21
TabOrder = 0
end
object Button4: TButton
Left = 108
Top = 187
Width = 110
Height = 41
Caption = #25320#25171#30005#35805
TabOrder = 1
OnClick = Button4Click
end
object Button5: TButton
Left = 276
Top = 187
Width = 109
Height = 41
Caption = #25346#26029#30005#35805
TabOrder = 2
OnClick = Button5Click
end
end
end
object Button6: TButton
Left = 246
Top = 414
Width = 90
Height = 40
Caption = #20851#38381
TabOrder = 1
OnClick = Button6Click
end
object MSComm1: TMSComm
Left = 423
Top = 414
Width = 32
Height = 32
OnComm = MSComm1Comm
ControlData = {
2143341208000000E3030000E303000001568A64000006000000010000040000
0002000000C201000000080000000000000000003F00000001000000}
end
object mycon: TADOConnection
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 48
Top = 336
end
object ADOQuery1: TADOQuery
Connection = mycon
Parameters = <>
Left = 96
Top = 336
end
object ADOTable1: TADOTable
Connection = mycon
Left = 144
Top = 336
end
object PopupMenu1: TPopupMenu
Left = 234
Top = 155
object N1: TMenuItem
Caption = #21024#38500#30005#35805
OnClick = N1Click
end
object N2: TMenuItem
Caption = #28155#21152#30005#35805
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -