oldgatheringfrm.dfm

群星医药系统源码

        Caption = #36807#28388'(&F)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 0
        ImageIndex = 28
        Images = ImageList1
      end
      object edtCustNo: TRzButtonEdit
        Left = 179
        Top = 5
        Width = 73
        Height = 20
        FrameHotColor = clBackground
        FrameHotStyle = fsFlat
        FrameVisible = True
        TabOrder = 1
        FlatButtons = True
        OnButtonClick = edtCustNoButtonClick
      end
      object BtnUnFiltered: TRzBitBtn
        Left = 476
        Top = 3
        Width = 85
        Caption = #21462#28040#36807#28388'(&U)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 2
        OnClick = BtnUnFilteredClick
      end
    end
    object dbgOldGathering: TxDBGridEh
      Left = 0
      Top = 33
      Width = 567
      Height = 413
      Align = alClient
      DataSource = dsOldGathering
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      RowHeight = 18
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      TitleHeight = 15
      OnEditButtonClick = dbgOldGatheringEditButtonClick
      Columns = <
        item
          EditButtons = <>
          FieldName = 'FDate'
          Footers = <>
          Title.Alignment = taCenter
          Width = 91
        end
        item
          ButtonStyle = cbsEllipsis
          EditButtons = <>
          FieldName = 'CustNo'
          Footers = <>
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = 'CustName'
          Footers = <>
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = 'DepartID'
          Footers = <>
          Title.Alignment = taCenter
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'PBillNo'
          Footers = <>
          Title.Alignment = taCenter
          Width = 70
        end
        item
          EditButtons = <>
          FieldName = 'PItemNo'
          Footers = <>
          Title.Alignment = taCenter
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'PayDate'
          Footers = <>
          Title.Alignment = taCenter
          Width = 76
        end
        item
          EditButtons = <>
          FieldName = 'Amount'
          Footers = <>
          Title.Alignment = taCenter
          Width = 66
        end
        item
          EditButtons = <>
          FieldName = 'PaidUp'
          Footers = <>
          Title.Alignment = taCenter
          Width = 63
        end
        item
          EditButtons = <>
          FieldName = 'UnPaid'
          Footers = <>
          ReadOnly = True
          Title.Alignment = taCenter
          Width = 60
        end
        item
          ButtonStyle = cbsEllipsis
          EditButtons = <>
          FieldName = 'EmpNo'
          Footers = <>
          Title.Alignment = taCenter
        end
        item
          ButtonStyle = cbsEllipsis
          EditButtons = <>
          FieldName = 'GoodsID'
          Footers = <>
          Title.Alignment = taCenter
          Width = 55
        end
        item
          EditButtons = <>
          FieldName = 'DepartNo'
          Footers = <>
          Title.Alignment = taCenter
          Width = 60
        end
        item
          EditButtons = <>
          FieldName = 'DepartName'
          Footers = <>
          Title.Alignment = taCenter
        end
        item
          EditButtons = <>
          FieldName = 'Creater'
          Footers = <>
          Title.Alignment = taCenter
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'Mender'
          Footers = <>
          Title.Alignment = taCenter
          Visible = False
        end>
    end
    object RzPanel3: TRzPanel
      Left = 0
      Top = 446
      Width = 567
      Height = 33
      Align = alBottom
      BorderInner = fsFlat
      BorderOuter = fsNone
      TabOrder = 2
      Transparent = True
      object btnAdd: TRzBitBtn
        Left = 5
        Top = 4
        Action = ActNew
        Caption = #26032#22686'(&N)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 0
        ImageIndex = 0
        Images = ImageList1
      end
      object btnEdit: TRzBitBtn
        Left = 83
        Top = 4
        Action = ActModify
        Caption = #20462#25913'(&E)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 1
        ImageIndex = 2
        Images = ImageList1
      end
      object btnDel: TRzBitBtn
        Left = 161
        Top = 4
        Action = ActDelete
        Caption = #21024#38500'(&D)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 2
        ImageIndex = 3
        Images = ImageList1
      end
      object btnCancel: TRzBitBtn
        Left = 318
        Top = 4
        Caption = #21462#28040'(&C)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 3
        OnClick = btnCancelClick
        ImageIndex = 13
        Images = ImageList1
      end
      object btnExit: TRzBitBtn
        Left = 396
        Top = 4
        Action = ActRefresh
        Caption = #21047#26032'(&R)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 4
        ImageIndex = 18
        Images = ImageList1
      end
      object btnPost: TRzBitBtn
        Left = 240
        Top = 4
        Caption = #20445#23384'(&S)'
        Color = 15791348
        HighlightColor = 16026986
        HotTrack = True
        HotTrackColor = 3983359
        ParentColor = False
        TabOrder = 5
        OnClick = btnPostClick