yg_unit.dfm

仿速达进销存系统,系统在单据打印上作了灵活的自定义.可供借鉴

object yg_form: Tyg_form
  Left = 47
  Top = 112
  Width = 692
  Height = 374
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = #21592#24037#36164#26009
  Color = 13031127
  Ctl3D = False
  Font.Charset = GB2312_CHARSET
  Font.Color = clBlue
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 0
    Top = 33
    Width = 684
    Height = 168
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 14
      Top = 21
      Width = 48
      Height = 12
      Caption = #21592#24037#32534#30721
    end
    object Label2: TLabel
      Left = 224
      Top = 20
      Width = 48
      Height = 12
      Caption = #21592#24037#21517#31216
    end
    object Label3: TLabel
      Left = 450
      Top = 21
      Width = 48
      Height = 12
      Caption = #25340#38899#31616#30721
    end
    object Label4: TLabel
      Left = 37
      Top = 51
      Width = 24
      Height = 12
      Caption = #23398#21382
    end
    object Label5: TLabel
      Left = 474
      Top = 49
      Width = 24
      Height = 12
      Caption = #30005#35805
    end
    object Label6: TLabel
      Left = 475
      Top = 80
      Width = 24
      Height = 12
      Caption = #37038#32534
    end
    object Label7: TLabel
      Left = 37
      Top = 80
      Width = 24
      Height = 12
      Caption = #22320#22336
    end
    object Label11: TLabel
      Left = 16
      Top = 109
      Width = 48
      Height = 12
      Caption = #30005#23376#37038#20214
    end
    object Label13: TLabel
      Left = 39
      Top = 141
      Width = 24
      Height = 12
      Caption = #22791#27880
    end
    object Label8: TLabel
      Left = 224
      Top = 48
      Width = 48
      Height = 12
      Caption = #27605#19994#23398#26657
    end
    object Edit1: TEdit
      Left = 64
      Top = 16
      Width = 140
      Height = 18
      Ctl3D = False
      MaxLength = 10
      ParentCtl3D = False
      TabOrder = 0
      OnKeyDown = Edit1KeyDown
    end
    object Edit2: TEdit
      Left = 277
      Top = 16
      Width = 140
      Height = 18
      Ctl3D = False
      MaxLength = 8
      ParentCtl3D = False
      TabOrder = 1
      OnKeyDown = Edit2KeyDown
    end
    object Edit3: TEdit
      Left = 501
      Top = 16
      Width = 140
      Height = 18
      Ctl3D = False
      MaxLength = 10
      ParentCtl3D = False
      TabOrder = 2
      OnKeyDown = Edit3KeyDown
    end
    object Edit4: TEdit
      Left = 276
      Top = 46
      Width = 140
      Height = 18
      Ctl3D = False
      MaxLength = 30
      ParentCtl3D = False
      TabOrder = 3
      OnKeyDown = Edit4KeyDown
    end
    object Edit5: TEdit
      Left = 502
      Top = 46
      Width = 140
      Height = 18
      Ctl3D = False
      MaxLength = 12
      ParentCtl3D = False
      TabOrder = 4
      OnKeyDown = Edit5KeyDown
    end
    object Edit6: TEdit
      Left = 502
      Top = 76
      Width = 140
      Height = 18
      Ctl3D = False
      MaxLength = 6
      ParentCtl3D = False
      TabOrder = 5
      OnKeyDown = Edit6KeyDown
    end
    object Edit7: TEdit
      Left = 64
      Top = 76
      Width = 353
      Height = 18
      Ctl3D = False
      MaxLength = 30
      ParentCtl3D = False
      TabOrder = 6
      OnKeyDown = Edit7KeyDown
    end
    object ComboBox1: TComboBox
      Left = 64
      Top = 46
      Width = 139
      Height = 20
      BevelKind = bkFlat
      ItemHeight = 12
      TabOrder = 7
      OnKeyDown = ComboBox1KeyDown
      Items.Strings = (
        #21338#22763#21518
        #21338#22763
        #30805#22763
        #26412#31185
        #22823#19987
        #20013#19987
        #20854#23427)
    end
    object Edit8: TEdit
      Left = 64
      Top = 104
      Width = 353
      Height = 18
      Ctl3D = False
      MaxLength = 20
      ParentCtl3D = False
      TabOrder = 8
      OnKeyDown = Edit8KeyDown
    end
    object Edit9: TEdit
      Left = 64
      Top = 136
      Width = 577
      Height = 18
      Ctl3D = False
      MaxLength = 30
      ParentCtl3D = False
      TabOrder = 9
      OnKeyDown = Edit9KeyDown
    end
    object Edit10: TEdit
      Left = 512
      Top = 104
      Width = 121
      Height = 18
      TabOrder = 10
      Visible = False
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 201
    Width = 684
    Height = 124
    Align = alClient