gmxx.~dfm

商品管理系统是面向超市类的商品数据库管理系统。其主要功能包括用户购买商品

object Form12: TForm12
  Left = 369
  Top = 211
  Width = 372
  Height = 156
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = '购买信息'
  Color = clBtnFace
  Constraints.MaxHeight = 156
  Constraints.MaxWidth = 372
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 364
    Height = 129
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 40
      Top = 16
      Width = 169
      Height = 16
      Caption = '您所购买的商品金额总计为：'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 40
      Top = 56
      Width = 117
      Height = 16
      Caption = '您所交付的金额为：'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 40
      Top = 96
      Width = 78
      Height = 16
      Caption = '应该退给您：'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 216
      Top = 16
      Width = 6
      Height = 13
      Caption = '0'
    end
    object Edit1: TEdit
      Left = 160
      Top = 48
      Width = 121
      Height = 21
      TabOrder = 0
      Text = 'Edit1'
      OnChange = Edit1Change
    end
    object Edit2: TEdit
      Left = 160
      Top = 88
      Width = 121
      Height = 21
      ReadOnly = True
      TabOrder = 1
      Text = 'Edit2'
    end
    object Button1: TButton
      Left = 304
      Top = 88
      Width = 51
      Height = 25
      Caption = '返回'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = Button1Click
    end
  end
end