unitgj.dfm

手机批发商进销存管理

object GjForm: TGjForm
  Left = 192
  Top = 107
  Width = 621
  Height = 491
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = #20179#24211#31649#29702
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 12
  object RzPageControl1: TRzPageControl
    Left = 0
    Top = 0
    Width = 613
    Height = 464
    ActivePage = TabSheet1
    Align = alClient
    Images = ImageList1
    TabIndex = 0
    TabOrder = 0
    OnChange = RzPageControl1Change
    FixedDimension = 22
    object TabSheet1: TRzTabSheet
      ImageIndex = 0
      Caption = #37319#36141
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 260
        Height = 438
        Align = alLeft
        BevelOuter = bvNone
        Color = clBackground
        TabOrder = 0
        object Label1: TLabel
          Left = 16
          Top = 46
          Width = 24
          Height = 12
          Caption = #26085#26399
          Font.Charset = GB2312_CHARSET
          Font.Color = clYellow
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label2: TLabel
          Left = 16
          Top = 104
          Width = 24
          Height = 12
          Caption = #21697#21517
          Font.Charset = GB2312_CHARSET
          Font.Color = clYellow
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 16
          Top = 163
          Width = 24
          Height = 12
          Caption = #26426#22411
          Font.Charset = GB2312_CHARSET
          Font.Color = clYellow
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label4: TLabel
          Left = 16
          Top = 222
          Width = 24
          Height = 12
          Caption = #20018#21495
          Font.Charset = GB2312_CHARSET
          Font.Color = clYellow
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object SpeedButton1: TSpeedButton
          Left = 220
          Top = 98
          Width = 23
          Height = 22
          Caption = #26597
          Font.Charset = GB2312_CHARSET
          Font.Color = clPurple
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          OnClick = SpeedButton1Click
        end
        object SpeedButton2: TSpeedButton
          Left = 220
          Top = 157
          Width = 23
          Height = 22
          Caption = #26597
          Font.Charset = GB2312_CHARSET
          Font.Color = clPurple
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          OnClick = SpeedButton1Click
        end
        object Label20: TLabel
          Left = 16
          Top = 278
          Width = 24
          Height = 12
          Caption = #22791#27880
          Font.Charset = GB2312_CHARSET
          Font.Color = clYellow
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object DateTimePicker1: TDateTimePicker
          Left = 48
          Top = 40
          Width = 171
          Height = 20
          CalAlignment = dtaLeft
          Date = 38712.8501596759
          Time = 38712.8501596759
          DateFormat = dfLong
          DateMode = dmComboBox
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          Kind = dtkDate
          ParseInput = False
          TabOrder = 0
          OnChange = DateTimePicker1Change
          OnKeyPress = DateTimePicker1KeyPress
        end
        object Edit1: TEdit
          Left = 48
          Top = 216
          Width = 193
          Height = 20
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          MaxLength = 30
          TabOrder = 3
          OnKeyPress = Edit1KeyPress
        end
        object ComboBox1: TComboBox
          Left = 48
          Top = 98
          Width = 171
          Height = 20
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          ItemHeight = 12
          MaxLength = 30
          TabOrder = 1
          OnChange = ComboBox1Change
          OnKeyPress = ComboBox1KeyPress
        end
        object ComboBox2: TComboBox
          Left = 48
          Top = 157
          Width = 171
          Height = 20
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          ItemHeight = 12
          MaxLength = 30
          TabOrder = 2
          OnKeyPress = ComboBox2KeyPress
        end
        object Panel3: TPanel
          Left = 0
          Top = 388
          Width = 260
          Height = 50
          Align = alBottom
          BevelOuter = bvNone
          Color = clPurple
          TabOrder = 5
          object RzBitBtn1: TRzBitBtn
            Left = 104
            Top = 11
            Width = 65
            Caption = #36141#36827
            Font.Charset = GB2312_CHARSET
            Font.Color = clBlue
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            OnClick = RzBitBtn1Click
            ImageIndex = 6
            Images = ImageList1
          end
        end
        object Memo1: TMemo
          Left = 48
          Top = 272
          Width = 193
          Height = 73
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          MaxLength = 255
          TabOrder = 4
          OnKeyPress = Memo1KeyPress
        end
      end
      object Panel2: TPanel
        Left = 260
        Top = 0
        Width = 349
        Height = 438
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 1
        object DBGrid1: TDBGrid
          Left = 0
          Top = 0
          Width = 349
          Height = 388
          Align = alClient
          Color = clInfoBk
          DataSource = DataSource1
          ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'InDate'
              Title.Alignment = taCenter
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'GoodsName'
              Title.Alignment = taCenter
              Width = 83
              Visible = True