jh_th_unit.~dfm

单机进销存管理程序 Delphi+Acce

object jh_th_form: Tjh_th_form
  Left = 240
  Top = 205
  BorderStyle = bsDialog
  Caption = #36827#36135#36864#36135#21333
  ClientHeight = 374
  ClientWidth = 639
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Icon.Data = {
    0000010001002020040000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    00C00C0000000000000000000000000C00CC0CC0C0000000000000000000000C
    C00C0CC0CCC000C40000003B00000C00C00000C0CCC000CCCC00BBBB00000C00
    0000000000C000CCCC00BBBB0000000000000000000000CCCC00BBBB00000000
    00000000000000CCCC00BBBB000000000000000000000004CC00BB3000000000
    0090090000000000000000000000000900990990900000000000000000000009
    90090990999000910000002A0000090090000090999000999900AAAA00000900
    00000000009000999900AAAA0000000000000000000000999900AAAA00000000
    00000000000000999900AAAA0000000000000000000000019900AA2000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFDBFFFFFEC97FFFFE6913FF3B7D10FC3BDBD
    0003EC970003E6910003B7D10003BDBD0003EC970003E6910003B7D10003BDBD
    0003EC970003E6910003B7D10003BDBD0003EC970003E6910003B7D10003BFFD
    0003FFFF8007FFFFE01FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 355
    Width = 639
    Height = 19
    Panels = <
      item
        Text = '  '#24635#35760#24405#25968
        Width = 80
      end
      item
        Width = 50
      end>
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 220
    Width = 639
    Height = 135
    Align = alClient
    BorderStyle = bsNone
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 1
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clBlue
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
  end
  object GroupBox3: TGroupBox
    Left = 0
    Top = 129
    Width = 639
    Height = 91
    Align = alTop
    Color = 13031127
    Ctl3D = False
    ParentColor = False
    ParentCtl3D = False
    TabOrder = 2
    object Label6: TLabel
      Left = 22
      Top = 16
      Width = 48
      Height = 12
      Caption = #21830#21697#31616#30721
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 234
      Top = 17
      Width = 48
      Height = 12
      Caption = #21830#21697#32534#30721
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 435
      Top = 15
      Width = 48
      Height = 12
      Caption = #21830#21697#21517#31216
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 39
      Top = 41
      Width = 30
      Height = 12
      Caption = #31867' '#21035
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 249
      Top = 41
      Width = 30
      Height = 12
      Caption = #35268' '#26684
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 451
      Top = 40
      Width = 30
      Height = 12
      Caption = #22411' '#21495
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 38
      Top = 66
      Width = 30
      Height = 12
      Caption = #21333' '#20301
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label13: TLabel
      Left = 248
      Top = 66
      Width = 30
      Height = 12
      Caption = #20215' '#26684
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 451
      Top = 65
      Width = 30
      Height = 12
      Caption = #25968' '#37327
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object SpeedButton8: TSpeedButton
      Left = 198
      Top = 13
      Width = 22
      Height = 20
      Cursor = crHandPoint
      Caption = '...'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -9
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = SpeedButton8Click
    end
    object Edit5: TEdit
      Left = 72
      Top = 13
      Width = 126
      Height = 19
      TabOrder = 0
    end
    object Edit6: TEdit
      Left = 284
      Top = 14
      Width = 126
      Height = 19
      TabOrder = 1
    end
    object Edit7: TEdit
      Left = 485
      Top = 11
      Width = 126
      Height = 19
      TabOrder = 2
    end
    object Edit8: TEdit
      Left = 72
      Top = 39
      Width = 126
      Height = 19
      TabOrder = 3
    end
    object Edit9: TEdit
      Left = 283
      Top = 39
      Width = 126
      Height = 19
      TabOrder = 4
    end
    object Edit10: TEdit
      Left = 485
      Top = 36
      Width = 126
      Height = 19
      TabOrder = 5
    end
    object Edit11: TEdit
      Left = 72
      Top = 64
      Width = 126