📄 unit17.dfm
字号:
object Form17: TForm17
Left = 159
Top = 108
Width = 789
Height = 480
Caption = #26376#32467#34920#25171#21360
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 16
Width = 87
Height = 13
Caption = #35831#36755#20837#26597#35810#26465#20214':'
end
object DBGridEh1: TDBGridEh
Left = 0
Top = 63
Width = 781
Height = 383
Align = alBottom
DataSource = DataSource1
Flat = True
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDrawColumnCell = DBGridEh1DrawColumnCell
end
object ComboBox1: TComboBox
Left = 104
Top = 16
Width = 129
Height = 21
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = #21407#26009#20837#24211#21333#36164#26009
OnChange = ComboBox1Change
Items.Strings = (
#21407#26009#20837#24211#21333#36164#26009
#21407#26009#20986#24211#21333#36164#26009
#20135#21697#20837#24211#21333#36164#26009
#20135#21697#20986#24211#21333#36164#26009)
end
object Button1: TButton
Left = 448
Top = 16
Width = 81
Height = 25
Caption = #24320#22987#26597#35810
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 536
Top = 16
Width = 73
Height = 25
Caption = #25171#21360#39044#35272
TabOrder = 3
OnClick = Button2Click
end
object Button4: TButton
Left = 686
Top = 16
Width = 74
Height = 25
Caption = #36864' '#20986
TabOrder = 4
OnClick = Button4Click
end
object Button5: TButton
Left = 616
Top = 16
Width = 65
Height = 25
Caption = #26174#31034#25968#25454
TabOrder = 5
OnClick = Button5Click
end
object DateTimePicker1: TDateTimePicker
Left = 240
Top = 16
Width = 97
Height = 21
Date = 39202.637165428240000000
Time = 39202.637165428240000000
TabOrder = 6
end
object ComboBox2: TComboBox
Left = 240
Top = 40
Width = 41
Height = 21
ItemHeight = 13
ItemIndex = 0
TabOrder = 7
Text = '>'
Visible = False
Items.Strings = (
'>'
'>='
'='
'<'
'<='
'<>')
end
object DateTimePicker2: TDateTimePicker
Left = 344
Top = 16
Width = 89
Height = 25
Date = 39230.459949722220000000
Time = 39230.459949722220000000
TabOrder = 8
end
object DataSource1: TDataSource
DataSet = MyData.ADOQuery1
Left = 224
Top = 80
end
object PrintDBGridEh1: TPrintDBGridEh
DBGridEh = DBGridEh1
Options = []
Page.BottomMargin = 2.000000000000000000
Page.LeftMargin = 2.000000000000000000
Page.RightMargin = 2.000000000000000000
Page.TopMargin = 2.000000000000000000
PageFooter.Font.Charset = DEFAULT_CHARSET
PageFooter.Font.Color = clWindowText
PageFooter.Font.Height = -11
PageFooter.Font.Name = 'MS Sans Serif'
PageFooter.Font.Style = []
PageHeader.Font.Charset = DEFAULT_CHARSET
PageHeader.Font.Color = clWindowText
PageHeader.Font.Height = -11
PageHeader.Font.Name = 'MS Sans Serif'
PageHeader.Font.Style = []
Units = MM
Left = 160
Top = 104
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -