providerfrm.~dfm

来自「医药连锁经营管理系统源码」· ~DFM 代码 · 共 1,793 行 · 第 1/5 页

      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        18000000000000030000C40E0000C40E00000000000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000FF00FF84
        8684848684000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        000000000000FF00FFFF00FF8486840000000000008486848486840000000000
        00FF00FFFF00FFFF00FFFF00FF000000FF00FFFF00FF848684848684FF00FF84
        8684848684000000000000848684848684000000000000FF00FFFF00FF848684
        848684848684FF00FFFF00FFFF00FF8486848486848486848486840000000000
        00848684000000FF00FF848684848684FF00FFFF00FFFF00FFFF00FFFF00FF84
        8684848684848684848684848684848684000000000000FF00FF848684FFFFFF
        FF00FFFF00FFFF00FFFF00FFFFFFFF8486848486848486848486848486848486
        84848684848684000000848684FFFFFFFF00FFFF00FFFFFFFFFFFFFFFF00FFFF
        00FFFF00FF848684848684848684848684848684848684000000848684FFFFFF
        FFFFFFFFFFFFFF00FFFF00FF0000FF0000FFFF00FFFF00FFFF00FF8486848486
        84848684848684000000848684FFFFFFFF00FFFF00FF00FF0000FF00FF00FFFF
        00FFFF00FF848684848684000000FF00FF848684848684000000FF00FF848684
        848684FFFFFFFF00FFFF00FFFF00FF848684848684FFFFFFFFFFFF000000FF00
        FF000000000000FF00FFFF00FFFF00FFFF00FF848684848684FFFFFF848684FF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FF848684848684FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FF000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF84
        8684FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF848684FFFFFFFFFFFFFFFFFF8486
        84848684FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FF848684848684848684FF00FFFF00FFFF00FFFF00FF}
      ImageIndex = 6
      Images = ImageList1
    end
    object BtnEdit: TRzBitBtn
      Left = 304
      Top = 4
      Width = 81
      Action = ActModify
      Caption = #20462#25913'(&E)'
      Color = 15791348
      Font.Charset = GB2312_CHARSET
      Font.Color = clBtnText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7CC618C618C618C618C618C618C618C618C618C618
        1F7C1F7C1F7C1F7C1F7CC6181042D65A7B6F7B6F7B6F7B6F7B6F7B6F3967C618
        C028E05D1F7C1F7CC618DE7B2925D65A9C739C739C739C739C739C73734EC028
        E05D8049E05DC618104229258C319C739C73DE7BDE7BDE7BDE7B734EC028E05D
        E97E80491F7CC6189C739C739C739C739C739C73DE7BDE7B734EC028E05DE97E
        80491F7C1F7CC6189C739C739C739C739C739C739C73734EC028E05DE97E8049
        1F7C1F7C1F7CC6189C739C73D67E317E39679C73734EC028E05DE97E8049C618
        1F7C1F7C1F7CC6189C739C73317E317E317E734EC028E05DE97E80493967C618
        1F7C1F7C1F7CC6189C73317E317E317EAD352039E05DE97E80499C73B17EC618
        1F7C1F7C1F7CC618D67E317E7B6FD67EAD35DA7FE97E804939673967D67EC618
        1F7C1F7C1F7CC618D67E7B6F7B6FD67EAD352104DA7F317E317ED67EB17EC618
        1F7C1F7C1F7CC6189C737B6F7B6F317E317EAD35B17E1863317E317E357EC618
        1F7C1F7C1F7CC6189C737B6F7B6F7B6F7B6F7B6F7B6FD67E317E317E1863C618
        1F7C1F7C1F7CC6189C737B6F7B6F7B6F7B6F7B6F7B6F7B6FD67ED67E9C73C618
        1F7C1F7C1F7CC618DE7B9C739C739C739C739C739C739C739C739C739C73C618
        1F7C1F7C1F7CC618C618C618C618C618C618C618C618C618C618C618C618C618
        1F7C1F7C1F7C}
      ImageIndex = 3
      Images = ImageList1
    end
    object BtnDel: TRzBitBtn
      Left = 400
      Top = 4
      Width = 81
      Action = ActDele
      Caption = #21024#38500'(&D)'
      Color = 15791348
      Font.Charset = GB2312_CHARSET
      Font.Color = clBtnText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        00001F7C1F7C1F7C0000007C00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        007C1F7C1F7C1F7C007C007C007C00001F7C1F7C1F7C1F7C1F7C1F7C1F7C0000
        1F7C1F7C1F7C1F7C007C007C007C007C1F7C1F7C1F7C1F7C1F7C1F7C0000007C
        1F7C1F7C1F7C1F7C1F7C007C007C007C00001F7C1F7C1F7C1F7C0000007C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C007C007C007C00001F7C1F7C0000007C007C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C007C007C007C00000000007C007C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C007C007C007C007C007C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000007C007C007C00001F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000007C007C007C007C007C00001F7C1F7C
        1F7C1F7C1F7C1F7C1F7C00000000007C007C007C1F7C1F7C007C007C00001F7C
        1F7C1F7C1F7C1F7C0000007C007C007C007C1F7C1F7C1F7C1F7C007C007C0000
        1F7C1F7C1F7C1F7C007C007C007C007C1F7C1F7C1F7C1F7C1F7C1F7C007C007C
        00001F7C1F7C1F7C007C007C007C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        007C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C}
      ImageIndex = 4
      Images = ImageList1
    end
    object BtnFind: TRzBitBtn
      Left = 496
      Top = 4
      Width = 81
      Action = ActFind
      Caption = #26597#35810'(&Q)'
      Color = 15791348
      Font.Charset = GB2312_CHARSET
      Font.Color = clBtnText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C7B6F1F7C5A6BC514C514C514C514C514C514C514C514C514
        C5145A6B9C735A6B5A6B5A6BC5141042D65A7A6B7A6B7A6B7A6B7A6B7A6B1F7C
        C514841084105A6B7B6FC514DD772821D65A9C739C739C739C739C739C738B2D
        006DA47EA0489C73C514104228218B2D9C739C73DD77DD77DD77DD778B2D006D
        517F317E006D7B6FC5147A6B9C739C739C739C737A6BB452B4528B2D006D517F
        317E006D84107B6FC5149C739C739C73175FAD352821282128212821517F317E
        006D84105A6B5A6BC5149C739C73175FAD351F331F331F33DF223F32447D006D
        84101F7C5A6B5A6BC5149C73175FAD35B4529F57FF47FF471F33DF223F322821
        C5145A6B1F7C1863C5149C73175FAD359F57FF6BFF57FF47FF471F33DF222821
        C5145A6B7B6F1F7CC5149C73175FAD359F57FF6BFF57FF57FF47FF47DF222821
        C5147B6F5A6B1863C5149C73175FAD359F57FF6BFF57FF57FF57FF47DF222821
        C5147B6F7B6F5A6BC5149C737A6BAD35175F9F57FF6BFF57FF579F57B4522821
        C5149C735A6B1F7CC5149C737A6B175FAD35175F9F579F579F57B4528410175F
        C5145A6B7B6F7B6FC5149C737A6B7A6B175FAD35AD35AD35AD35AD35175F9C73
        C5147B6F7B6F5A6BC514DD779C739C739C739C73175F175F175F175F9C739C73
        C5145A6B7B6F7B6FC514C514C514C514C514C514C514C514C514C514C514C514
        C5147B6F5A6B}
      ImageIndex = 5
      Images = ImageList1
    end
    object Btnfresh: TRzBitBtn
      Left = 16
      Top = 4
      Width = 81
      Action = ActRefresh
      Caption = #21047#26032'(&R)'
      Color = 15791348
      Font.Charset = GB2312_CHARSET
      Font.Color = clBtnText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      ImageIndex = 0
      Images = ImageList1
    end
    object BtnMore: TRzBitBtn
      Left = 112
      Top = 4
      Width = 81
      Action = ActMore
      Caption = #26356#22810'(&M)'
      Color = 15791348
      Font.Charset = GB2312_CHARSET
      Font.Color = clBtnText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 7
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        1800000000000003000000000000000000000000000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FF00000000000000000000000000000000000000000000
        0000000000000000636163FF00FFFF00FFFF00FFFF00FFFF00FF000000F7F7F7
        F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7FFFFFF00FF000000B5B6B56361636361
        63FF00FFFF00FFFF00FF000000F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7DE
        DFDEF7F7F7000000B5B6B5B5B6B5B5B6B5636163636163FF00FF000000E7E7E7
        E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F70000003130313130313130
        31B5B6B5B5B6B5636163000000E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
        E7E7F7F7F7000000E7FFB5F7FFD63130314A494A4A494A4A494A000000E7E7E7
        F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7000000BDFF4AE7FFB53130
        31FFE7B5FFF7D64A494A000000E7E7E7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7
        E7E7F7F7F7000000D6FF8CE7FFB5313031FFD78CFFE7B54A494A000000E7E7E7
        F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7000000D6FF8CE7FFB53130
        31FFD78CFFF7D64A494A000000E7E7E7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7
        E7E7E7E7E7000000D6FF8CD6FF8C313031FFE7B5FFF7D64A494A000000DEDFDE
        F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7000000F7FFD6D6FF8C3130
        31FFE7B5FFF7D64A494A000000DEDFDEF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
        F7F7E7E7E7000000F7FFD6BDFF4A313031FFF7D6FFF7D64A494A000000DEDFDE
        F7FFFFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7000000BDFF4ABDFF4A3130
        314A494A4A494A4A494A000000DEDFDEDEDFDEDEDFDEDEDFDEDEDFDEE7E7E7E7
        E7E7E7E7E7000000313031313031313031FF00FFFF00FFFF00FF000000000000
        000000000000000000000000000000000000000000000000FF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
      ImageIndex = 1
      Images = ImageList1
    end
  end
  object RzSizePanel1: TRzSizePanel
    Left = 0
    Top = 332
    Width = 778
    Height = 165
    Align = alBottom
    HotSpotHighlight = clFuchsia
    HotSpotVisible = True
    ParentColor = True
    SizeBarStyle = ssGroove
    SizeBarWidth = 7
    TabOrder = 2
    object PageTabs: TRzPageControl
      Tag = -1
      Left = 0
      Top = 8
      Width = 778
      Height = 157
      ActivePage = TabSheet1
      ActivePageDefault = TabSheet1
      Align = alClient
      FlatColor = 10263441
      HotTrack = False
      HotTrackColor = 3983359
      HotTrackColorType = htctActual
      ShowFocusRect = False
      TabColors.HighlightBar = 3983359
      TabIndex = 0
      TabOrder = 0
      FixedDimension = 18
      object TabSheet1: TRzTabSheet
        Caption = #20379#24212#21830#21697#31181#31649#29702
        object dbgProvGoods: TxDBGridEh
          Left = 0
          Top = 0
          Width = 674
          Height = 135
          Align = alClient
          AllowedOperations = [alopUpdateEh]
          ColumnDefValues.Title.Alignment = taCenter
          DataSource = DsProvGoods
          FixedColor = clActiveBorder
          Flat = True
          FooterColor = clWindow
          FooterFont.Charset = GB2312_CHARSET
          FooterFont.Color = clWindowText
          FooterFont.Height = -12
          FooterFont.Name = #23435#20307
          FooterFont.Style = []
          Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
          OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking, dghMultiSortMarking, dghRowHighlight]
          ReadOnly = True
          RowHeight = 16
          SortLocal = True
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          TitleHeight = 15
          Columns = <
            item
              EditButtons = <>
              FieldName = 'GoodsID'
              Footers = <>
              Title.TitleButton = True
              Width = 85
            end
            item
              EditButtons = <>
              FieldName = 'Name'
              Footers = <>
              Title.TitleButton = True
              Width = 106
            end
            item
              EditButtons = <>
              FieldName = 'Specs'
              Footers = <>
              Title.TitleButton = True
              Width = 91
            end
            item
              EditButtons = <>
              FieldName = 'Unit1'
              Footers = <>
              Title.TitleButton = True
              Width = 51
            end
            item
              EditButtons = <>
              FieldName = 'Price1'
              Footers = <>
              Title.TitleButton = True
              Width = 74
            end
            item
              EditButtons = <>
              FieldName = 'Unit2'
              Footers = <>
              Title.TitleButton = True
              Width = 49
            end
            item
              EditButtons = <>
              FieldName = 'Price2'
              Footers = <>
              Title.TitleButton = True
            end
            item
              EditButtons = <>
              FieldName = 'DataUsable'
              Footers = <>
              Title.TitleButton = True
            end
            item
              EditButtons = <>
              FieldName = 'Remark'
              Footers = <>
              Title.TitleButton = True
              Width = 118
            end
            item
              EditButtons = <>
              FieldName = 'ProvGoodsID'