unitshenhe.dfm

PosEasy收银系统源码,Pos机前后台管理代码

object frmshenhe: Tfrmshenhe
  Left = 189
  Top = 133
  Width = 696
  Height = 480
  Caption = '审核'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 453
    Align = alClient
    Color = clInfoBk
    TabOrder = 0
    object DBGridEh1: TDBGridEh
      Left = 1
      Top = 1
      Width = 686
      Height = 359
      LineColor = clBlack
      SelectedFontColor = clHighlightText
      Align = alClient
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'MS Sans Serif'
      FooterFont.Style = []
      FooterColor = clWindow
      CurrencyStyle.CurrencyFont.Charset = DEFAULT_CHARSET
      CurrencyStyle.CurrencyFont.Color = clWindowText
      CurrencyStyle.CurrencyFont.Height = -11
      CurrencyStyle.CurrencyFont.Name = 'MS Sans Serif'
      CurrencyStyle.CurrencyFont.Style = []
      CurrencyStyle.CurrencySymbol = '￥'
      CurrencyStyle.CompartColor = clSilver
      CurrencyStyle.KilobitColor = clGreen
      CurrencyStyle.RadixColor = clRed
      CurrencyStyle.ShowMinus = True
      CurrencyStyle.ShowZero = False
      CurrencyStyle.MinusColor = clRed
      CurrencyStyle.Layout = tlCenter
      CurrencyStyle.HeadFont.Charset = DEFAULT_CHARSET
      CurrencyStyle.HeadFont.Color = clWindowText
      CurrencyStyle.HeadFont.Height = -11
      CurrencyStyle.HeadFont.Name = '楷体_GB2312'
      CurrencyStyle.HeadFont.Style = []
      Columns = <
        item
          FieldName = '选择'
          Width = 57
          Checkboxes = True
          Footers = <>
        end
        item
          Footers = <>
        end
        item
          Footers = <>
        end
        item
          Footers = <>
        end
        item
          Footers = <>
        end
        item
          Footers = <>
        end>
    end
    object Panel2: TPanel
      Left = 1
      Top = 360
      Width = 686
      Height = 92
      Align = alBottom
      Color = clInfoBk
      TabOrder = 1
      object Label1: TLabel
        Left = 24
        Top = 32
        Width = 60
        Height = 15
        Caption = '出库单号'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object BitBtn1: TBitBtn
        Left = 480
        Top = 32
        Width = 75
        Height = 25
        Caption = '确定'
        Default = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '仿宋_GB2312'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
      object BitBtn2: TBitBtn
        Left = 568
        Top = 32
        Width = 75
        Height = 25
        Cancel = True
        Caption = '返回'
        TabOrder = 1
        OnClick = BitBtn2Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333FFFFF333333000033333388888833333333333F888888FFF333
          000033338811111188333333338833FFF388FF33000033381119999111833333
          38F338888F338FF30000339119933331111833338F388333383338F300003391
          13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
          33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
          33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
          000039183811193333918338F8F833F83333838F000039118111933339118338
          F3833F83333833830000339111193333391833338F33F8333FF838F300003391
          11833338111833338F338FFFF883F83300003339111888811183333338FF3888
          83FF83330000333399111111993333333388FFFFFF8833330000333333999999
          3333333333338888883333330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
      object Edit1: TEdit
        Left = 94
        Top = 28
        Width = 121
        Height = 23
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object BitBtn3: TBitBtn
        Left = 389
        Top = 33
        Width = 75
        Height = 25
        Caption = '查询'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = BitBtn3Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333336633
          3333333333333FF3333333330000333333364463333333333333388F33333333
          00003333333E66433333333333338F38F3333333000033333333E66333333333
          33338FF8F3333333000033333333333333333333333338833333333300003333
          3333446333333333333333FF3333333300003333333666433333333333333888
          F333333300003333333E66433333333333338F38F333333300003333333E6664
          3333333333338F38F3333333000033333333E6664333333333338F338F333333
          0000333333333E6664333333333338F338F3333300003333344333E666433333
          333F338F338F3333000033336664333E664333333388F338F338F33300003333
          E66644466643333338F38FFF8338F333000033333E6666666663333338F33888
          3338F3330000333333EE666666333333338FF33333383333000033333333EEEE
          E333333333388FFFFF8333330000333333333333333333333333388888333333
          0000}
        NumGlyphs = 2
      end
    end
  end
  object Query1: TQuery
    AutoCalcFields = False
    CachedUpdates = True
    DatabaseName = 'guohua1'
    Left = 80
    Top = 80
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 40
    Top = 80
  end
  object Query2: TQuery
    DatabaseName = 'guohua1'
    DataSource = DataSource1
    Left = 112
    Top = 80
  end
  object Table1: TTable
    DatabaseName = 'guohua1'
    Filter = '选择=0'
    Filtered = True
    Left = 152
    Top = 80
  end
end