📄 udxcx.dfm
字号:
object frmdxcx: Tfrmdxcx
Left = 214
Top = 245
BorderStyle = bsNone
Caption = 'frmdxcx'
ClientHeight = 248
ClientWidth = 414
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 414
Height = 248
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object Shape1: TShape
Left = 0
Top = 0
Width = 414
Height = 30
Align = alTop
Brush.Color = clTeal
Pen.Color = clTeal
Pen.Width = 2
OnMouseDown = Shape1MouseDown
end
object Shape2: TShape
Left = 0
Top = 30
Width = 414
Height = 218
Align = alClient
Brush.Color = clActiveBorder
Pen.Color = clTeal
Pen.Width = 4
end
object Label4: TLabel
Left = 184
Top = 12
Width = 48
Height = 12
Caption = #24050#25910#30701#20449
Transparent = True
end
object Label1: TLabel
Left = 13
Top = 45
Width = 72
Height = 12
Caption = #26469#33258#25163#26426#21495#65306
end
object Label2: TLabel
Left = 25
Top = 63
Width = 60
Height = 12
Caption = #25509#25910#26085#26399#65306
end
object Label3: TLabel
Left = 8
Top = 85
Width = 156
Height = 12
Caption = #25552#31034#65306#21452#20987#30701#20449#21487#20197#22238#22797#30701#20449
end
object SpeedButton1: TSpeedButton
Left = 306
Top = 75
Width = 52
Height = 22
Caption = #26597#35810
Flat = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 358
Top = 75
Width = 52
Height = 22
Caption = #36864#20986
Flat = True
OnClick = SpeedButton2Click
end
object Edit1: TEdit
Left = 89
Top = 40
Width = 95
Height = 20
Color = clInfoBk
TabOrder = 0
end
object tm: TDateTimePicker
Left = 89
Top = 60
Width = 95
Height = 20
Hint = #25171#21246#34920#31034#21152#20837#26102#38388#26597#35810
CalAlignment = dtaLeft
Date = 37587.5733486458
Time = 37587.5733486458
ShowCheckbox = True
Checked = False
Color = clInfoBk
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
object DBGrid1: TDBGrid
Left = 5
Top = 104
Width = 404
Height = 140
Color = clInfoBk
DataSource = DataSource1
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 2
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Expanded = False
FieldName = 'fromaddress'
Title.Alignment = taCenter
Title.Caption = #26469#33258#25163#26426#21495
Width = 83
Visible = True
end
item
Expanded = False
FieldName = 'content'
Title.Alignment = taCenter
Title.Caption = #30701#20449#20869#23481
Width = 182
Visible = True
end
item
Expanded = False
FieldName = 'revtime'
Title.Alignment = taCenter
Title.Caption = #25509#25910#26102#38388
Width = 115
Visible = True
end>
end
end
object DataSource1: TDataSource
DataSet = Qdxcx
Left = 272
Top = 48
end
object Qdxcx: TADOQuery
Connection = smsdb.conn
Parameters = <>
SQL.Strings = (
'select * from revsms where status=1')
Left = 280
Top = 144
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -