?? tass00_01.dfm.svn-base
字號:
inherited TasS00_01Form: TTasS00_01Form
Left = 147
Top = 132
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #20219#21153#31649#29702#21442#25968
ClientHeight = 367
ClientWidth = 521
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
object PageControl1: TPageControl [0]
Left = 8
Top = 8
Width = 505
Height = 321
ActivePage = TabSheet1
TabIndex = 0
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #21442#25968#35774#32622
object gbUnit: TGroupBox
Left = 8
Top = 8
Width = 481
Height = 73
Caption = #26102#38388#21333#20301
TabOrder = 0
object lblUnit: TLabel
Tag = 1
Left = 8
Top = 24
Width = 48
Height = 12
Caption = #26102#38388#21333#20301
end
object lblDay: TLabel
Left = 200
Top = 24
Width = 48
Height = 12
Caption = #26102#20026#19968#22825
end
object lblWeek: TLabel
Left = 312
Top = 24
Width = 48
Height = 12
Caption = #22825#20026#19968#21608
end
object lblMonth: TLabel
Left = 425
Top = 24
Width = 48
Height = 12
Caption = #22825#20026#19968#26376
end
object cbUnit: TComboBox
Left = 64
Top = 16
Width = 65
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 1
TabOrder = 0
Text = #22825
Items.Strings = (
#26102
#22825
#21608
#26376)
end
object edtDay: TEdit
Left = 152
Top = 16
Width = 41
Height = 20
TabOrder = 1
Text = '8'
OnKeyPress = edtDayKeyPress
end
object edtWeek: TEdit
Left = 264
Top = 16
Width = 41
Height = 20
TabOrder = 2
Text = '5'
OnKeyPress = edtWeekKeyPress
end
object edtMonth: TEdit
Left = 376
Top = 16
Width = 41
Height = 20
TabOrder = 3
Text = '22'
OnKeyPress = edtMonthKeyPress
end
object cbChangeUnit: TCheckBox
Left = 64
Top = 48
Width = 257
Height = 17
Caption = #20801#35768#21333#25454#24405#20837#26102#26356#25913#26102#38388#21333#20301
TabOrder = 4
end
end
object gbPriority: TGroupBox
Left = 8
Top = 88
Width = 481
Height = 49
Caption = #20248#20808#32423#21035
TabOrder = 1
object lblPriority: TLabel
Left = 8
Top = 24
Width = 48
Height = 12
Caption = #20248#20808#32423#21035
end
object lblDefault: TLabel
Left = 208
Top = 24
Width = 72
Height = 12
Caption = #20248#20808#32423#32570#30465#20540
end
object edtHight: TEdit
Left = 64
Top = 16
Width = 49
Height = 20
TabOrder = 0
Text = '1'
OnKeyPress = edtHightKeyPress
end
object edtLow: TEdit
Left = 120
Top = 16
Width = 49
Height = 20
TabOrder = 1
Text = '100'
OnKeyPress = edtLowKeyPress
end
object edtDefault: TEdit
Left = 288
Top = 16
Width = 65
Height = 20
TabOrder = 2
Text = '50'
OnKeyPress = edtDefaultKeyPress
end
end
object gbOther: TGroupBox
Left = 8
Top = 144
Width = 481
Height = 137
Caption = #20854#20182#21442#25968
TabOrder = 2
object cbDelete: TCheckBox
Left = 8
Top = 16
Width = 337
Height = 17
Caption = #20801#35768#21024#38500#29366#24577#20026#23436#25104#30340#20219#21153#35745#21010#19979#30340#20219#21153#27719#25253#21333
Checked = True
State = cbChecked
TabOrder = 0
end
object cbStatus: TCheckBox
Left = 8
Top = 40
Width = 457
Height = 17
Caption = #20351#29992#39068#33394#26631#26126#20219#21153#30340#29366#24577#12290#22914#65306#35745#21010'='#40657#33394#65292#25191#34892'='#34013#33394#65292#23436#25104'='#28784#33394#65292#36820#24037'='#32418#33394
Checked = True
State = cbChecked
TabOrder = 1
end
object cbUpdate: TCheckBox
Left = 8
Top = 64
Width = 353
Height = 17
Caption = #20219#21153#23436#25104#26102#65292#21453#20889#23458#25143#36164#26009#30340#20135#21697#20449#24687'('#23433#35013#26085#26399#12289#20445#20859#26085#26399')'
TabOrder = 2
end
object cbHours: TCheckBox
Left = 8
Top = 88
Width = 353
Height = 17
Caption = #20219#21153#27719#25253#26102#65292#26159#21542#24405#20837#35814#32454#30340#24037#26102#20449#24687
TabOrder = 3
end
object cbItems: TCheckBox
Left = 8
Top = 112
Width = 353
Height = 17
Caption = #20219#21153#27719#25253#26102#65292#26159#21542#24405#20837#35814#32454#30340#38646#20214#20449#24687
TabOrder = 4
end
object cbClass: TComboBox
Left = 360
Top = 61
Width = 81
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 5
end
end
end
object TabSheet2: TTabSheet
Caption = #20854#20182#21442#25968
ImageIndex = 1
object Label1: TLabel
Left = 8
Top = 8
Width = 192
Height = 12
Caption = #24050#23436#25104#25968#25454#32479#35745#21253#21547#19979#21015#29366#24577#30340#21333#25454
end
object lblByTotal: TLabel
Left = 8
Top = 236
Width = 24
Height = 12
Caption = #25353#29031
end
object lblTotal: TLabel
Left = 168
Top = 236
Width = 120
Height = 12
Caption = #32479#35745#20219#21153#35745#21010#30340#24635#25968#37327
end
object lblByFinish: TLabel
Left = 8
Top = 260
Width = 24
Height = 12
Caption = #25353#29031
end
object lblFinish: TLabel
Left = 168
Top = 260
Width = 132
Height = 12
Caption = #32479#35745#20219#21153#35745#21010#30340#23436#25104#25968#37327
end
object dxDBGrid1: TdxDBGrid
Left = 8
Top = 24
Width = 481
Height = 193
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'FNo'
SummaryGroups = <>
SummarySeparator = ', '
TabOrder = 0
OnKeyPress = dxDBGrid1KeyPress
OnMouseUp = dxDBGrid1MouseUp
DataSource = dsTas120
Filter.Criteria = {00000000}
HideFocusRect = True
OptionsDB = [edgoCancelOnExit, edgoCanNavigation, edgoConfirmDelete, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoRowSelect, edgoUseBitmap]
object dxDBGrid1FSel: TdxDBGridCheckColumn
HeaderAlignment = taCenter
Width = 47
BandIndex = 0
RowIndex = 0
FieldName = 'FSel'
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object dxDBGrid1FName: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 137
BandIndex = 0
RowIndex = 0
FieldName = 'FName'
end
object dxDBGrid1FRemark: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 267
BandIndex = 0
RowIndex = 0
FieldName = 'FRemark'
end
end
object cbTotal: TComboBox
Left = 40
Top = 232
Width = 121
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 0
TabOrder = 1
Text = #30003#25253#26085#26399
Items.Strings = (
#30003#25253#26085#26399
#38656#27714#26085#26399
#39044#35745#24320#22987#26085#26399
#39044#35745#23436#25104#26085#26399
#23454#38469#24320#22987#26085#26399
#23454#38469#23436#25104#26085#26399)
end
object cbFinish: TComboBox
Left = 40
Top = 256
Width = 121
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 5
TabOrder = 2
Text = #23454#38469#23436#25104#26085#26399
Items.Strings = (
#30003#25253#26085#26399
#38656#27714#26085#26399
#39044#35745#24320#22987#26085#26399
#39044#35745#23436#25104#26085#26399
#23454#38469#24320#22987#26085#26399
#23454#38469#23436#25104#26085#26399)
end
end
end
object bbtnOk: TBitBtn [1]
Left = 344
Top = 336
Width = 75
Height = 25
Caption = #30830#23450'(&O)'
TabOrder = 1
OnClick = bbtnOkClick
end
object bbtnExit: TBitBtn [2]
Left = 432
Top = 336
Width = 75
Height = 25
Caption = #36864#20986'(&X)'
TabOrder = 2
OnClick = bbtnExitClick
end
inherited pmUISet: TPopupMenu
Left = 264
Top = 312
end
object dsTas120: TDataSource
DataSet = adsTas120
Left = 184
Top = 112
end
object adsTas120: TADODataSet
Connection = SYSDM.ADOC
CursorType = ctStatic
LockType = ltBatchOptimistic
FieldDefs = <
item
Name = 'FSel'
Attributes = [faReadonly, faFixed]
DataType = ftInteger
end
item
Name = 'FNo'
Attributes = [faFixed]
DataType = ftInteger
end
item
Name = 'FName'
DataType = ftWideString
Size = 50
end>
Parameters = <>
StoreDefs = True
Left = 200
Top = 128
object adsTas120FSel: TBooleanField
DisplayLabel = #36873#25321
FieldName = 'FSel'
end
object adsTas120FNo: TIntegerField
FieldName = 'FNo'
Visible = False
end
object adsTas120FName: TStringField
DisplayLabel = #29366#24577
FieldName = 'FName'
Size = 50
end
object adsTas120FRemark: TStringField
DisplayLabel = #22791#27880
FieldName = 'FRemark'
Size = 100
end
end
object qryQuery: TADOQuery
Connection = SYSDM.ADOC
Parameters = <>
Left = 288
Top = 104
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -