📄 cost.dfm
字号:
object CostForm: TCostForm
Left = 503
Top = 170
Width = 442
Height = 317
BorderIcons = [biHelp]
Caption = #26657#22253#21047#21345#28040#36153#31995#32479'-'#21047#21345#21592#23376#31995#32479
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
OnActivate = FormActivate
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 32
Top = 231
Width = 75
Height = 13
Caption = #24403#21069#25805#20316#21592' '
end
object showname: TLabel
Left = 115
Top = 231
Width = 99
Height = 13
Caption = ' '
Visible = False
end
object showtime: TLabel
Left = 216
Top = 231
Width = 126
Height = 13
Caption = ' '
end
object Button1: TButton
Left = 348
Top = 220
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 0
OnClick = N4Click
end
object LabeledEdit1: TLabeledEdit
Left = 96
Top = 16
Width = 121
Height = 21
EditLabel.Width = 81
EditLabel.Height = 13
EditLabel.Caption = #35831#36755#20837#21345#21495#65306' '
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
LabelPosition = lpLeft
LabelSpacing = 3
TabOrder = 1
OnKeyDown = LabeledEdit1KeyDown
end
object GroupBox1: TGroupBox
Left = 8
Top = 48
Width = 185
Height = 169
Caption = #23398#29983#21345#20449#24687#26174#31034
TabOrder = 2
object LabeledEdit2: TLabeledEdit
Left = 24
Top = 40
Width = 121
Height = 21
EditLabel.Width = 36
EditLabel.Height = 13
EditLabel.Caption = #22995#21517#65306
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
LabelPosition = lpAbove
LabelSpacing = 3
ReadOnly = True
TabOrder = 0
end
object LabeledEdit3: TLabeledEdit
Left = 24
Top = 84
Width = 121
Height = 21
EditLabel.Width = 48
EditLabel.Height = 13
EditLabel.Caption = #24615#21035#65306' '
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 1
end
object LabeledEdit4: TLabeledEdit
Left = 24
Top = 132
Width = 121
Height = 21
EditLabel.Width = 45
EditLabel.Height = 13
EditLabel.Caption = #20313#39069#65306' '
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 2
end
end
object GroupBox2: TGroupBox
Left = 208
Top = 48
Width = 185
Height = 169
Caption = #21047#21345#25805#20316#21306#22495
TabOrder = 3
object LabeledEdit5: TLabeledEdit
Left = 24
Top = 40
Width = 121
Height = 21
EditLabel.Width = 63
EditLabel.Height = 13
EditLabel.Caption = #21047#21345#37329#39069#65306' '
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 0
OnKeyDown = LabeledEdit5KeyDown
end
object LabeledEdit6: TLabeledEdit
Left = 24
Top = 84
Width = 121
Height = 21
EditLabel.Width = 93
EditLabel.Height = 13
EditLabel.Caption = #23494#30721#36755#20837#21306#22495#65306' '
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 1
Visible = False
OnKeyDown = LabeledEdit6KeyDown
end
object Button2: TButton
Left = 48
Top = 120
Width = 75
Height = 25
Caption = #25764#38144
TabOrder = 2
OnClick = Button2Click
end
end
object Timer1: TTimer
OnTimer = Timer1Timer
Top = 224
end
object Query1: TQuery
DatabaseName = 'SK'
Left = 328
end
object Query2: TQuery
DatabaseName = 'SK'
Left = 296
end
object Query3: TQuery
DatabaseName = 'SK'
Left = 264
end
object MainMenu1: TMainMenu
Left = 368
object N1: TMenuItem
Caption = #25991#20214'(&X)'
object N4: TMenuItem
Caption = #20851#38381'(&Y)'
OnClick = N4Click
end
object N5: TMenuItem
Caption = '-'
end
object N6: TMenuItem
Caption = #36864#20986'(&Z)'
end
end
object N2: TMenuItem
Caption = #26597#35810'(&Y)'
object N7: TMenuItem
Caption = #24320#22987#24037#20316#26102#38388'(&T)'
OnClick = N7Click
end
object N8: TMenuItem
Caption = '-'
end
object N9: TMenuItem
Caption = #21047#21345#23398#29983#25968'(&S)'
OnClick = N9Click
end
object N10: TMenuItem
Caption = #21047#21345#24635#37329#39069'(&M)'
OnClick = N10Click
end
object N14: TMenuItem
Caption = #26412#26426#21047#21345#32426#24405'(&C)'
ShortCut = 16451
OnClick = N14Click
end
end
object N3: TMenuItem
Caption = #24110#21161'(&Z)'
object N11: TMenuItem
Caption = #20851#20110#26657#22253#21047#21345#28040#36153#31995#32479#21047#21345#23376#31995#32479'(&H)'
OnClick = N11Click
end
object N12: TMenuItem
Caption = '-'
end
object N13: TMenuItem
Caption = #20851#20110'...(&G)'
OnClick = N13Click
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -