📄 test.dfm
字号:
object Form1: TForm1
Left = 248
Top = 172
Width = 696
Height = 480
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object CmbTimeMode: TComboBox
Left = 440
Top = 16
Width = 97
Height = 21
ItemHeight = 13
TabOrder = 0
Text = 'CmbTimeMode'
end
object DateTimePicker1: TDateTimePicker
Left = 440
Top = 40
Width = 97
Height = 21
CalAlignment = dtaLeft
Date = 38939.5385212269
Time = 38939.5385212269
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
object DBGridEh1: TDBGridEh
Left = 232
Top = 184
Width = 417
Height = 177
DataSource = DSGrid
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDrawDataCell = DBGrid1DrawDataCell
end
object DSGrid: TDataSource
DataSet = QurGrid
Left = 56
Top = 168
end
object QurGrid: TADOQuery
Active = True
Connection = frmDM.Con
CursorType = ctStatic
LockType = ltBatchOptimistic
Parameters = <>
SQL.Strings = (
'select * from DefClass_D')
Left = 88
Top = 168
end
object QurFree: TADOQuery
Connection = frmDM.Con
Parameters = <>
Left = 120
Top = 168
end
object mnuClassEdit: TPopupMenu
Left = 152
Top = 168
object N1: TMenuItem
Caption = #21024#38500#24403#21069#19968#34892
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -