D7DJjunhao/检验管理/U_orderInPut_HYWT_Sub.dfm

933 lines
24 KiB
Plaintext
Raw Permalink Normal View History

2025-04-30 19:46:56 +08:00
object FrmOrderInPut_HYWT_Sub: TFrmOrderInPut_HYWT_Sub
Left = 187
Top = 101
Width = 1145
Height = 640
Caption = #36135#36816#22996#25176#20449#24687
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1137
Height = 31
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clBtnFace
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 31
Width = 1137
Height = 271
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
object Label1: TLabel
Left = 32
Top = 20
Width = 65
Height = 12
Caption = #22996#25176#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 441
Top = 45
Width = 65
Height = 12
Caption = #32463#33829#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 32
Top = 45
Width = 66
Height = 12
Caption = #21457' '#36135' '#20154#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 32
Top = 70
Width = 66
Height = 12
Caption = #25910' '#36135' '#20154#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 32
Top = 96
Width = 66
Height = 12
Caption = #36890' '#30693' '#20154#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 646
Top = 20
Width = 66
Height = 12
Caption = #21512' '#21516' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 240
Top = 45
Width = 62
Height = 12
Caption = 'PO# '#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 238
Top = 70
Width = 65
Height = 12
Caption = #20449#29992#35777#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 238
Top = 96
Width = 65
Height = 12
Caption = #25552#21333#20221#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 441
Top = 96
Width = 67
Height = 12
Caption = #27491' '#26412#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 645
Top = 96
Width = 67
Height = 12
Caption = #38468' '#26412#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 32
Top = 123
Width = 65
Height = 12
Caption = #36816#36153#20184#33267#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 645
Top = 45
Width = 67
Height = 12
Caption = #33337' '#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 238
Top = 177
Width = 65
Height = 12
Caption = #35013#36816#26399#38480#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 441
Top = 123
Width = 66
Height = 12
Caption = #30446' '#30340' '#28207#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 647
Top = 123
Width = 65
Height = 12
Caption = #20986#21475#21475#23736#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 645
Top = 70
Width = 67
Height = 12
Caption = #33322' '#27425#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 443
Top = 70
Width = 62
Height = 12
Caption = 'B/L No '#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 239
Top = 150
Width = 65
Height = 12
Caption = #26377#25928#26399#38480#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 32
Top = 177
Width = 91
Height = 12
Caption = #36135#29289#22791#22949#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 32
Top = 150
Width = 65
Height = 12
Caption = #35013#31665#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 441
Top = 150
Width = 65
Height = 12
Caption = #35013#31665#22320#28857#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 441
Top = 177
Width = 65
Height = 12
Caption = #25910#36135#22320#22336#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Left = 32
Top = 200
Width = 65
Height = 12
Caption = #27880#24847#20107#39033#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
Left = 441
Top = 20
Width = 65
Height = 12
Caption = #25351#31034#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 237
Top = 20
Width = 65
Height = 12
Caption = #20986#36816#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object goodsdate: TDateTimePicker
Tag = 2
Left = 121
Top = 173
Width = 96
Height = 20
Date = 41962.666178923610000000
Time = 41962.666178923610000000
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 16
end
object WTNo: TEdit
Tag = 2
Left = 97
Top = 16
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 0
end
object conNo: TEdit
Tag = 2
Left = 712
Top = 16
Width = 120
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 1
end
object original: TEdit
Tag = 2
Left = 506
Top = 92
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 2
end
object Attached: TEdit
Tag = 2
Left = 714
Top = 92
Width = 120
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 3
end
object TDNum: TEdit
Tag = 2
Left = 303
Top = 92
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 4
end
object Payaddress: TBtnEditA
Tag = 2
Left = 97
Top = 119
Width = 327
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 5
OnBtnClick = PayaddressBtnClick
end
object CustomerNoName: TBtnEditA
Tag = 2
Left = 506
Top = 41
Width = 122
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 6
OnBtnClick = CustomerNoNameBtnClick
end
object Export: TBtnEditA
Tag = 2
Left = 713
Top = 119
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 7
OnBtnClick = ExportBtnClick
end
object POD: TBtnEditA
Tag = 2
Left = 506
Top = 119
Width = 123
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 8
OnBtnClick = PODBtnClick
end
object shiptime: TDateTimePicker
Tag = 2
Left = 304
Top = 173
Width = 121
Height = 20
Date = 41962.666178923610000000
Time = 41962.666178923610000000
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 9
end
object voy: TBtnEditA
Tag = 2
Left = 713
Top = 66
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 10
OnBtnClick = voyBtnClick
end
object vessel: TBtnEditA
Tag = 2
Left = 713
Top = 41
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 11
OnBtnClick = vesselBtnClick
end
object BLNo: TEdit
Tag = 2
Left = 506
Top = 66
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 12
end
object Validtime: TDateTimePicker
Tag = 2
Left = 305
Top = 146
Width = 121
Height = 20
Date = 41962.666178923610000000
Time = 41962.666178923610000000
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 13
end
object ifFP: TCheckBox
Left = 848
Top = 16
Width = 97
Height = 17
Caption = #26159#21542#20998#25209
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 14
end
object ifZY: TCheckBox
Left = 848
Top = 42
Width = 97
Height = 17
Caption = #26159#21542#36716#36816
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
end
object DLYDate: TDateTimePicker
Tag = 2
Left = 97
Top = 146
Width = 121
Height = 20
Date = 41962.666178923610000000
Time = 41962.666178923610000000
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 17
end
object conDefstr1: TBtnEditA
Tag = 2
Left = 508
Top = 173
Width = 326
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 18
OnBtnClick = conDefstr1BtnClick
end
object XYNO: TEdit
Tag = 2
Left = 303
Top = 66
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 19
end
object DLYaddress: TBtnEditA
Tag = 2
Left = 508
Top = 146
Width = 326
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 20
OnBtnClick = DLYaddressBtnClick
end
object MPRTBZNote: TMemo
Tag = 2
Left = 97
Top = 200
Width = 737
Height = 60
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ScrollBars = ssVertical
TabOrder = 21
OnDblClick = MPRTBZNoteDblClick
end
object orddefstr1: TEdit
Tag = 2
Left = 97
Top = 41
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 22
end
object ConPerson2: TEdit
Tag = 2
Left = 97
Top = 92
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 23
end
object ConPerson1: TEdit
Tag = 2
Left = 97
Top = 66
Width = 121
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 24
end
object orderNo: TBtnEditA
Tag = 2
Left = 506
Top = 16
Width = 122
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 25
OnBtnClick = orderNoBtnClick
end
object KHConNo: TEdit
Tag = 2
Left = 303
Top = 41
Width = 120
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 26
end
object CYNO: TBtnEditA
Left = 303
Top = 16
Width = 122
Height = 20
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
TabOrder = 27
OnBtnClick = CYNOBtnClick
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 333
Width = 1137
Height = 252
Align = alTop
TabOrder = 2
object TV1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource1
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = V1SordQty3
end
item
Kind = skSum
Column = V1SordQty1
end
item
Kind = skSum
Column = V1SordQty4
end
item
Kind = skSum
Column = V1SordQty2
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
object V1XHNO: TcxGridDBColumn
Caption = #24207#21495
DataBinding.FieldName = 'XHNO'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 60
end
object V1PRTCode: TcxGridDBColumn
Caption = #20135#21697#32534#21495
DataBinding.FieldName = 'PRTCode'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeManage.Default
Width = 68
end
object V1PRTCodeName: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'PRTCodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeManage.Default
Width = 68
end
object V1PRTColor: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'PRTColor'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeManage.Default
Width = 68
end
object V1PRTspec: TcxGridDBColumn
Caption = #20135#21697#35268#26684
DataBinding.FieldName = 'PRTspec'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Header = DataLink_TradeManage.Default
Width = 70
end
object V1SordQty3: TcxGridDBColumn
Caption = #25968#37327
DataBinding.FieldName = 'SordQty3'
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_TradeManage.FontBlue
Styles.Footer = DataLink_TradeManage.FontBlue
Styles.Header = DataLink_TradeManage.FontBlue
Width = 68
end
object V1OrderUnit: TcxGridDBColumn
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'OrderUnit'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 68
end
object V1PRTprice: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'PRTprice'
HeaderAlignmentHorz = taCenter
Styles.Content = DataLink_TradeManage.FontBlue
Styles.Footer = DataLink_TradeManage.FontBlue
Styles.Header = DataLink_TradeManage.FontBlue
Width = 60
end
object V1BJNO: TcxGridDBColumn
Caption = #26631#35760#21495#30721
DataBinding.FieldName = 'BJNO'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 70
end
object V1SordQty1: TcxGridDBColumn
Caption = #20214#25968
DataBinding.FieldName = 'SordQty1'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 70
end
object V1BGType: TcxGridDBColumn
Caption = #21253#35013#24335#26679
DataBinding.FieldName = 'BGType'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1BGTypePropertiesButtonClick
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 70
end
object V1GoodsNo: TcxGridDBColumn
Caption = #36135#21495
DataBinding.FieldName = 'GoodsNo'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 70
end
object V1SordQty2: TcxGridDBColumn
Caption = #23610#30721
DataBinding.FieldName = 'SordQty2'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.FontBlue
Width = 70
end
object V1SordQty4: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'SordQty4'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.FontBlue
Width = 70
end
object V1SOrdDefNote3: TcxGridDBColumn
Caption = #25104#20132#26465#20214
DataBinding.FieldName = 'SOrdDefNote3'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = V1SordQty1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 70
end
object V1SOrdDefNote1: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'SOrdDefNote1'
HeaderAlignmentHorz = taCenter
Styles.Header = DataLink_TradeManage.Default
Width = 100
end
end
object cxGrid1Level1: TcxGridLevel
GridView = TV1
end
end
object ToolBar2: TToolBar
Left = 0
Top = 302
Width = 1137
Height = 31
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clBtnFace
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 3
object Tadd: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 103
OnClick = TaddClick
end
object TDEL: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 107
OnClick = TDELClick
end
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 348
Top = 364
end
object order_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 388
Top = 364
end
object DataSource1: TDataSource
DataSet = order_Sub
Left = 424
Top = 364
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 464
Top = 364
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 508
Top = 364
end
end