Group_01/D7FZaideng
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

调整

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2026-02-05 17:18:48 +08:00
parent 4cbe32486a
commit 9cb1ffbddd
13 changed files with 144 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
坯布仓库/U_Bpkclist.dfm
View File

@ -190,6 +190,19 @@ object frmBpkclist: TfrmBpkclist
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 615
Top = 40
Width = 26
Height = 12
Caption = #39068#33394
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BegDate: TDateTimePicker
Left = 76
Top = 11
@ -290,6 +303,15 @@ object frmBpkclist: TfrmBpkclist
TabOrder = 8
OnChange = P_CodeNameChange
end
object P_Color: TEdit
Tag = 2
Left = 647
Top = 36
Width = 100
Height = 20
TabOrder = 9
OnChange = P_CodeNameChange
end
end
object cxGrid1: TcxGrid
Left = 0
@ -484,6 +506,12 @@ object frmBpkclist: TfrmBpkclist
HeaderAlignmentHorz = taCenter
Width = 100
end
object Tv1Column2: TcxGridDBColumn
Caption = #24211#20301
DataBinding.FieldName = 'KuWei'
HeaderAlignmentHorz = taCenter
Width = 60
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1

3
坯布仓库/U_Bpkclist.pas
View File

@ -77,6 +77,9 @@ type
Label8: TLabel;
v1Column4: TcxGridDBColumn;
Tv1Column1: TcxGridDBColumn;
Label9: TLabel;
P_Color: TEdit;
Tv1Column2: TcxGridDBColumn;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormDestroy(Sender: TObject);
procedure P_CodeNameChange(Sender: TObject);

36
基础资料维护(BaseInfo.dll)/U_MLXXList.dfm
View File

@ -121,13 +121,27 @@ object frmMLXXList: TfrmMLXXList
Caption = #36741#26009#32534#21495
end
object Label2: TLabel
Left = 369
Left = 777
Top = 13
Width = 24
Height = 12
Caption = #31867#22411
Visible = False
end
object Label4: TLabel
Left = 535
Top = 13
Width = 30
Height = 12
Caption = #33394#21495' '
end
object Label5: TLabel
Left = 366
Top = 13
Width = 24
Height = 12
Caption = #39068#33394
end
object MLName: TEdit
Tag = 2
Left = 256
@ -148,7 +162,7 @@ object frmMLXXList: TfrmMLXXList
end
object DEFstr5: TComboBox
Tag = 1
Left = 398
Left = 806
Top = 8
Width = 81
Height = 20
@ -162,6 +176,24 @@ object frmMLXXList: TfrmMLXXList
#25104#21697
'')
end
object MLSH: TEdit
Tag = 2
Left = 560
Top = 8
Width = 89
Height = 20
TabOrder = 3
OnChange = MLNameChange
end
object Color: TEdit
Tag = 2
Left = 393
Top = 9
Width = 92
Height = 20
TabOrder = 4
OnChange = MLNameChange
end
end
object cxGrid2: TcxGrid
Left = 0

4
基础资料维护(BaseInfo.dll)/U_MLXXList.pas
View File

@ -85,6 +85,10 @@ type
Tv2Column6: TcxGridDBColumn;
Tv2Column7: TcxGridDBColumn;
Tv2Column8: TcxGridDBColumn;
Label4: TLabel;
Label5: TLabel;
MLSH: TEdit;
Color: TEdit;
procedure FormDestroy(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure TBCloseClick(Sender: TObject);

36
基础资料维护(BaseInfo.dll)/U_MLXXListSel.dfm
View File

@ -134,13 +134,27 @@ object frmMLXXListSel: TfrmMLXXListSel
Caption = #36741#26009#32534#21495
end
object Label2: TLabel
Left = 369
Left = 953
Top = 13
Width = 24
Height = 12
Caption = #31867#22411
Visible = False
end
object Label4: TLabel
Left = 399
Top = 13
Width = 24
Height = 12
Caption = #39068#33394
end
object Label5: TLabel
Left = 555
Top = 13
Width = 30
Height = 12
Caption = #33394#21495' '
end
object MLName: TEdit
Tag = 2
Left = 253
@ -161,7 +175,7 @@ object frmMLXXListSel: TfrmMLXXListSel
end
object Typpe: TComboBox
Tag = 1
Left = 398
Left = 982
Top = 8
Width = 81
Height = 20
@ -175,6 +189,24 @@ object frmMLXXListSel: TfrmMLXXListSel
#25104#21697
'')
end
object Color: TEdit
Tag = 2
Left = 428
Top = 8
Width = 89
Height = 20
TabOrder = 3
OnChange = MLNameChange
end
object MLSH: TEdit
Tag = 2
Left = 580
Top = 8
Width = 89
Height = 20
TabOrder = 4
OnChange = MLNameChange
end
end
object cxGrid2: TcxGrid
Left = 0

4
基础资料维护(BaseInfo.dll)/U_MLXXListSel.pas
View File

@ -87,6 +87,10 @@ type
cxGridLevel1: TcxGridLevel;
Tv2Column8: TcxGridDBColumn;
Tv2Column9: TcxGridDBColumn;
Label4: TLabel;
Color: TEdit;
Label5: TLabel;
MLSH: TEdit;
procedure FormDestroy(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure TBCloseClick(Sender: TObject);

20
基础资料维护(BaseInfo.dll)/U_ZdyAttachCP10.dfm
View File

@ -139,16 +139,8 @@ object frmZdyAttachCP10: TfrmZdyAttachCP10
ImageIndex = 51
OnClick = ToolButton11Click
end
object TBClose: TToolButton
Left = 387
Top = 30
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
object ToolButton8: TToolButton
Left = 450
Left = 387
Top = 30
AutoSize = True
Caption = #23610#30721#32452
@ -156,13 +148,21 @@ object frmZdyAttachCP10: TfrmZdyAttachCP10
OnClick = ToolButton8Click
end
object ToolButton9: TToolButton
Left = 525
Left = 462
Top = 30
AutoSize = True
Caption = #39068#33394#31649#29702
ImageIndex = 49
OnClick = ToolButton9Click
end
object TBClose: TToolButton
Left = 549
Top = 30
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0

16
应收应付/U_YSYGGJList.dfm
View File

@ -221,6 +221,13 @@ object frmYSYGGJList: TfrmYSYGGJList
Height = 12
Caption = #20135#21697#32534#21495
end
object Label6: TLabel
Left = 736
Top = 12
Width = 36
Height = 12
Caption = #35746#21333#21495
end
object BegDate: TDateTimePicker
Left = 73
Top = 9
@ -337,6 +344,15 @@ object frmYSYGGJList: TfrmYSYGGJList
TabOrder = 11
OnChange = MPRTCodeNameChange
end
object OrderNo: TEdit
Tag = 2
Left = 775
Top = 8
Width = 109
Height = 20
TabOrder = 12
OnChange = MPRTCodeNameChange
end
end
object cxGrid2: TcxGrid
Left = 0

2
应收应付/U_YSYGGJList.pas
View File

@ -103,6 +103,8 @@ type
CheckBox5: TCheckBox;
Button9: TButton;
Tv1Column6: TcxGridDBColumn;
Label6: TLabel;
OrderNo: TEdit;
procedure FormDestroy(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);