📄 roommessageut.dfm
字号:
object RoomMessFm: TRoomMessFm
Left = -301
Top = 21
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #23458#25151#20449#24687#35774#32622
ClientHeight = 435
ClientWidth = 650
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 650
Height = 435
ActivePage = TabSheet1
Align = alClient
TabOrder = 0
object TabSheet1: TTabSheet
TabVisible = False
object Panel2: TPanel
Left = 0
Top = 41
Width = 642
Height = 183
Align = alClient
TabOrder = 0
object DBGrid1: TDBGrid
Left = 1
Top = 1
Width = 640
Height = 181
Align = alClient
DataSource = DataSource1
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
end
end
object Panel1: TPanel
Left = 0
Top = 224
Width = 642
Height = 201
Align = alBottom
TabOrder = 1
object GroupBox1: TGroupBox
Left = 5
Top = 2
Width = 628
Height = 151
Caption = #22522#26412#20449#24687
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 16
Width = 65
Height = 25
AutoSize = False
Caption = #23458#25151#32534#21495#65306
Layout = tlCenter
end
object Label2: TLabel
Left = 200
Top = 16
Width = 65
Height = 25
AutoSize = False
Caption = #31867#22411#32534#21495#65306
Layout = tlCenter
end
object Label3: TLabel
Left = 8
Top = 48
Width = 65
Height = 25
AutoSize = False
Caption = #39069#23450#20154#25968#65306
Layout = tlCenter
end
object Label4: TLabel
Left = 392
Top = 48
Width = 65
Height = 25
AutoSize = False
Caption = #29366#24577#65306
Layout = tlCenter
end
object Label5: TLabel
Left = 392
Top = 16
Width = 113
Height = 25
AutoSize = False
Caption = #27004#23618#32534#21495#65306
Layout = tlCenter
end
object Label6: TLabel
Left = 200
Top = 48
Width = 65
Height = 25
AutoSize = False
Caption = #24202#25968#65306
Layout = tlCenter
end
object Label7: TLabel
Left = 8
Top = 80
Width = 65
Height = 25
AutoSize = False
Caption = #23458#25151#25551#36848#65306
Layout = tlCenter
end
object Label8: TLabel
Left = 8
Top = 112
Width = 65
Height = 25
AutoSize = False
Caption = #22791#27880#65306
Layout = tlCenter
end
object RoomEdit: TEdit
Left = 72
Top = 16
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
end
object NumEdit: TEdit
Left = 72
Top = 48
Width = 105
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
Text = '0'
end
object UpDown1: TUpDown
Left = 177
Top = 48
Width = 16
Height = 21
Associate = NumEdit
Max = 10000
TabOrder = 7
end
object TypeEdit: TComboBox
Left = 264
Top = 16
Width = 113
Height = 22
Style = csOwnerDrawFixed
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ItemHeight = 16
TabOrder = 1
OnChange = TypeEditChange
end
object FloodEdit: TComboBox
Left = 472
Top = 16
Width = 105
Height = 22
Style = csOwnerDrawFixed
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ItemHeight = 16
TabOrder = 2
OnChange = FloodEditChange
end
object BedEdit: TEdit
Left = 264
Top = 48
Width = 97
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 4
Text = '0'
end
object UpDown3: TUpDown
Left = 361
Top = 48
Width = 16
Height = 21
Associate = BedEdit
Max = 10000
TabOrder = 8
end
object StatusEdit: TEdit
Left = 472
Top = 48
Width = 105
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 9
end
object MsEdit: TEdit
Left = 72
Top = 80
Width = 305
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 5
end
object MemoEdit: TEdit
Left = 72
Top = 112
Width = 305
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 6
end
object pf: TCheckBox
Left = 392
Top = 88
Width = 97
Height = 17
Caption = #26159#21542#21487#25340#25151
TabOrder = 10
end
end
object AddBt: TBitBtn
Left = 2
Top = 160
Width = 60
Height = 25
Caption = #22686#21152
TabOrder = 1
OnClick = AddBtClick
end
object EditBt: TBitBtn
Left = 66
Top = 160
Width = 60
Height = 25
Caption = #20462#25913
TabOrder = 2
OnClick = EditBtClick
end
object DelBt: TBitBtn
Left = 130
Top = 160
Width = 60
Height = 25
Caption = #21024#38500
TabOrder = 3
OnClick = DelBtClick
end
object FirstBt: TBitBtn
Left = 254
Top = 160
Width = 60
Height = 25
Caption = #39318#35760#24405
TabOrder = 4
OnClick = FirstBtClick
end
object ProBt: TBitBtn
Left = 318
Top = 160
Width = 60
Height = 25
Caption = #19978#19968#26465
TabOrder = 5
OnClick = ProBtClick
end
object NextBt: TBitBtn
Left = 382
Top = 160
Width = 60
Height = 25
Caption = #19979#19968#26465
TabOrder = 6
OnClick = NextBtClick
end
object LastBt: TBitBtn
Left = 446
Top = 160
Width = 60
Height = 25
Caption = #23614#35760#24405
TabOrder = 7
OnClick = LastBtClick
end
object ClearBt: TBitBtn
Left = 510
Top = 160
Width = 60
Height = 25
Caption = #21047#26032
TabOrder = 8
OnClick = ClearBtClick
end
object CloseBt: TBitBtn
Left = 574
Top = 160
Width = 60
Height = 25
Caption = #36864#20986
TabOrder = 9
OnClick = CloseBtClick
end
object FindBt: TBitBtn
Left = 192
Top = 160
Width = 60
Height = 25
Caption = #26597#35810
TabOrder = 10
OnClick = FindBtClick
end
end
object totlepl: TPanel
Left = 0
Top = 0
Width = 642
Height = 41
Align = alTop
Caption = #35760#24405#25968#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
end
object RoomMessAdo: TADOQuery
Connection = DataFm.datacon
Parameters = <>
Left = 208
Top = 80
end
object DataSource1: TDataSource
DataSet = RoomMessAdo
Left = 224
Top = 112
end
object RoomMessAdo1: TADOQuery
Connection = DataFm.datacon
Parameters = <>
Left = 260
Top = 79
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -