?? dailycard.dfm
字號:
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFC8CF
FFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8
CF60302F60302F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000
FFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8
CFFFC8CF60302F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
000000FFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8
CF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFF000000FFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CFFFC8CF0000000000
00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF000000FFC8CFFFC8CFFFC8CFFFC8CF000000000000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF000000FFC8CF000000000000FFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
end
object Edit1: TEdit
Left = 418
Top = 12
Width = 77
Height = 21
CharCase = ecUpperCase
Color = clWhite
TabOrder = 4
end
object DateTimePicker2: TDateTimePicker
Left = 125
Top = 12
Width = 81
Height = 21
CalAlignment = dtaLeft
Date = 37529.5015590741
Time = 37529.5015590741
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 5
end
end
object wwDBGrid1: TwwDBGrid
Left = 0
Top = 85
Width = 712
Height = 259
ControlType.Strings = (
'lChecked;CheckBox;true;false')
Selected.Strings = (
'dDate'#9'9'#9#26085#26399
'cWorkerNo'#9'8'#9#24037#34399
'cWorkerName'#9'7'#9#22995#21517
'DepartMentName'#9'13'#9#37096#38272#9'F'
'cClassNo'#9'5'#9#20195#30908#9'F'#9#29677#21029
'ClassName'#9'13'#9#21517#31281#9'F'#9#29677#21029
'tIn1'#9'17'#9#19978#29677#9'F'#9#29677#19968
'tOut1'#9'17'#9#19979#29677#9'F'#9#29677#19968
'CStatus1'#9'6'#9#29376#24907#9'F'#9#29677#19968
'tIn2'#9'17'#9#19978#29677#9'F'#9#29677#20108
'tOut2'#9'17'#9#19979#29677#9'F'#9#29677#20108
'cStatus2'#9'7'#9#29376#24907#9'F'#9#29677#20108
'tIn3'#9'17'#9#19978#29677#9'F'#9#21152#29677
'tOut3'#9'17'#9#19979#29677#9'F'#9#21152#29677
'iLaterTime'#9'6'#9#26178#38291#9'F'#9#36978#21040
'iLaterTimes'#9'4'#9#27425#25976#9'F'#9#36978#21040
'iLeaveEarlyTime'#9'5'#9#26178#38291#9'F'#9#26089#36864
'iLeaveEarlyTimes'#9'4'#9#27425#25976#9'F'#9#26089#36864
'iOverTime'#9'10'#9#21152#29677#26178#38291#9'F'
'iFreeTime'#9'10'#9#25918#20551#26178#38291#9'F'
'iLeaveTime'#9'10'#9#35531#20551#26178#38291#9'F'
'iUnOutTime'#9'10'#9#26336#24037#26178#38291#9'F'
'lChecked'#9'5'#9#30906#35469#9'F'
'cNote'#9'12'#9#29376#24907#9'F'
'cMemo'#9'21'#9#20633#27880#9'F'
'cUser'#9'8'#9#29992#25142#9'F'
'tUpdateTime'#9'22'#9#26356#26032#26178#38291#9'F'
'cAction'#9'6'#9#21205#20316#9'F')
MemoAttributes = [mSizeable, mWordWrap, mGridShow]
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 3
ShowHorzScrollBar = True
Align = alClient
DataSource = DataSource
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #26032#32048#26126#39636
Font.Style = []
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgShowCellHint]
ParentFont = False
ReadOnly = True
TabOrder = 2
TitleAlignment = taCenter
TitleFont.Charset = CHINESEBIG5_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #26032#32048#26126#39636
TitleFont.Style = []
TitleLines = 2
TitleButtons = False
UseTFields = False
OnCalcCellColors = wwDBGrid1CalcCellColors
PaintOptions.AlternatingRowColor = clInfoBk
end
object ADOQuery1: TADOQuery
Active = True
Connection = fDataMod.AdoCon
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'Select * From DailyCard Order by dDate,cWorkerNo')
Left = 352
Top = 120
object ADOQuery1dDate: TDateTimeField
FieldName = 'dDate'
end
object ADOQuery1cWorkerNo: TStringField
FieldName = 'cWorkerNo'
Size = 8
end
object ADOQuery1cWorkerName: TStringField
FieldName = 'cWorkerName'
Size = 8
end
object ADOQuery1cClassNo: TStringField
FieldName = 'cClassNo'
Size = 5
end
object ADOQuery1ClassName: TStringField
FieldKind = fkLookup
FieldName = 'ClassName'
LookupDataSet = ADOTable2
LookupKeyFields = 'cClassNo'
LookupResultField = 'cClassName'
KeyFields = 'cClassNo'
Lookup = True
end
object ADOQuery1cNote: TStringField
FieldName = 'cNote'
Size = 30
end
object ADOQuery1cMemo: TMemoField
FieldName = 'cMemo'
BlobType = ftMemo
end
object ADOQuery1iLaterTime: TIntegerField
FieldName = 'iLaterTime'
end
object ADOQuery1iLaterTimes: TIntegerField
FieldName = 'iLaterTimes'
end
object ADOQuery1iLeaveEarlyTime: TIntegerField
FieldName = 'iLeaveEarlyTime'
end
object ADOQuery1iLeaveEarlyTimes: TIntegerField
FieldName = 'iLeaveEarlyTimes'
end
object ADOQuery1iOverTime: TIntegerField
FieldName = 'iOverTime'
end
object ADOQuery1cUser: TStringField
Alignment = taCenter
FieldName = 'cUser'
Size = 8
end
object ADOQuery1tUpdateTime: TDateTimeField
FieldName = 'tUpdateTime'
end
object ADOQuery1cAction: TStringField
Alignment = taCenter
FieldName = 'cAction'
Size = 4
end
object ADOQuery1DepartMentName: TStringField
FieldKind = fkLookup
FieldName = 'DepartMentName'
LookupDataSet = ADOTable1
LookupKeyFields = 'cWorkerNo'
LookupResultField = 'cDepartmentName'
KeyFields = 'cWorkerNo'
Lookup = True
end
object ADOQuery1tIn1: TDateTimeField
Alignment = taCenter
FieldName = 'tIn1'
DisplayFormat = 'yyyy/mm/dd hh:mm:ss'
end
object ADOQuery1tOut1: TDateTimeField
Alignment = taCenter
FieldName = 'tOut1'
DisplayFormat = 'yyyy/mm/dd hh:mm:ss'
end
object ADOQuery1tIn2: TDateTimeField
Alignment = taCenter
FieldName = 'tIn2'
DisplayFormat = 'yyyy/mm/dd hh:mm:ss'
end
object ADOQuery1tOut2: TDateTimeField
Alignment = taCenter
FieldName = 'tOut2'
DisplayFormat = 'yyyy/mm/dd hh:mm:ss'
end
object ADOQuery1tIn3: TDateTimeField
Alignment = taCenter
FieldName = 'tIn3'
DisplayFormat = 'yyyy/mm/dd hh:mm:ss'
end
object ADOQuery1tOut3: TDateTimeField
Alignment = taCenter
FieldName = 'tOut3'
DisplayFormat = 'yyyy/mm/dd hh:mm:ss'
end
object ADOQuery1CStatus1: TStringField
Alignment = taCenter
FieldName = 'CStatus1'
Size = 10
end
object ADOQuery1cStatus2: TStringField
Alignment = taCenter
FieldName = 'cStatus2'
Size = 10
end
object ADOQuery1iFreeTime: TIntegerField
FieldName = 'iFreeTime'
end
object ADOQuery1iLeaveTime: TIntegerField
FieldName = 'iLeaveTime'
end
object ADOQuery1iUnOutTime: TIntegerField
FieldName = 'iUnOutTime'
end
object ADOQuery1lChecked: TBooleanField
FieldName = 'lChecked'
end
end
object DataSource: TDataSource
DataSet = ADOQuery1
Left = 312
Top = 120
end
object ADOTable1: TADOTable
Active = True
Connection = fDataMod.AdoCon
CursorType = ctStatic
TableName = 'V_Workers'
Left = 352
Top = 152
end
object ADOTable2: TADOTable
Active = True
Connection = fDataMod.AdoCon
CursorType = ctStatic
TableName = 'Class'
Left = 352
Top = 184
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -