item.~dfm

在打沙场用的最简单

inherited frmitem: Tfrmitem
  Left = 18
  Top = 77
  Width = 700
  Height = 451
  Caption = #20135#21697#36164#26009
  PixelsPerInch = 96
  TextHeight = 12
  inherited CoolBar1: TCoolBar
    Top = 390
    Width = 692
    Bands = <
      item
        Control = Panel1
        ImageIndex = -1
        MinHeight = 30
        Width = 688
      end>
    inherited Panel1: TPanel
      Width = 675
      inherited spbtnEdit: TSpeedButton
        ParentFont = False
      end
      inherited paprint: TPanel
        Left = 535
        inherited comboPrint: TwwDBLookupCombo
          Selected.Strings = (
            #25171#21360#36873#39033#9'8'#9#25171#21360#36873#39033#9'F')
        end
      end
      object BitBtn1: TBitBtn
        Left = 168
        Top = 0
        Width = 75
        Height = 25
        Caption = #36039#26009#23566#20837
        TabOrder = 1
        Visible = False
        OnClick = BitBtn1Click
      end
    end
  end
  inherited Grid: TDBGridEh
    Width = 692
    Height = 390
    Columns = <
      item
        EditButtons = <>
        FieldName = 'fid'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #24207#34399
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'fcode'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #29289#26009#20195#30721
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'fname'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #29289#26009#21517#31216
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Width = 120
      end
      item
        EditButtons = <>
        FieldName = 'fsaleprice'
        Footers = <>
        Title.Caption = #21333#20215
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'zs'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #25903#25976
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'color'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #38991#33394
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'colorno'
        Footers = <>
        Title.Caption = #33394#34399
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'gno'
        Footers = <>
        Title.Caption = #32568#34399
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'ftype'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #31867#21035
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'funit'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21333#20301
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'fnote'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #22791#27880
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Width = 160
      end
      item
        EditButtons = <>
        FieldName = 'unitqty'
        Footers = <>
        Title.Caption = #25563#31639#21295#29575'1'
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'fiffew'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26159#21542#20248#24800
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'fminstore'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #26368#20302#24235#23384#37327
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'fsort'
        Footers = <>
        Title.Caption = #25490#24207
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Width = 15
      end
      item
        EditButtons = <>
        FieldName = 'funit1'
        Footers = <>
        Title.Caption = #25563#31639#21934#20301'1'
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'funit1qty'
        Footers = <>
        Title.Caption = #25563#31639#21295#29575'1'
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'funit2'
        Footers = <>
        Title.Caption = #25563#31639#21934#20301'2'
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        FieldName = 'funit2qty'
        Footers = <>
        Title.Caption = #25563#31639#21295#29575'2'
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        Footers = <>
        Title.Caption = #29986#21697#22294#29255
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
      end
      item
        EditButtons = <>
        Footers = <>
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end
      item
        EditButtons = <>
        Footers = <>
        Title.Font.Charset = ANSI_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #32048#26126#39636
        Title.Font.Style = []
        Visible = False
      end>
  end
  inherited CDSbaseinfo: TClientDataSet
    object CDSbaseinfofid: TAutoIncField
      FieldName = 'fid'
      ReadOnly = True
    end
    object CDSbaseinfofsaleprice: TBCDField
      FieldName = 'fsaleprice'
      Precision = 9
      Size = 2
    end
    object CDSbaseinfofsalehortation: TBCDField
      FieldName = 'fsalehortation'
      Precision = 9
      Size = 2
    end
    object CDSbaseinfofiffew: TBooleanField
      FieldName = 'fiffew'
    end
    object CDSbaseinfofminstore: TBCDField
      FieldName = 'fminstore'
      Precision = 9
      Size = 2
    end
    object CDSbaseinfoffunitqty: TFloatField
      FieldName = 'unitqty'
    end
    object CDSbaseinfofsort: TStringField
      FieldName = 'fsort'
      Size = 0
    end
    object CDSbaseinfofunit2qty: TFloatField
      FieldName = 'funit2qty'
    end
    object CDSbaseinfofunit1qty: TFloatField
      FieldName = 'funit1qty'
    end
    object CDSbaseinfocolorno: TStringField
      FieldName = 'colorno'
      Size = 15
    end
    object CDSbaseinfocolor: TStringField
      FieldName = 'color'
      Size = 15
    end
    object CDSbaseinfogno: TStringField
      FieldName = 'gno'
      Size = 15
    end
    object CDSbaseinfozs: TStringField
      FieldName = 'zs'
      Size = 15
    end
    object CDSbaseinfock: TStringField
      FieldName = 'ck'
      Size = 8
    end
    object CDSbaseinfoqty: TFloatField
      FieldName = 'qty'
    end
    object CDSbaseinfosafeqty: TFloatField
      FieldName = 'safeqty'
    end
    object CDSbaseinfocgyrqty: TFloatField
      FieldName = 'cgyrqty'
    end
    object CDSbaseinfocgwjqty: TFloatField
      FieldName = 'cgwjqty'
    end
    object CDSbaseinfofcode: TStringField
      FieldName = 'fcode'
      Size = 30
    end
    object CDSbaseinfofname: TStringField
      FieldName = 'fname'
      Size = 200
    end
    object CDSbaseinfofunit: TStringField
      FieldName = 'funit'
      Size = 10
    end
    object CDSbaseinfoftype: TStringField
      FieldName = 'ftype'
      Size = 10
    end
    object CDSbaseinfofnote: TStringField
      FieldName = 'fnote'
      Size = 50
    end
    object CDSbaseinfofunit1: TStringField
      FieldName = 'funit1'
      Size = 10
    end
    object CDSbaseinfofunit2: TStringField
      FieldName = 'funit2'
      Size = 10
    end
  end
  inherited frBaseinfo: TfrReport
    ReportForm = {19000000}
  end
  object OpenDialog1: TOpenDialog
    Left = 304
    Top = 48
  end
end