selgoodscheckacceptqry.~dfm

群星医药系统源码

        Items.Strings = (
          ''
          #24050#22797#26680
          #26410#22797#26680)
        ItemIndex = 0
      end
      object edAudit: TRzButtonEdit
        Left = 440
        Top = 44
        Width = 85
        Height = 20
        Color = clWhite
        Ctl3D = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FrameVisible = True
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 8
        FlatButtons = True
        OnButtonClick = edAuditButtonClick
      end
      object DTCtrl1: TRzDateTimePicker
        Left = 36
        Top = 16
        Width = 93
        Height = 20
        Date = 37155.651937592600000000
        Time = 37155.651937592600000000
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        FlatButtons = True
        FrameVisible = True
        ShowToday = True
        ShowTodayCircle = True
      end
      object DTCtrl2: TRzDateTimePicker
        Left = 144
        Top = 16
        Width = 93
        Height = 20
        Date = 37155.652310474500000000
        Time = 37155.652310474500000000
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        FlatButtons = True
        FrameVisible = True
        ShowToday = True
        ShowTodayCircle = True
      end
      object edDepartID: TRzButtonEdit
        Left = 596
        Top = 16
        Width = 85
        Height = 20
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FrameVisible = True
        ParentFont = False
        TabOrder = 4
        FlatButtons = True
        OnButtonClick = edDepartIDButtonClick
      end
      object ckMultiSelect: TRzCheckBox
        Left = 540
        Top = 74
        Width = 69
        Height = 17
        Caption = #22810#27425#36873#25321
        HotTrack = True
        State = cbUnchecked
        TabOrder = 11
      end
      object edPBillNo: TRzEdit
        Left = 296
        Top = 16
        Width = 85
        Height = 20
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FrameVisible = True
        ParentFont = False
        TabOrder = 2
      end
    end
    object RzBitBtn1: TRzBitBtn
      Left = 700
      Top = 16
      Action = ActQuery
      Caption = #26597#35810'(&Q)'
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 1
      ImageIndex = 0
      Images = ImageList1
    end
    object RzBitBtn2: TRzBitBtn
      Left = 700
      Top = 48
      Action = ActReport
      Caption = #25253#34920'(&R)'
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 2
      ImageIndex = 1
      Images = ImageList1
    end
    object RzBitBtn3: TRzBitBtn
      Left = 700
      Top = 80
      Action = ActViewBill
      Caption = #35814#32454#20449#24687
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      ParentColor = False
      TabOrder = 3
      Images = ImageList1
    end
  end
  object ptBkPanel: TFlatPanel
    Left = 0
    Top = 0
    Width = 787
    Height = 24
    Color = clMoneyGreen
    Align = alTop
    TabOrder = 1
    UseDockManager = True
    object FlatPanel2: TPanel
      Left = 738
      Top = 1
      Width = 48
      Height = 22
      Align = alRight
      BevelOuter = bvNone
      ParentColor = True
      TabOrder = 0
      object BtnWhatIs: TFlatSpeedButton
        Left = 4
        Top = 2
        Width = 18
        Height = 18
        Visible = False
      end
      object BtnHelp: TFlatSpeedButton
        Left = 24
        Top = 2
        Width = 18
        Height = 18
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000C40E0000C40E00000000000000000000CED3D6CED3D6
          CED3D6CED3D6CED3D6CED3D6CED3D6000000000000CED3D6CED3D6CED3D6CED3
          D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D600000000000084
          0084848284000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6
          CED3D6000000000000840084848284FFFFFFFFFFFFC6C3C6000000CED3D6CED3
          D6CED3D6CED3D6CED3D6CED3D6000000000000840084848284FFFFFFFFFFFFFF
          FFFFFFFFFFC6C3C6C6C3C6000000CED3D6CED3D6CED3D6CED3D6000000840084
          848284FFFFFFFFFFFFFFFFFFC6C3C6848284000000C6C3C6C6C3C6C6C3C60000
          00CED3D6CED3D6CED3D6000000FFFFFFFFFFFFFFFFFFC6C3C684828400000084
          0084840084000000C6C3C6C6C3C6C6C3C6000000CED3D6CED3D6000000FFFFFF
          C6C3C6848284000000840084840084840084840084840084000000C6C3C6C6C3
          C6C6C3C6000000CED3D600000084828400000084008484008484008400FFFF84
          0084840084840084840084840084C6C3C6C6C3C6848284000000840084840084
          8400848400848400848400848400840082848400848400848400848400840000
          00C6C3C6848284CED3D6CED3D684008484008484008484008484008484008400
          FFFF00FFFF00FFFF840084840084840084000000848284CED3D6CED3D6CED3D6
          84008484008484008484008484008400828484008400828400FFFF8400848400
          84840084000000CED3D6CED3D6CED3D6CED3D684008484008484008484008400
          FFFF00828400828400FFFF840084840084840084840084000000CED3D6CED3D6
          CED3D6CED3D684008484008484008484008400FFFF00FFFF8400848400848400
          84840084000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D684008484008484
          0084840084840084840084840084000000CED3D6CED3D6CED3D6CED3D6CED3D6
          CED3D6CED3D6CED3D6CED3D6840084840084840084840084000000CED3D6CED3
          D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D684
          0084000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6}
      end
    end
    object FlatPanel3: TPanel
      Left = 1
      Top = 1
      Width = 26
      Height = 22
      Align = alLeft
      BevelOuter = bvNone
      ParentColor = True
      TabOrder = 1
      object BtnPopMenu: TFlatSpeedButton
        Left = 4
        Top = 2
        Width = 18
        Height = 18
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          04000000000080000000C40E0000C40E00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333330333333333333330603333333333330666033
          3333333306666603333333306666666033333300006660000333333330666033
          3333333330666033333333333066603333333333300000333333333333333333
          3333333333333333333333333333333333333333333333333333}
        ParentFont = False
        OnClick = BtnPopMenuClick
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 137
    Width = 787
    Height = 217
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 4
    ParentColor = True
    TabOrder = 2
    object dbgPchOrders: TxDBGridEh
      Left = 4
      Top = 4
      Width = 779
      Height = 209
      Align = alClient
      AllowedOperations = []
      DataSource = dsGoodsCheckAccept
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      ReadOnly = True
      RowHeight = 16
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      TitleHeight = 15
    end
  end
  object TopPopMenu: TPopupMenu
    AutoHotkeys = maManual
    Left = 220
    object SetFields1: TMenuItem
      Action = ActFieldsLayout
    end
    object refresh1: TMenuItem