DELPHI 编写的生产企业管理软件 毛织管理器
源代码在线查看： nfinishpno.dfm.bak
object nfinishpnofm: Tnfinishpnofm
Left = 225
Top = 126
Width = 697
Height = 483
Caption = #26410#23436#24037#25209#34399#29983#29986#26597#35426
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 689
Height = 49
Align = alTop
Caption = #26597#35426#27396
TabOrder = 0
object Label1: TLabel
Left = 7
Top = 24
Width = 24
Height = 13
Caption = #26085#26399
end
object Label2: TLabel
Left = 100
Top = 24
Width = 12
Height = 13
Caption = #24180
end
object Label3: TLabel
Left = 154
Top = 24
Width = 12
Height = 13
Caption = #26376
end
object SpinEdit1: TSpinEdit
Left = 32
Top = 16
Width = 65
Height = 22
MaxValue = 0
MinValue = 0
TabOrder = 0
Value = 0
end
object SpinEdit2: TSpinEdit
Left = 112
Top = 16
Width = 41
Height = 22
MaxValue = 0
MinValue = 0
TabOrder = 1
Value = 0
end
object Button1: TButton
Left = 496
Top = 16
Width = 57
Height = 25
Caption = #26597#35426
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 552
Top = 16
Width = 57
Height = 25
Caption = #25171#21360
TabOrder = 3
OnClick = Button2Click
end
object Button3: TButton
Left = 608
Top = 16
Width = 57
Height = 25
Caption = #36864#20986
TabOrder = 4
OnClick = Button3Click
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 49
Width = 689
Height = 407
Align = alClient
Caption = #25976#25818#27396
TabOrder = 1
object DBGridEh1: TDBGridEh
Left = 2
Top = 15
Width = 685
Height = 390
Align = alClient
DataSource = nfinishshowdb
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
EditButtons =
FieldName = 'pno'
Footers =
MaxWidth = 80
MinWidth = 80
Title.Caption = #25209#34399
Width = 80
end
item
EditButtons =
FieldName = 'dept'
Footers =
MaxWidth = 60
Title.Caption = #37096#38272
Width = 60
end
item
EditButtons =
FieldName = 'scgx'
Footers =
Title.Caption = #24037#24207#20839#23481
Width = 120
end
item
EditButtons =
FieldName = 'lds'
Footers =
MaxWidth = 60
Title.Caption = #33853#21934#25976
Width = 60
end
item
EditButtons =
FieldName = 'monthnum'
Footers =
MaxWidth = 60
Title.Caption = #26412#26376#25976
Width = 60
end
item
DisplayFormat = '0.00'
EditButtons =
FieldName = 'price'
Footers =
MaxWidth = 60
Title.Caption = #26412#26376#20729
Width = 60
end
item
EditButtons =
FieldName = 'monthe'
Footers =
MaxWidth = 60
Title.Caption = #26412#26376#38989
Width = 60
end
item
EditButtons =
FieldName = 'totalnum'
Footers =
MaxWidth = 60
Title.Caption = #32047#35336#25976
Width = 60
end
item
EditButtons =
FieldName = 'totale'
Footers =
MaxWidth = 60
Title.Caption = #32047#35336#38989
Width = 60
end>
end
end
object nfinishqy: TQuery
DatabaseName = 're_data'
Left = 88
Top = 129
end
object nfinishshowqy: TQuery
DatabaseName = 're_data'
Left = 152
Top = 129
end
object nfinishshowdb: TDataSource
DataSet = nfinishshowqy
Left = 200
Top = 121
end
object PrintDBGridEh1: TPrintDBGridEh
DBGridEh = DBGridEh1
Options = [pghFitGridToPageWidth]
Page.BottomMargin = 2.000000000000000000
Page.LeftMargin = 2.000000000000000000
Page.RightMargin = 2.000000000000000000
Page.TopMargin = 2.000000000000000000
PageFooter.Font.Charset = DEFAULT_CHARSET
PageFooter.Font.Color = clWindowText
PageFooter.Font.Height = -11
PageFooter.Font.Name = 'MS Sans Serif'
PageFooter.Font.Style = []
PageHeader.Font.Charset = DEFAULT_CHARSET
PageHeader.Font.Color = clWindowText
PageHeader.Font.Height = -11
PageHeader.Font.Name = 'MS Sans Serif'
PageHeader.Font.Style = []
Units = MM
Left = 328
Top = 24
end
end
