unitresetaccount.dfm

此代码为企业原料管理代码

object frmCommReSetAccount: TfrmCommReSetAccount
  Left = 273
  Top = 173
  BorderStyle = bsDialog
  Caption = '反结帐 '
  ClientHeight = 286
  ClientWidth = 323
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 15
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 323
    Height = 289
    ActivePage = TabSheet4
    Align = alTop
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'TabSheet1'
      object LBMaterCheckDiary: TListBox
        Left = 0
        Top = 0
        Width = 315
        Height = 201
        Align = alTop
        ItemHeight = 15
        TabOrder = 0
      end
      object bbMaterReSetAcc: TBitBtn
        Left = 31
        Top = 215
        Width = 98
        Height = 27
        Caption = '反结账'
        TabOrder = 1
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'TabSheet2'
      ImageIndex = 1
    end
    object TabSheet3: TTabSheet
      Caption = 'TabSheet3'
      ImageIndex = 2
    end
    object TabSheet4: TTabSheet
      Caption = 'TabSheet4'
      ImageIndex = 3
      object LBProdCheckDiary: TListBox
        Left = 0
        Top = 0
        Width = 315
        Height = 209
        Align = alTop
        ItemHeight = 15
        TabOrder = 0
      end
      object BitBtn3: TBitBtn
        Left = 43
        Top = 230
        Width = 97
        Height = 27
        Caption = '反结账'
        TabOrder = 1
        OnClick = BitBtn3Click
      end
      object BitBtn2: TBitBtn
        Left = 170
        Top = 230
        Width = 97
        Height = 27
        Caption = '退出(Esc)'
        TabOrder = 2
        OnClick = BitBtn2Click
      end
    end
  end
  object stHistory: TStaticText
    Left = 0
    Top = 289
    Width = 323
    Height = 19
    Align = alTop
    BorderStyle = sbsSunken
    Caption = '成品仓库历史结账清单'
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
end