billstatus.dfm

三层ERP系统 (SQL)

inherited frmbillStatus: TfrmbillStatus
  Left = 332
  Top = 162
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #21934#25818#29376#24907#22522#39006
  ClientHeight = 536
  ClientWidth = 772
  Color = clWhite
  Font.Height = -12
  OnCloseQuery = FormCloseQuery
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 8
    Top = 4
    Width = 756
    Height = 41
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = clWhite
    TabOrder = 0
    object FormTitle: TLabel
      Left = 24
      Top = 10
      Width = 12
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -21
      Font.Name = #27161#26999#39636
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 230
      Top = 13
      Width = 56
      Height = 13
      Caption = #21934#25818#32232#34399
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
    end
    object Panel3: TPanel
      Left = 443
      Top = 2
      Width = 311
      Height = 37
      Align = alRight
      BevelOuter = bvNone
      Color = clWhite
      TabOrder = 0
      object btnExit: TButton
        Left = 230
        Top = 5
        Width = 75
        Height = 25
        Action = acExit
        TabOrder = 0
      end
      object Button1: TButton
        Left = 2
        Top = 5
        Width = 75
        Height = 25
        Action = acSubmit
        TabOrder = 1
      end
      object Button2: TButton
        Left = 78
        Top = 5
        Width = 75
        Height = 25
        Action = acCancel
        TabOrder = 2
      end
      object Button3: TButton
        Left = 154
        Top = 5
        Width = 75
        Height = 25
        Action = acFinish
        TabOrder = 3
      end
    end
    object EditNO: TwwDBEdit
      Left = 302
      Top = 10
      Width = 137
      Height = 19
      Hint = 'fNo_S'
      CharCase = ecUpperCase
      Ctl3D = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 48
    Width = 756
    Height = 481
    TabOrder = 1
    object pnEdit: TPanel
      Left = 2
      Top = 14
      Width = 752
      Height = 258
      Align = alTop
      BevelOuter = bvNone
      Color = clWhite
      TabOrder = 0
      object Label1: TLabel
        Left = 278
        Top = 11
        Width = 90
        Height = 20
        Alignment = taCenter
        AutoSize = False
        Caption = #26032#24314#20154
        Color = clTeal
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label2: TLabel
        Left = 368
        Top = 11
        Width = 140
        Height = 20
        Alignment = taCenter
        AutoSize = False
        Caption = #26032#24314#26178#38291
        Color = clTeal
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label4: TLabel
        Left = 508
        Top = 11
        Width = 90
        Height = 20
        Alignment = taCenter
        AutoSize = False
        Caption = #20462#25913#20154
        Color = clTeal
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label3: TLabel
        Left = 597
        Top = 11
        Width = 140
        Height = 20
        Alignment = taCenter
        AutoSize = False
        Caption = #20462#25913#26178#38291
        Color = clTeal
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label5: TLabel
        Left = 30
        Top = 32
        Width = 56
        Height = 13
        Caption = #25163#24037#21934#34399
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        ParentFont = False
      end
      object LblStatus: TLabel
        Left = 102
        Top = 8
        Width = 48
        Height = 13
        Caption = 'Status'
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = [fsBold]
        ParentFont = False
      end
      object edtmodidate: TwwDBEdit
        Left = 597
        Top = 31
        Width = 140
        Height = 19
        Hint = 'fmodidate'
        BorderStyle = bsNone
        Ctl3D = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        Frame.Enabled = True
        Frame.FocusBorders = [efLeftBorder, efBottomBorder]
        Frame.NonFocusBorders = [efLeftBorder, efRightBorder, efBottomBorder]
        Frame.FocusStyle = efsFrameSingle
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 4
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
      end
      object edtmodiuser: TwwDBEdit
        Left = 508
        Top = 31
        Width = 88
        Height = 19
        Hint = 'fmodiuser'
        BorderStyle = bsNone
        Ctl3D = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        Frame.Enabled = True
        Frame.FocusBorders = [efLeftBorder, efBottomBorder]
        Frame.NonFocusBorders = [efLeftBorder, efBottomBorder]
        Frame.FocusStyle = efsFrameSingle
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 3
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
      end
      object edtcreadate: TwwDBEdit
        Left = 368
        Top = 31
        Width = 140
        Height = 19
        Hint = 'fcreadate'
        BorderStyle = bsNone
        Ctl3D = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        Frame.Enabled = True
        Frame.FocusBorders = [efLeftBorder, efBottomBorder]
        Frame.NonFocusBorders = [efLeftBorder, efBottomBorder]
        Frame.FocusStyle = efsFrameSingle
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 2
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
      end
      object edtCreauser: TwwDBEdit
        Left = 278
        Top = 31
        Width = 90
        Height = 19
        Hint = 'fcreauser'
        BorderStyle = bsNone
        Ctl3D = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        Frame.Enabled = True
        Frame.FocusBorders = [efLeftBorder, efBottomBorder]
        Frame.NonFocusBorders = [efLeftBorder, efBottomBorder]
        Frame.FocusStyle = efsFrameSingle
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
      end
      object wwDBEdit1: TwwDBEdit
        Left = 102
        Top = 29
        Width = 137
        Height = 19
        Hint = 'fNo_S'
        CharCase = ecUpperCase
        Ctl3D = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
      end
    end
    object plGrid: TPanel
      Left = 2
      Top = 272
      Width = 752
      Height = 207
      Align = alClient
      BevelOuter = bvNone
      Color = clWhite
      TabOrder = 1
      object Grid: TDBGridEh
        Tag = 1
        Left = 0
        Top = 0
        Width = 752
        Height = 157
        Align = alClient
        DataSource = dsDetail
        FixedColor = 12835543
        Flat = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #32048#26126#39636
        Font.Style = []
        FooterColor = 14015231
        FooterFont.Charset = ANSI_CHARSET
        FooterFont.Color = clWindowText