unit1.dfm.~1~
来自「delphi2007开发的汽车配件进销存系统.实用级的源码.」· ~1~ 代码 · 共 222 行
~1~
222 行
object Form1: TForm1
Left = 0
Top = 0
Caption = #24211#23384#26597#35810
ClientHeight = 459
ClientWidth = 759
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object cxPageControl1: TcxPageControl
AlignWithMargins = True
Left = 3
Top = 3
Width = 753
Height = 453
ActivePage = cxTabSheet1
Align = alClient
ShowFrame = True
TabOrder = 0
ExplicitWidth = 694
ExplicitHeight = 413
ClientRectBottom = 452
ClientRectLeft = 1
ClientRectRight = 752
ClientRectTop = 24
object cxTabSheet1: TcxTabSheet
Caption = #24211#23384#31649#29702
ImageIndex = 0
ExplicitTop = 26
ExplicitWidth = 692
ExplicitHeight = 386
DesignSize = (
751
428)
object cxGroupBox2: TcxGroupBox
Left = 3
Top = 4
Anchors = [akLeft, akTop, akRight, akBottom]
Caption = #37197#20214#20449#24687
TabOrder = 0
ExplicitWidth = 686
ExplicitHeight = 342
DesignSize = (
745
384)
Height = 384
Width = 745
object cxTextEdit1: TcxTextEdit
Left = 3
Top = 20
Anchors = [akLeft, akTop, akRight]
Style.LookAndFeel.Kind = lfOffice11
Style.LookAndFeel.NativeStyle = False
StyleDisabled.LookAndFeel.Kind = lfOffice11
StyleDisabled.LookAndFeel.NativeStyle = False
StyleFocused.LookAndFeel.Kind = lfOffice11
StyleFocused.LookAndFeel.NativeStyle = False
StyleHot.LookAndFeel.Kind = lfOffice11
StyleHot.LookAndFeel.NativeStyle = False
TabOrder = 0
Text = #36755#20837#26597#35810#26465#20214'('#32534#30721#25110#21697#21517#25110#35268#26684')'
ExplicitWidth = 680
Width = 739
end
object DBGridEh2: TDBGridEh
Left = 3
Top = 41
Width = 739
Height = 340
Anchors = [akLeft, akTop, akRight, akBottom]
Flat = False
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'Tahoma'
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
SumList.Active = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = 'hw'
Footers = <>
Width = 54
end
item
EditButtons = <>
FieldName = 'bm'
Footers = <>
Width = 84
end
item
EditButtons = <>
FieldName = 'pm'
Footers = <>
Width = 73
end
item
EditButtons = <>
FieldName = 'gg'
Footers = <>
Width = 80
end
item
EditButtons = <>
FieldName = 'cd'
Footers = <>
Width = 74
end
item
EditButtons = <>
FieldName = 'dw'
Footers = <>
end
item
DisplayFormat = #65509'0.00'
EditButtons = <>
FieldName = 'jj'
Footers = <>
Visible = False
Width = 80
end
item
DisplayFormat = #65509'0.00'
EditButtons = <>
FieldName = 'dj'
Footers = <>
Width = 60
end
item
EditButtons = <>
FieldName = 'kcsl'
Footers = <>
end>
end
end
object Button1: TButton
Left = 747
Top = 426
Width = 33
Height = 25
Anchors = [akRight, akBottom]
Caption = '&D'
TabOrder = 5
ExplicitLeft = 688
ExplicitTop = 384
end
object cxTextEdit2: TcxTextEdit
Left = 289
Top = 396
Anchors = [akRight, akBottom]
TabOrder = 4
Text = '3'
ExplicitLeft = 230
ExplicitTop = 354
Width = 50
end
object cxButton2: TcxButton
Left = 343
Top = 392
Width = 142
Height = 28
Anchors = [akRight, akBottom]
Caption = #26174#31034#36798#21040#25253#35686#32447#30340#37197#20214
TabOrder = 3
ExplicitLeft = 284
ExplicitTop = 350
end
object cxButton3: TcxButton
Left = 578
Top = 392
Width = 88
Height = 28
Anchors = [akRight, akBottom]
Caption = #26174#31034#25152#26377
Enabled = False
TabOrder = 2
ExplicitLeft = 519
ExplicitTop = 350
end
object cxButton4: TcxButton
Left = 491
Top = 392
Width = 81
Height = 28
Anchors = [akRight, akBottom]
Caption = #20462#25913#24211#23384
Enabled = False
TabOrder = 1
ExplicitLeft = 432
ExplicitTop = 350
end
object cxButton5: TcxButton
Left = 672
Top = 392
Width = 75
Height = 29
Anchors = [akRight, akBottom]
Caption = #23548#20986
Enabled = False
TabOrder = 6
ExplicitLeft = 613
ExplicitTop = 350
end
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?