~
This commit is contained in:
parent
e9e8114c97
commit
fc22888ad5
|
|
@ -7,19 +7,19 @@ object frmMJEdit: TfrmMJEdit
|
|||
Color = clBtnFace
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -15
|
||||
Font.Height = -12
|
||||
Font.Name = #23435#20307
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
OnClose = FormClose
|
||||
OnDestroy = FormDestroy
|
||||
OnShow = FormShow
|
||||
PixelsPerInch = 120
|
||||
TextHeight = 15
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 12
|
||||
object ToolBar1: TToolBar
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 852
|
||||
Width = 854
|
||||
Height = 30
|
||||
ButtonHeight = 30
|
||||
ButtonWidth = 59
|
||||
|
|
@ -82,159 +82,159 @@ object frmMJEdit: TfrmMJEdit
|
|||
object Panel1: TPanel
|
||||
Left = 0
|
||||
Top = 30
|
||||
Width = 852
|
||||
Height = 93
|
||||
Width = 854
|
||||
Height = 75
|
||||
Align = alTop
|
||||
BevelInner = bvRaised
|
||||
BevelOuter = bvLowered
|
||||
Color = clSkyBlue
|
||||
TabOrder = 1
|
||||
object Label1: TLabel
|
||||
Left = 31
|
||||
Top = 20
|
||||
Width = 64
|
||||
Height = 15
|
||||
Left = 25
|
||||
Top = 16
|
||||
Width = 52
|
||||
Height = 12
|
||||
Caption = #24067#21305#26465#30721
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clBlack
|
||||
Font.Height = -15
|
||||
Font.Height = -12
|
||||
Font.Name = #23435#20307
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object Label2: TLabel
|
||||
Left = 41
|
||||
Top = 60
|
||||
Width = 9
|
||||
Height = 15
|
||||
Left = 33
|
||||
Top = 48
|
||||
Width = 7
|
||||
Height = 12
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clRed
|
||||
Font.Height = -15
|
||||
Font.Height = -12
|
||||
Font.Name = #23435#20307
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
Visible = False
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 270
|
||||
Top = 60
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 216
|
||||
Top = 48
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #27611#37325
|
||||
end
|
||||
object M: TLabel
|
||||
Left = 625
|
||||
Top = 20
|
||||
Width = 8
|
||||
Height = 15
|
||||
Left = 500
|
||||
Top = 16
|
||||
Width = 6
|
||||
Height = 12
|
||||
Caption = 'M'
|
||||
end
|
||||
object Label6: TLabel
|
||||
Left = 524
|
||||
Top = 20
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 419
|
||||
Top = 16
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #38271#24230
|
||||
end
|
||||
object Ma: TLabel
|
||||
Left = 380
|
||||
Top = 110
|
||||
Width = 8
|
||||
Height = 15
|
||||
Left = 304
|
||||
Top = 88
|
||||
Width = 6
|
||||
Height = 12
|
||||
Caption = 'M'
|
||||
end
|
||||
object Label7: TLabel
|
||||
Left = 279
|
||||
Top = 110
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 223
|
||||
Top = 88
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #21407#30721
|
||||
end
|
||||
object Label5: TLabel
|
||||
Left = 385
|
||||
Top = 145
|
||||
Width = 8
|
||||
Height = 15
|
||||
Left = 308
|
||||
Top = 116
|
||||
Width = 6
|
||||
Height = 12
|
||||
Caption = 'M'
|
||||
end
|
||||
object Label8: TLabel
|
||||
Left = 279
|
||||
Top = 150
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 223
|
||||
Top = 120
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #24133#23485
|
||||
end
|
||||
object Label9: TLabel
|
||||
Left = 395
|
||||
Top = 140
|
||||
Width = 16
|
||||
Height = 15
|
||||
Left = 316
|
||||
Top = 112
|
||||
Width = 12
|
||||
Height = 12
|
||||
Caption = 'cm'
|
||||
end
|
||||
object Label10: TLabel
|
||||
Left = 375
|
||||
Top = 60
|
||||
Width = 16
|
||||
Height = 15
|
||||
Left = 300
|
||||
Top = 48
|
||||
Width = 12
|
||||
Height = 12
|
||||
Caption = 'Kg'
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 414
|
||||
Top = 125
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 331
|
||||
Top = 100
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #20811#37325
|
||||
end
|
||||
object Label11: TLabel
|
||||
Left = 515
|
||||
Top = 125
|
||||
Width = 31
|
||||
Height = 15
|
||||
Left = 412
|
||||
Top = 100
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = 'g/'#13217
|
||||
end
|
||||
object Label13: TLabel
|
||||
Left = 549
|
||||
Top = 150
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 423
|
||||
Top = 48
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #36192#36865
|
||||
end
|
||||
object Label12: TLabel
|
||||
Left = 395
|
||||
Top = 60
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 316
|
||||
Top = 48
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #20928#37325
|
||||
end
|
||||
object Label14: TLabel
|
||||
Left = 505
|
||||
Top = 60
|
||||
Width = 16
|
||||
Height = 15
|
||||
Left = 404
|
||||
Top = 48
|
||||
Width = 12
|
||||
Height = 12
|
||||
Caption = 'Kg'
|
||||
end
|
||||
object Label15: TLabel
|
||||
Left = 270
|
||||
Top = 20
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 216
|
||||
Top = 16
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #21367#21495
|
||||
end
|
||||
object Label16: TLabel
|
||||
Left = 395
|
||||
Top = 20
|
||||
Width = 30
|
||||
Height = 15
|
||||
Left = 316
|
||||
Top = 16
|
||||
Width = 24
|
||||
Height = 12
|
||||
Caption = #32568#21495
|
||||
end
|
||||
object MJID: TEdit
|
||||
Left = 100
|
||||
Top = 13
|
||||
Width = 138
|
||||
Height = 24
|
||||
Left = 80
|
||||
Top = 10
|
||||
Width = 110
|
||||
Height = 30
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -22
|
||||
Font.Height = -19
|
||||
Font.Name = #23435#20307
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
|
|
@ -242,24 +242,24 @@ object frmMJEdit: TfrmMJEdit
|
|||
OnKeyPress = MJIDKeyPress
|
||||
end
|
||||
object MJMaoZ: TEdit
|
||||
Left = 305
|
||||
Top = 55
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 244
|
||||
Top = 44
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 5
|
||||
end
|
||||
object MJLen: TEdit
|
||||
Left = 555
|
||||
Top = 15
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 444
|
||||
Top = 12
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 4
|
||||
end
|
||||
object RadioGroup1: TRadioGroup
|
||||
Left = 830
|
||||
Top = 10
|
||||
Width = 191
|
||||
Height = 81
|
||||
Left = 664
|
||||
Top = 8
|
||||
Width = 153
|
||||
Height = 65
|
||||
Columns = 3
|
||||
ItemIndex = 0
|
||||
Items.Strings = (
|
||||
|
|
@ -268,62 +268,62 @@ object frmMJEdit: TfrmMJEdit
|
|||
TabOrder = 0
|
||||
end
|
||||
object MJQty1: TEdit
|
||||
Left = 310
|
||||
Top = 105
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 248
|
||||
Top = 84
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 7
|
||||
end
|
||||
object MJFK: TEdit
|
||||
Left = 310
|
||||
Top = 145
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 248
|
||||
Top = 116
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 9
|
||||
end
|
||||
object MJSJKZ: TEdit
|
||||
Left = 445
|
||||
Top = 120
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 356
|
||||
Top = 96
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 8
|
||||
end
|
||||
object MJQty2: TEdit
|
||||
Left = 580
|
||||
Top = 145
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 448
|
||||
Top = 42
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 10
|
||||
end
|
||||
object MJQty4: TEdit
|
||||
Left = 430
|
||||
Top = 55
|
||||
Width = 68
|
||||
Height = 20
|
||||
Left = 344
|
||||
Top = 44
|
||||
Width = 54
|
||||
Height = 23
|
||||
TabOrder = 6
|
||||
end
|
||||
object MJXH: TEdit
|
||||
Left = 305
|
||||
Top = 15
|
||||
Width = 66
|
||||
Height = 20
|
||||
Left = 244
|
||||
Top = 12
|
||||
Width = 53
|
||||
Height = 23
|
||||
TabOrder = 2
|
||||
Text = 'MJXH'
|
||||
end
|
||||
object MJstr4: TEdit
|
||||
Left = 430
|
||||
Top = 15
|
||||
Width = 66
|
||||
Height = 20
|
||||
Left = 344
|
||||
Top = 12
|
||||
Width = 53
|
||||
Height = 23
|
||||
TabOrder = 3
|
||||
Text = 'Edit1'
|
||||
end
|
||||
end
|
||||
object cxGrid2: TcxGrid
|
||||
Left = 0
|
||||
Top = 123
|
||||
Width = 852
|
||||
Height = 332
|
||||
Top = 105
|
||||
Width = 854
|
||||
Height = 356
|
||||
Align = alClient
|
||||
TabOrder = 2
|
||||
object Tv2: TcxGridDBTableView
|
||||
|
|
|
|||
|
|
@ -8,7 +8,21 @@ uses
|
|||
cxEdit, DB, cxDBData, cxTextEdit, DBClient, ADODB, cxGridLevel,
|
||||
cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxClasses,
|
||||
cxControls, cxGridCustomView, cxGrid, StdCtrls, ExtCtrls, ComCtrls, ToolWin,
|
||||
cxButtonEdit, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator;
|
||||
cxButtonEdit, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
|
||||
dxSkinsCore, dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel,
|
||||
dxSkinCoffee, dxSkinDarkRoom, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
|
||||
dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans,
|
||||
dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky,
|
||||
dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
|
||||
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
|
||||
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
|
||||
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
|
||||
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
|
||||
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinPumpkin,
|
||||
dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus,
|
||||
dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008,
|
||||
dxSkinTheAsphaltWorld, dxSkinsDefaultPainters, dxSkinValentine,
|
||||
dxSkinVS2010, dxSkinWhiteprint, dxSkinXmas2008Blue, dxSkinscxPCPainter;
|
||||
|
||||
type
|
||||
TfrmMJEdit = class(TForm)
|
||||
|
|
@ -410,7 +424,7 @@ begin
|
|||
sql.Add(',MJLen=0');
|
||||
end;
|
||||
if Trim(MJQty1.Text) <> '' then
|
||||
begin
|
||||
begin
|
||||
sql.Add(',MJQty1=' + Trim(MJQty1.Text));
|
||||
end
|
||||
else
|
||||
|
|
|
|||
|
|
@ -123,9 +123,9 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
end
|
||||
object ScrollBox1: TScrollBox
|
||||
Left = 633
|
||||
Left = 635
|
||||
Top = 87
|
||||
Width = 717
|
||||
Width = 715
|
||||
Height = 628
|
||||
Align = alClient
|
||||
Color = clWhite
|
||||
|
|
@ -976,7 +976,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
object Panel2: TPanel
|
||||
Left = 428
|
||||
Top = 87
|
||||
Width = 205
|
||||
Width = 207
|
||||
Height = 628
|
||||
Align = alLeft
|
||||
BevelInner = bvRaised
|
||||
|
|
@ -985,7 +985,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
TabOrder = 2
|
||||
object Label9: TLabel
|
||||
Left = 152
|
||||
Top = 78
|
||||
Top = 76
|
||||
Width = 15
|
||||
Height = 22
|
||||
Caption = 'M'
|
||||
|
|
@ -999,7 +999,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label3: TLabel
|
||||
Left = 144
|
||||
Top = 420
|
||||
Top = 444
|
||||
Width = 26
|
||||
Height = 22
|
||||
Caption = 'cm'
|
||||
|
|
@ -1012,7 +1012,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label4: TLabel
|
||||
Left = 152
|
||||
Top = 185
|
||||
Top = 183
|
||||
Width = 28
|
||||
Height = 22
|
||||
Caption = 'KG'
|
||||
|
|
@ -1025,7 +1025,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label5: TLabel
|
||||
Left = 8
|
||||
Top = 77
|
||||
Top = 75
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #38271#24230
|
||||
|
|
@ -1038,7 +1038,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label6: TLabel
|
||||
Left = 8
|
||||
Top = 420
|
||||
Top = 444
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #24133#23485
|
||||
|
|
@ -1051,7 +1051,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label11: TLabel
|
||||
Left = 8
|
||||
Top = 185
|
||||
Top = 183
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #27611#37325
|
||||
|
|
@ -1064,7 +1064,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label10: TLabel
|
||||
Left = 8
|
||||
Top = 333
|
||||
Top = 357
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #27491#21697
|
||||
|
|
@ -1077,7 +1077,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label12: TLabel
|
||||
Left = 92
|
||||
Top = 333
|
||||
Top = 357
|
||||
Width = 40
|
||||
Height = 19
|
||||
Caption = #27425#21697
|
||||
|
|
@ -1130,7 +1130,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label22: TLabel
|
||||
Left = 144
|
||||
Top = 454
|
||||
Top = 475
|
||||
Width = 36
|
||||
Height = 22
|
||||
Caption = 'g/'#13217
|
||||
|
|
@ -1143,7 +1143,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label23: TLabel
|
||||
Left = 8
|
||||
Top = 453
|
||||
Top = 474
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #20811#37325
|
||||
|
|
@ -1155,21 +1155,21 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
ParentFont = False
|
||||
end
|
||||
object Label27: TLabel
|
||||
Left = 243
|
||||
Top = 437
|
||||
Left = 11
|
||||
Top = 221
|
||||
Width = 40
|
||||
Height = 23
|
||||
Height = 19
|
||||
Caption = #36192#36865
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clRed
|
||||
Font.Height = -20
|
||||
Font.Name = 'Arial'
|
||||
Font.Style = []
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clBlue
|
||||
Font.Height = -19
|
||||
Font.Name = #23435#20307
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
end
|
||||
object Label26: TLabel
|
||||
Left = 8
|
||||
Top = 376
|
||||
Top = 400
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #20986#32440
|
||||
|
|
@ -1196,7 +1196,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label30: TLabel
|
||||
Left = 8
|
||||
Top = 113
|
||||
Top = 111
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #30382#37325
|
||||
|
|
@ -1209,7 +1209,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label31: TLabel
|
||||
Left = 152
|
||||
Top = 149
|
||||
Top = 147
|
||||
Width = 28
|
||||
Height = 22
|
||||
Caption = 'KG'
|
||||
|
|
@ -1222,7 +1222,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label32: TLabel
|
||||
Left = 8
|
||||
Top = 149
|
||||
Top = 147
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #20928#37325
|
||||
|
|
@ -1235,7 +1235,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label33: TLabel
|
||||
Left = 152
|
||||
Top = 114
|
||||
Top = 112
|
||||
Width = 28
|
||||
Height = 22
|
||||
Caption = 'KG'
|
||||
|
|
@ -1248,7 +1248,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label34: TLabel
|
||||
Left = 90
|
||||
Top = 379
|
||||
Top = 403
|
||||
Width = 40
|
||||
Height = 19
|
||||
Caption = #20221#25968
|
||||
|
|
@ -1274,7 +1274,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label37: TLabel
|
||||
Left = 8
|
||||
Top = 41
|
||||
Top = 39
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #32568#21495
|
||||
|
|
@ -1287,7 +1287,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label39: TLabel
|
||||
Left = 8
|
||||
Top = 221
|
||||
Top = 252
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #31995#25968
|
||||
|
|
@ -1326,7 +1326,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label28: TLabel
|
||||
Left = 10
|
||||
Top = 260
|
||||
Top = 288
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #21253#21495
|
||||
|
|
@ -1339,7 +1339,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Label54: TLabel
|
||||
Left = 11
|
||||
Top = 297
|
||||
Top = 321
|
||||
Width = 42
|
||||
Height = 20
|
||||
Caption = #26495#21495
|
||||
|
|
@ -1352,9 +1352,9 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJFK: TEdit
|
||||
Left = 51
|
||||
Top = 414
|
||||
Top = 438
|
||||
Width = 90
|
||||
Height = 33
|
||||
Height = 30
|
||||
AutoSize = False
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
|
|
@ -1368,7 +1368,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJLen: TEdit
|
||||
Left = 57
|
||||
Top = 73
|
||||
Top = 71
|
||||
Width = 90
|
||||
Height = 36
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1385,7 +1385,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJMaoZ: TEdit
|
||||
Left = 57
|
||||
Top = 181
|
||||
Top = 179
|
||||
Width = 90
|
||||
Height = 36
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1401,7 +1401,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object BTPrint: TButton
|
||||
Left = 10
|
||||
Top = 482
|
||||
Top = 500
|
||||
Width = 171
|
||||
Height = 66
|
||||
Caption = #25552#20132
|
||||
|
|
@ -1416,7 +1416,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Edit3: TEdit
|
||||
Left = 52
|
||||
Top = 327
|
||||
Top = 351
|
||||
Width = 39
|
||||
Height = 43
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1433,7 +1433,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Edit4: TEdit
|
||||
Left = 130
|
||||
Top = 327
|
||||
Top = 351
|
||||
Width = 40
|
||||
Height = 43
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1466,9 +1466,9 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJSJKZ: TEdit
|
||||
Left = 51
|
||||
Top = 448
|
||||
Top = 469
|
||||
Width = 90
|
||||
Height = 33
|
||||
Height = 30
|
||||
AutoSize = False
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
|
|
@ -1481,10 +1481,11 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
OnKeyPress = MJstr3KeyPress
|
||||
end
|
||||
object MJQty2: TEdit
|
||||
Left = 290
|
||||
Top = 428
|
||||
Left = 57
|
||||
Top = 215
|
||||
Width = 90
|
||||
Height = 36
|
||||
Height = 33
|
||||
AutoSize = False
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -28
|
||||
|
|
@ -1499,7 +1500,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Edit6: TEdit
|
||||
Left = 52
|
||||
Top = 370
|
||||
Top = 394
|
||||
Width = 40
|
||||
Height = 43
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1533,7 +1534,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJQty3: TEdit
|
||||
Left = 57
|
||||
Top = 109
|
||||
Top = 107
|
||||
Width = 90
|
||||
Height = 36
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1550,7 +1551,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJQty4: TEdit
|
||||
Left = 57
|
||||
Top = 145
|
||||
Top = 143
|
||||
Width = 90
|
||||
Height = 36
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1567,7 +1568,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object ComboBox1: TComboBox
|
||||
Left = 132
|
||||
Top = 371
|
||||
Top = 395
|
||||
Width = 45
|
||||
Height = 40
|
||||
Style = csDropDownList
|
||||
|
|
@ -1590,7 +1591,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object MJStr4: TEdit
|
||||
Left = 57
|
||||
Top = 37
|
||||
Top = 35
|
||||
Width = 90
|
||||
Height = 36
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -1609,7 +1610,8 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
Left = 57
|
||||
Top = 1
|
||||
Width = 90
|
||||
Height = 36
|
||||
Height = 33
|
||||
AutoSize = False
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -28
|
||||
|
|
@ -1622,9 +1624,10 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object kmxs: TEdit
|
||||
Left = 57
|
||||
Top = 217
|
||||
Top = 248
|
||||
Width = 90
|
||||
Height = 36
|
||||
Height = 33
|
||||
AutoSize = False
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -28
|
||||
|
|
@ -1654,9 +1657,10 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object baoNo: TEdit
|
||||
Left = 57
|
||||
Top = 253
|
||||
Top = 281
|
||||
Width = 90
|
||||
Height = 36
|
||||
Height = 33
|
||||
AutoSize = False
|
||||
Font.Charset = GB2312_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -28
|
||||
|
|
@ -1676,7 +1680,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Button7: TButton
|
||||
Left = 12
|
||||
Top = 552
|
||||
Top = 570
|
||||
Width = 169
|
||||
Height = 46
|
||||
Caption = #25171#21253#26631#31614
|
||||
|
|
@ -1691,7 +1695,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
object Banno: TEdit
|
||||
Left = 57
|
||||
Top = 290
|
||||
Top = 314
|
||||
Width = 90
|
||||
Height = 35
|
||||
Font.Charset = GB2312_CHARSET
|
||||
|
|
@ -2107,8 +2111,8 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
|
|||
end
|
||||
end
|
||||
object Panel3: TPanel
|
||||
Left = 634
|
||||
Top = 328
|
||||
Left = 637
|
||||
Top = 325
|
||||
Width = 353
|
||||
Height = 334
|
||||
BevelInner = bvRaised
|
||||
|
|
|
|||
|
|
@ -1145,7 +1145,7 @@ begin
|
|||
end
|
||||
else
|
||||
begin
|
||||
FieldByName('MJLen').Value := StrToFloatdef(trim(MJLen.Text), 0) - StrToFloatdef(trim(MJQty2.Text), 0) + fjc;
|
||||
FieldByName('MJLen').Value := StrToFloatdef(trim(MJLen.Text), 0) + fjc; //- StrToFloatdef(trim(MJQty2.Text), 0)
|
||||
end;
|
||||
|
||||
FieldByName('MJQty1').Value := StrToFloatdef(trim(MJQty1.Text), 0);
|
||||
|
|
|
|||
Loading…
Reference in New Issue
Block a user