maininputtyunit.dfm

一个用delphi 开发的商场销售系统 涵盖很多功能

object MainInputTYfrm: TMainInputTYfrm
  Left = 244
  Top = 191
  Width = 577
  Height = 425
  Caption = #36890#29992#36755#20837#23545#35805#26694
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object P_back: TPanel
    Left = 0
    Top = 0
    Width = 569
    Height = 398
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 3
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    object L_title: TLabel
      Left = 3
      Top = 3
      Width = 563
      Height = 15
      Align = alTop
      Alignment = taCenter
      AutoSize = False
      Caption = #36890#29992#25968#25454#24405#20837#23545#35805#26694
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object P_main: TPanel
      Left = 3
      Top = 18
      Width = 563
      Height = 377
      Align = alClient
      BevelOuter = bvNone
      BorderStyle = bsSingle
      TabOrder = 0
      object Panel_down: TPanel
        Left = 0
        Top = 339
        Width = 561
        Height = 36
        Align = alBottom
        BevelOuter = bvNone
        ParentColor = True
        TabOrder = 0
        object Bevel_bass: TBevel
          Left = 0
          Top = 0
          Width = 561
          Height = 2
          Align = alTop
        end
        object L_count: TLabel
          Left = 12
          Top = 12
          Width = 120
          Height = 13
          Caption = #21512#35745#37329#39069#65306'  '#65509'0.00'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Panel_button: TPanel
          Left = 401
          Top = 2
          Width = 160
          Height = 34
          Align = alRight
          BevelOuter = bvNone
          ParentColor = True
          TabOrder = 0
          object OKBtn: TButton
            Left = 0
            Top = 8
            Width = 75
            Height = 25
            Caption = #20445#23384
            TabOrder = 0
          end
          object CancelBtn: TButton
            Left = 80
            Top = 8
            Width = 75
            Height = 25
            Caption = #25918#24323
            TabOrder = 1
            OnClick = CancelBtnClick
          end
        end
      end
      object PageScroller_input: TPageScroller
        Left = 0
        Top = 0
        Width = 561
        Height = 34
        Align = alTop
        Control = Panel1
        TabOrder = 1
        object Panel1: TPanel
          Left = 0
          Top = 0
          Width = 1016
          Height = 34
          ParentColor = True
          TabOrder = 0
          object Label1: TLabel
            Left = 13
            Top = 11
            Width = 36
            Height = 13
            Caption = #21830#22330#65306
          end
          object Label3: TLabel
            Left = 362
            Top = 11
            Width = 36
            Height = 13
            Caption = #26085#26399#65306
          end
          object Label2: TLabel
            Left = 206
            Top = 11
            Width = 48
            Height = 13
            Caption = #19994#21153#21592#65306
          end
          object DTP_date: TDateTimePicker
            Left = 401
            Top = 6
            Width = 127
            Height = 20
            Date = 37319.873904270800000000
            Time = 37319.873904270800000000
            DateFormat = dfLong
            TabOrder = 0
          end
        end
      end
      object IMPSG_DATA: TStringGrid
        Left = 0
        Top = 34
        Width = 561
        Height = 305
        Align = alClient
        BorderStyle = bsNone
        Ctl3D = True
        DefaultRowHeight = 18
        RowCount = 100
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goTabs]
        ParentCtl3D = False
        TabOrder = 2
        OnDblClick = IMPSG_DATADblClick
        OnKeyPress = IMPSG_DATAKeyPress
        OnSelectCell = IMPSG_DATASelectCell
        OnSetEditText = IMPSG_DATASetEditText
        RowHeights = (
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18
          18)
      end
    end
  end
  object Query_data: TQuery
    Left = 355
    Top = 98
  end
end