📄 unit12.dfm
字号:
object Form12: TForm12
Left = 310
Top = 123
Width = 376
Height = 146
Caption = #24211#23384#32479#35745
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 Label1: TLabel
Left = 128
Top = 24
Width = 18
Height = 13
AutoSize = False
Caption = 'T O'
end
object Label2: TLabel
Left = 104
Top = 80
Width = 73
Height = 25
AutoSize = False
end
object Label3: TLabel
Left = 16
Top = 0
Width = 65
Height = 13
AutoSize = False
Caption = #36215#22987#26102#38388
end
object Label4: TLabel
Left = 16
Top = 40
Width = 65
Height = 17
AutoSize = False
Caption = #32467#26463#26102#38388
end
object startime: TDateTimePicker
Left = 104
Top = 0
Width = 113
Height = 21
CalAlignment = dtaLeft
Date = 38683.811131713
Time = 38683.811131713
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 0
end
object endtime: TDateTimePicker
Left = 104
Top = 40
Width = 113
Height = 21
CalAlignment = dtaLeft
Date = 38683.813388831
Time = 38683.813388831
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
object Button1: TButton
Left = 272
Top = 24
Width = 89
Height = 25
Caption = #24211#23384#32479#35745
TabOrder = 2
OnClick = Button1Click
end
object ADOQuery1: TADOQuery
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=jxc.mdb;Persist Sec' +
'urity Info=False'
Parameters = <>
Left = 240
end
object ADOQuery2: TADOQuery
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=jxc.mdb;Persist Sec' +
'urity Info=False'
Parameters = <>
Left = 240
Top = 32
end
object ADOTable1: TADOTable
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=jxc.mdb;Persist Sec' +
'urity Info=False'
CursorType = ctStatic
TableName = 'KC'
Left = 208
end
object frReport1: TfrReport
Dataset = frDBDataSet1
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
RebuildPrinter = False
Left = 208
Top = 72
ReportForm = {19000000}
end
object frDBDataSet1: TfrDBDataSet
DataSet = ADOTable1
Left = 248
Top = 72
end
object ADOTable2: TADOTable
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=jxc.mdb;Persist Sec' +
'urity Info=False'
CursorType = ctStatic
TableName = 'IO'
Top = 80
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -