inherited frmYarnInList: TfrmYarnInList Left = 165 Top = 111 Caption = #32433#32447#20837#24211#21015#34920 ClientHeight = 640 ClientWidth = 1540 Font.Height = -16 ExplicitLeft = -689 ExplicitWidth = 1556 ExplicitHeight = 679 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1540 Height = 30 ButtonHeight = 30 ButtonWidth = 131 Caption = 'ToolBar1' Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_YarnStk.cxImageList_bar List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 2 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 1 OnClick = TBRafreshClick end object TBFind: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 0 Visible = False OnClick = TBFindClick end object TBAdd: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #20837#24211 ImageIndex = 9 OnClick = TBAddClick end object TBEdit: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 3 OnClick = TBEditClick end object ToolButton4: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #26579#33394#25340#32433#21152#25467#22238#20179 ImageIndex = 9 Visible = False OnClick = ToolButton4Click end object ToolButton5: TToolButton Left = 387 Top = 0 AutoSize = True Caption = #36864#36135#22238#20179 ImageIndex = 9 Visible = False OnClick = ToolButton5Click end object ToolButton6: TToolButton Left = 474 Top = 0 AutoSize = True Caption = #38468#20214 ImageIndex = 22 OnClick = ToolButton6Click end object ToolButton3: TToolButton Left = 537 Top = 0 AutoSize = True Caption = #23454#27979'D'#25968 ImageIndex = 3 Visible = False OnClick = ToolButton3Click end object ToolButton7: TToolButton Left = 618 Top = 0 AutoSize = True Caption = #25277#26816#30331#35760 ImageIndex = 3 OnClick = ToolButton7Click end object ToolButton2: TToolButton Left = 705 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 21 OnClick = ToolButton2Click end object TBDel: TToolButton Left = 768 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 5 OnClick = TBDelClick end object TBExport: TToolButton Left = 831 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 20 OnClick = TBExportClick end object ToolButton1: TToolButton Left = 894 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 981 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object Panel1: TPanel [1] Left = 0 Top = 30 Width = 1540 Height = 118 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clWhite ParentBackground = False TabOrder = 3 ExplicitTop = 24 object Label3: TLabel Left = 717 Top = 46 Width = 40 Height = 21 AutoSize = False Caption = #21697#21517 end object Label4: TLabel Left = 257 Top = 84 Width = 70 Height = 21 AutoSize = False Caption = #20379#24212#21830 end object Label8: TLabel Left = 721 Top = 84 Width = 40 Height = 21 AutoSize = False Caption = #25104#20998 end object Label12: TLabel Left = 24 Top = 84 Width = 70 Height = 21 AutoSize = False Caption = #20837#24211#31867#22411 end object Label10: TLabel Left = 918 Top = 84 Width = 32 Height = 21 Caption = #25209#21495 end object Label6: TLabel Left = 24 Top = 46 Width = 70 Height = 21 AutoSize = False Caption = #20837#24211#21333#21495 end object Label5: TLabel Left = 918 Top = 46 Width = 60 Height = 21 AutoSize = False Caption = #39068#33394 end object Label1: TLabel Left = 479 Top = 84 Width = 60 Height = 21 AutoSize = False Caption = #32534#21495 end object Label2: TLabel Left = 257 Top = 46 Width = 64 Height = 21 Caption = #37319#36141#21333#21495 end object Label7: TLabel Left = 477 Top = 46 Width = 80 Height = 21 Caption = #22383#24067#21512#21516#21495 end object Y_Name: TcxTextEdit Tag = 2 Left = 757 Top = 42 TabOrder = 0 OnKeyPress = BYIOIDKeyPress Width = 150 end object FromCoName: TcxTextEdit Tag = 2 Left = 324 Top = 77 TabOrder = 1 OnKeyPress = BYIOIDKeyPress Width = 150 end object Y_Composition: TcxTextEdit Tag = 2 Left = 757 Top = 77 TabOrder = 2 OnKeyPress = BYIOIDKeyPress Width = 150 end object BatchNo: TcxTextEdit Tag = 2 Left = 957 Top = 77 TabOrder = 3 OnKeyPress = BYIOIDKeyPress Width = 150 end object BYIOID: TcxTextEdit Tag = 2 Left = 98 Top = 42 TabOrder = 4 OnKeyPress = BYIOIDKeyPress Width = 150 end object Y_Color: TcxTextEdit Tag = 2 Left = 957 Top = 42 TabOrder = 5 OnKeyPress = BYIOIDKeyPress Width = 150 end inline Frame11: TfrmFrameDateSel Left = 2 Top = 2 Width = 1536 Height = 37 Align = alTop Color = clWhite ParentBackground = False ParentColor = False TabOrder = 6 ExplicitLeft = 2 ExplicitTop = 2 ExplicitWidth = 1536 ExplicitHeight = 37 inherited lbl2: TLabel Width = 16 Height = 21 ExplicitWidth = 16 ExplicitHeight = 21 end inherited BegDate: TcxDateEdit Left = 93 Top = 0 ExplicitLeft = 93 ExplicitTop = 0 end end object IOType: TcxComboBox Left = 96 Top = 77 Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( '' #37319#36141#20837#24211 #20179#24211#36864#22238 #26399#21021#20837#24211) TabOrder = 7 Width = 150 end object Y_Code: TcxTextEdit Tag = 2 Left = 561 Top = 77 TabOrder = 8 OnKeyPress = BYIOIDKeyPress Width = 150 end object FromPurNo: TcxTextEdit Tag = 2 Left = 324 Top = 42 TabOrder = 9 OnKeyPress = BYIOIDKeyPress Width = 150 end object FromConNo: TcxTextEdit Tag = 2 Left = 561 Top = 42 TabOrder = 10 OnKeyPress = BYIOIDKeyPress Width = 150 end end inherited loadProcess: TPanel Left = 344 Top = 267 ExplicitLeft = 344 ExplicitTop = 267 end inherited cxProgressBar2: TcxProgressBar Left = 339 Top = 335 ExplicitLeft = 339 ExplicitTop = 335 ExplicitHeight = 29 end object PageControl1: TPageControl [4] Left = 0 Top = 148 Width = 1540 Height = 492 ActivePage = TabSheet1 Align = alClient TabOrder = 4 object TabSheet1: TTabSheet Caption = #27491#24120#25968#25454 object cxGrid1: TcxGrid Left = 0 Top = 0 Width = 1532 Height = 456 Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_1 DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skCount end item Kind = skSum end item Kind = skSum Column = Tv1Qty end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False object Tv1Column9: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSEL' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True HeaderAlignmentHorz = taCenter Width = 46 end object v1BYIOID: TcxGridDBColumn Caption = #20837#24211#21333#21495 DataBinding.FieldName = 'BYIOID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 83 end object Tv1ioTime: TcxGridDBColumn Tag = 2 Caption = #20837#24211#26102#38388 DataBinding.FieldName = 'ioTime' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 93 end object Tv1IOType: TcxGridDBColumn Tag = 2 Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'IOType' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #27491#24120#20837#24211 #29983#20135#36864#22238 #26399#21021#20837#24211) HeaderAlignmentHorz = taCenter Options.Editing = False Width = 88 end object Tv1FromCoName: TcxGridDBColumn Caption = #20379#24212#21830 DataBinding.FieldName = 'FromCoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 86 end object Tv1FromPurNo: TcxGridDBColumn Caption = #37319#36141#21333#21495 DataBinding.FieldName = 'FromPurNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 80 end object Tv1FromConNo: TcxGridDBColumn Caption = #22383#24067#21512#21516#21495 DataBinding.FieldName = 'FromConNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 105 end object Tv1Y_Code: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'Y_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 81 end object Tv1SXCBH: TcxGridDBColumn Caption = #32433#32447#21378#32534#21495 DataBinding.FieldName = 'SXCBH' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 90 end object Tv1Y_Name: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'Y_Name' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end object Tv1SXCPM: TcxGridDBColumn Caption = #32433#32447#21378#21697#21517 DataBinding.FieldName = 'SXCPM' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 90 end object Tv1Y_Composition: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'Y_Composition' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv1Y_Color: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'Y_Color' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv1Denier: TcxGridDBColumn Caption = #20998#29305'(Denier)' DataBinding.FieldName = 'Denier' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 103 end object Tv1ZS: TcxGridDBColumn Caption = #25903#25968 DataBinding.FieldName = 'ZS' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 80 end object Tv1FF: TcxGridDBColumn Caption = #32442#27861 DataBinding.FieldName = 'FF' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object T1BatchNo: TcxGridDBColumn Caption = #25209#21495 DataBinding.FieldName = 'BatchNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False VisibleForCustomization = False Width = 89 end object Tv1Piece: TcxGridDBColumn Caption = #31665'/'#20214 DataBinding.FieldName = 'Piece' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object Tv1Qty: TcxGridDBColumn Tag = 2 Caption = #25968#37327 DataBinding.FieldName = 'Qty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 85 end object Tv1QtyUnit: TcxGridDBColumn Tag = 2 Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'Kg' 'M') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object Tv1dbWeight: TcxGridDBColumn Caption = #21333#21253#37325#37327 DataBinding.FieldName = 'dbWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 80 end object Tv1dbNumber: TcxGridDBColumn Caption = #21333#21253#20010#25968 DataBinding.FieldName = 'dbNumber' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 108 end object Tv1singleWeight: TcxGridDBColumn Caption = #21333#20010#31570#37325 DataBinding.FieldName = 'singleWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 86 end object Tv1Note: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'Note' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 79 end object Tv1StkCoName: TcxGridDBColumn Caption = #23384#25918#21333#20301 DataBinding.FieldName = 'StkCoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 92 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end end object TabSheet2: TTabSheet Caption = #20316#24223#25968#25454 ImageIndex = 1 object cxGrid2: TcxGrid Left = 0 Top = 0 Width = 1532 Height = 456 Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_2 DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skCount end item Kind = skSum end item Kind = skSum Column = Tv2Qty end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False object cxGridDBColumn1: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSEL' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True HeaderAlignmentHorz = taCenter Width = 46 end object Tv2BYIOID: TcxGridDBColumn Caption = #20837#24211#21333#21495 DataBinding.FieldName = 'BYIOID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 83 end object Tv2ioTime: TcxGridDBColumn Tag = 2 Caption = #20837#24211#26102#38388 DataBinding.FieldName = 'ioTime' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 93 end object Tv2IOType: TcxGridDBColumn Tag = 2 Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'IOType' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #27491#24120#20837#24211 #29983#20135#36864#22238 #26399#21021#20837#24211) HeaderAlignmentHorz = taCenter Options.Editing = False Width = 88 end object Tv2FromCoName: TcxGridDBColumn Caption = #20379#24212#21830 DataBinding.FieldName = 'FromCoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 86 end object Tv2CFromPurNo: TcxGridDBColumn Caption = #37319#36141#21333#21495 DataBinding.FieldName = 'FromPurNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 86 end object Tv2FromConNo: TcxGridDBColumn Caption = #22383#24067#21512#21516#21495 DataBinding.FieldName = 'FromConNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 95 end object Tv2Y_Code: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'Y_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 81 end object Tv2SXCBH: TcxGridDBColumn Caption = #32433#32447#21378#32534#21495 DataBinding.FieldName = 'SXCBH' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 90 end object Tv2Y_Name: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'Y_Name' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end object Tv2SXCPM: TcxGridDBColumn Caption = #32433#32447#21378#21697#21517 DataBinding.FieldName = 'SXCPM' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 90 end object Tv2Y_Composition: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'Y_Composition' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv2Y_Color: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'Y_Color' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv2Denier: TcxGridDBColumn Caption = #20998#29305'(Denier)' DataBinding.FieldName = 'Denier' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 105 end object Tv2ZS: TcxGridDBColumn Caption = #25903#25968 DataBinding.FieldName = 'ZS' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 80 end object Tv2FF: TcxGridDBColumn Caption = #32442#27861 DataBinding.FieldName = 'FF' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv2BatchNo: TcxGridDBColumn Caption = #25209#21495 DataBinding.FieldName = 'BatchNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False VisibleForCustomization = False Width = 89 end object Tv2Piece: TcxGridDBColumn Caption = #31665'/'#20214 DataBinding.FieldName = 'Piece' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object Tv2Qty: TcxGridDBColumn Tag = 2 Caption = #25968#37327 DataBinding.FieldName = 'Qty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 85 end object Tv2QtyUnit: TcxGridDBColumn Tag = 2 Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'Kg' 'M') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object Tv2Note: TcxGridDBColumn Tag = 2 Caption = #22791#27880 DataBinding.FieldName = 'Note' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 79 end object Tv2dbWeight: TcxGridDBColumn Caption = #21333#21253#37325#37327 DataBinding.FieldName = 'dbWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 80 end object Tv2dbNumber: TcxGridDBColumn Caption = #21333#21253#20010#25968 DataBinding.FieldName = 'dbNumber' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 84 end object Tv2singleWeight: TcxGridDBColumn Caption = #21333#20010#31570#37325 DataBinding.FieldName = 'singleWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 80 end object Tv2StkCoName: TcxGridDBColumn Caption = #23384#25918#21333#20301 DataBinding.FieldName = 'StkCoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 91 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_YarnStk.ADOLink Left = 97 Top = 256 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_YarnStk.ADOLink Left = 209 Top = 233 end object ADOQueryCmd: TADOQuery Connection = DataLink_YarnStk.ADOLink Parameters = <> Left = 760 Top = 264 end object ADOQueryMain: TADOQuery Connection = DataLink_YarnStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 672 Top = 264 end object ADOQueryTemp: TADOQuery Connection = DataLink_YarnStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 848 Top = 263 end object DS_1: TDataSource DataSet = CDS_Main Left = 792 Top = 400 end object GPM_1: TcxGridPopupMenu PopupMenus = <> Left = 328 Top = 320 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 672 Top = 400 end object PopupMenu1: TPopupMenu Left = 152 Top = 312 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end object N3: TMenuItem Caption = #22797#21046 OnClick = N3Click end end object GPM_2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 440 Top = 320 end object CDS_Main_Del: TClientDataSet Aggregates = <> Params = <> Left = 628 Top = 452 end object DS_2: TDataSource DataSet = CDS_Main_Del Left = 788 Top = 468 end object ADOQueryMain_Del: TADOQuery Connection = DataLink_YarnStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 480 Top = 352 end end