📄 unit1.dfm
字号:
object Main: TMain
Left = 197
Top = 113
Width = 696
Height = 480
BorderIcons = [biSystemMenu, biMinimize]
Caption = #23458#25143#31649#29702
Color = clMoneyGreen
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIForm
Icon.Data = {
0000010001002020100000000000E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
000000008000008000000080800080000000800080008080000080808000C0C0
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
000000000000000000000000000000000000000000000000000000000000FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFF70000000000007FFFFFFF0FFFF
FFFF70000000000000000FFFFFF0FFFFFFF7000000000000078800FFFFF0FFFF
FF800000000000008877877FFFF0FFFFFF000000000000078878780FFFF0FFFF
F70000000000000788787877FFF0FFFFF00000000000000F7F8887F0FFF0FFFF
F00760666600007F78878F87FFF0FFFFF67767777600007877788F87FFF0FFFF
876777726700007787788778FFF0FFFF767767747670007677778888FFF0FFFF
766677707700007678778888FFF0FFFF760666700600007787678888FFF0FFFF
800000000000007877788878FFF0FFFFF00000000000068878878887FFF0FFFF
F06670677660077878778880FFF0FFFFF77776776776070788788880FFF0FFFF
F8777777677707088877888FFFF0FFFFFF788767877770708778780FFFF0FFFF
FFF77788807770706777808FFFF0FFFFFFF7707677777000007700FFFFF0FFFF
FFFF80000000000000000FFFFFF0FFFFFFFFFFF0000000000008FFFFFFF0FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFF
FFFFFFFFFFFF0000000100000001000000010000000100000001000000010000
0001000000010000000100000001000000010000000100000001000000010000
0001000000010000000100000001000000010000000100000001000000010000
000100000001000000010000000100000001000000010000000100000001}
Menu = MainMenu1
OldCreateOrder = False
Visible = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 8
Top = 176
Width = 673
Height = 105
Caption = #28155#21152#29992#25143
TabOrder = 0
Visible = False
object Label1: TLabel
Left = 16
Top = 32
Width = 48
Height = 13
Caption = #36710#29260#21495': '
end
object Label2: TLabel
Left = 360
Top = 32
Width = 36
Height = 13
Caption = #22995#21517': '
end
object Label3: TLabel
Left = 184
Top = 32
Width = 33
Height = 13
Caption = #36710#22411': '
end
object Label4: TLabel
Left = 496
Top = 32
Width = 33
Height = 13
Caption = #25163#26426': '
end
object Label5: TLabel
Left = 184
Top = 72
Width = 60
Height = 13
Caption = #36718#32974#22411#21495': '
end
object Label6: TLabel
Left = 360
Top = 72
Width = 33
Height = 13
Caption = #20215#26684': '
end
object Label7: TLabel
Left = 496
Top = 72
Width = 60
Height = 13
Caption = #32763#20462#26085#26399': '
end
object Label8: TLabel
Left = 16
Top = 72
Width = 57
Height = 13
Caption = #36718#32974#21697#29260': '
end
object DBEdit1: TDBEdit
Left = 72
Top = 24
Width = 105
Height = 21
DataField = #36710#29260#21495
DataSource = DataSource1
DragCursor = crHandPoint
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 240
Top = 24
Width = 113
Height = 21
DataField = #36710#22411
DataSource = DataSource1
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 392
Top = 24
Width = 97
Height = 21
DataField = #29992#25143
DataSource = DataSource1
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 552
Top = 24
Width = 89
Height = 21
DataField = #25163#26426
DataSource = DataSource1
TabOrder = 3
end
object DBEdit5: TDBEdit
Left = 72
Top = 64
Width = 105
Height = 21
DataField = #36718#32974#21697#29260
DataSource = DataSource1
TabOrder = 4
end
object DBEdit6: TDBEdit
Left = 240
Top = 64
Width = 113
Height = 21
DataField = #36718#32974#22411#21495
DataSource = DataSource1
TabOrder = 5
end
object DBEdit7: TDBEdit
Left = 392
Top = 64
Width = 97
Height = 21
DataField = #20215#26684
DataSource = DataSource1
TabOrder = 6
end
object DBEdit8: TDBEdit
Left = 552
Top = 64
Width = 89
Height = 21
DataField = #32763#20462#26085#26399
DataSource = DataSource1
DragMode = dmAutomatic
Enabled = False
TabOrder = 7
end
end
object DBGrid1: TDBGrid
Left = 8
Top = 8
Width = 673
Height = 169
DataSource = DataSource1
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Visible = False
Columns = <
item
Expanded = False
FieldName = #33258#21160#32534#21495
Width = 60
Visible = True
end
item
Expanded = False
FieldName = #36710#29260#21495
Width = 72
Visible = True
end
item
Expanded = False
FieldName = #36710#22411
Width = 60
Visible = True
end
item
Expanded = False
FieldName = #29992#25143
Width = 72
Visible = True
end
item
Expanded = False
FieldName = #25163#26426
Width = 72
Visible = True
end
item
Expanded = False
FieldName = #36718#32974#21697#29260
Width = 72
Visible = True
end
item
Expanded = False
FieldName = #36718#32974#22411#21495
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #20215#26684
Width = 72
Visible = True
end
item
Expanded = False
FieldName = #32763#20462#26085#26399
Width = 72
Visible = True
end>
end
object GroupBox2: TGroupBox
Left = 8
Top = 280
Width = 353
Height = 121
Caption = #26597#35810#21306
TabOrder = 2
Visible = False
object Label9: TLabel
Left = 8
Top = 32
Width = 48
Height = 13
Caption = #36710#29260#21495': '
end
object Label10: TLabel
Left = 8
Top = 64
Width = 60
Height = 13
Caption = #36718#32974#21697#29260': '
end
object btnLOOK: TButton
Left = 64
Top = 88
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 0
OnClick = btnLOOKClick
end
object btnMLOOK: TButton
Left = 216
Top = 88
Width = 75
Height = 25
Caption = #26376#26597#35810
TabOrder = 1
OnClick = btnMLOOKClick
end
object dtp_DateF: TDateTimePicker
Left = 160
Top = 24
Width = 81
Height = 21
CalAlignment = dtaLeft
Date = 39443
Time = 39443
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 2
OnChange = dtp_DateFChange
end
object edtDATEF: TEdit
Left = 160
Top = 56
Width = 81
Height = 21
TabOrder = 3
end
object dtp_DateL: TDateTimePicker
Left = 240
Top = 24
Width = 81
Height = 21
CalAlignment = dtaLeft
Date = 39443
Time = 39443
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 4
OnChange = dtp_DateLChange
end
object edtDATEL: TEdit
Left = 240
Top = 56
Width = 81
Height = 21
TabOrder = 5
end
object cbDATE: TComboBox
Left = 64
Top = 56
Width = 97
Height = 21
ItemHeight = 13
TabOrder = 6
OnChange = cbDATEChange
OnDropDown = cbDATEDropDown
end
object cbCARN: TComboBox
Left = 64
Top = 24
Width = 97
Height = 21
ItemHeight = 13
TabOrder = 7
OnChange = cbCARNChange
OnDropDown = cbCARNDropDown
end
end
object GroupBox3: TGroupBox
Left = 360
Top = 280
Width = 321
Height = 121
Caption = #25805#20316#21306
TabOrder = 3
Visible = False
object Button6: TButton
Left = 232
Top = 24
Width = 41
Height = 25
Caption = '>>|'
TabOrder = 0
OnClick = Button6Click
end
object Button4: TButton
Left = 232
Top = 64
Width = 41
Height = 25
Caption = #21462#28040
TabOrder = 1
OnClick = Button4Click
end
object Button3: TButton
Left = 184
Top = 64
Width = 41
Height = 25
Caption = #20462#25913
TabOrder = 2
OnClick = Button3Click
end
object Button5: TButton
Left = 184
Top = 24
Width = 41
Height = 25
Caption = '>>'
TabOrder = 3
OnClick = Button5Click
end
object Button7: TButton
Left = 136
Top = 24
Width = 41
Height = 25
Caption = '<<'
TabOrder = 4
OnClick = Button7Click
end
object Button2: TButton
Left = 136
Top = 64
Width = 41
Height = 25
Caption = #21024#38500
TabOrder = 5
OnClick = Button2Click
end
object Button1: TButton
Left = 88
Top = 64
Width = 41
Height = 25
Caption = #22686#21152
TabOrder = 6
OnClick = Button1Click
end
object Button8: TButton
Left = 88
Top = 24
Width = 41
Height = 25
Caption = '|<<'
TabOrder = 7
OnClick = Button8Click
end
object Button10: TButton
Left = 40
Top = 64
Width = 41
Height = 25
Caption = #21047#26032
TabOrder = 8
OnClick = Button10Click
end
end
object MainMenu1: TMainMenu
Left = 64
Top = 40
object N1: TMenuItem
Caption = #31995#32479'(&S)'
object N2: TMenuItem
Caption = #36830#25509#25968#25454#24211
OnClick = N2Click
end
object N3: TMenuItem
Caption = #20851#38381
OnClick = N3Click
end
end
end
object ADOConnection1: TADOConnection
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 24
Top = 40
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 152
Top = 72
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <>
SQL.Strings = (
'select * from '#23458#25143#36164#26009)
Left = 200
Top = 72
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -