unit12.dfm

用Delphi设计的一个超市管理系统

object Fr_MaoLiFenXi: TFr_MaoLiFenXi
  Left = 262
  Top = 108
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #27611#21033#20998#26512
  ClientHeight = 453
  ClientWidth = 688
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 453
    Align = alClient
    BevelInner = bvLowered
    BorderWidth = 1
    TabOrder = 0
    object Panel2: TPanel
      Left = 3
      Top = 3
      Width = 682
      Height = 447
      Align = alClient
      Color = 15723503
      TabOrder = 0
      object Label1: TLabel
        Left = 236
        Top = 29
        Width = 210
        Height = 29
        Caption = #27611#12288#21033#12288#20998#12288#26512
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -29
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
      end
      object Panel6: TPanel
        Left = 408
        Top = 331
        Width = 189
        Height = 72
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Color = 15723503
        TabOrder = 0
        object Button1: TButton
          Left = 16
          Top = 8
          Width = 75
          Height = 25
          Caption = #32479#12288#35745
          TabOrder = 0
          TabStop = False
          OnClick = Button1Click
        end
        object Button2: TButton
          Left = 99
          Top = 8
          Width = 75
          Height = 25
          Caption = #39044#12288#35272
          TabOrder = 1
          TabStop = False
        end
        object Button3: TButton
          Left = 99
          Top = 38
          Width = 75
          Height = 25
          Caption = #36820#12288#22238
          TabOrder = 2
          TabStop = False
          OnClick = Button3Click
        end
        object Button4: TButton
          Left = 16
          Top = 38
          Width = 75
          Height = 25
          Caption = #25171#12288#21360
          TabOrder = 3
          TabStop = False
          OnClick = Button4Click
        end
      end
      object Panel5: TPanel
        Left = 85
        Top = 72
        Width = 512
        Height = 212
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Color = 15723503
        TabOrder = 1
        object DBGrid1: TDBGrid
          Left = 2
          Top = 2
          Width = 508
          Height = 208
          Align = alClient
          BorderStyle = bsNone
          Color = 15723503
          Ctl3D = False
          DataSource = DataSource1
          FixedColor = 15723503
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          ParentCtl3D = False
          ParentFont = False
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnDblClick = DBGrid1DblClick
          Columns = <
            item
              Expanded = False
              FieldName = 'GoodsName'
              Title.Alignment = taCenter
              Title.Caption = #21830#21697#21517#31216
              Width = 127
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'PurchasePrice'
              Title.Alignment = taCenter
              Title.Caption = #36827#20215
              Width = 45
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'SellPrice'
              Title.Alignment = taCenter
              Title.Caption = #21806#20215
              Width = 45
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'SellScalar'
              Title.Alignment = taCenter
              Title.Caption = #25968#37327
              Width = 30
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Agio'
              Title.Alignment = taCenter
              Title.Caption = #25240#25187
              Width = 30
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'Gift'
              Title.Alignment = taCenter
              Title.Caption = #36192#21697
              Width = 30
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'UntreadFlag'
              Title.Alignment = taCenter
              Title.Caption = #36864#36135
              Width = 30
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Subtotal'
              Title.Alignment = taCenter
              Title.Caption = #23567#35745
              Width = 45
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'Unit'
              Title.Alignment = taCenter
              Title.Caption = #21333#20301
              Width = 30
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'SellDate'
              Title.Alignment = taCenter
              Title.Caption = #38144#21806#26085#26399
              Width = 58
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'UserName'
              Title.Alignment = taCenter
              Title.Caption = #25805#20316#21592
              Width = 50
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Sell_Main.InvoiceID'
              Title.Alignment = taCenter
              Title.Caption = #21333#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'AR'
              Title.Alignment = taCenter
              Title.Caption = #25972#21333#24212#20184
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'PU'
              Title.Alignment = taCenter
              Title.Caption = #25972#21333#23454#25910
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'BarCode'
              Title.Alignment = taCenter
              Title.Caption = #21830#21697#26465#30721
              Visible = True
            end>
        end
      end
      object Panel7: TPanel
        Left = 85
        Top = 331
        Width = 323
        Height = 72
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Color = 15723503
        TabOrder = 2
        object Label3: TLabel
          Left = 16
          Top = 16
          Width = 54
          Height = 12
          Caption = #21830#21697#20214#25968':'
        end
        object Label4: TLabel
          Left = 160
          Top = 16
          Width = 54
          Height = 12
          Caption = #36827#36135#25104#26412':'
        end
        object Label5: TLabel
          Left = 16
          Top = 40
          Width = 54
          Height = 12
          Caption = #23454#25910#37329#39069':'
        end
        object Label6: TLabel
          Left = 160
          Top = 40
          Width = 54
          Height = 12
          Caption = #27611#21033#37329#39069':'
        end
      end
      object Panel3: TPanel
        Left = 85
        Top = 284
        Width = 252
        Height = 47
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Color = 15723503
        TabOrder = 3
        object RadioButton1: TRadioButton
          Left = 21
          Top = 5
          Width = 97
          Height = 17
          Caption = #24403#22825#38144#21806#20998#26512
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RadioButton2: TRadioButton
          Left = 21
          Top = 24
          Width = 97
          Height = 17
          Caption = #24403#26376#38144#21806#20998#26512
          TabOrder = 1
        end
        object RadioButton3: TRadioButton
          Left = 133
          Top = 5
          Width = 97
          Height = 17
          Caption = #20840#37096#38144#21806#20998#26512
          TabOrder = 2
        end
        object RadioButton4: TRadioButton
          Left = 133
          Top = 24
          Width = 97
          Height = 17
          Caption = #25351#23450#26085#26399#21306#38388
          TabOrder = 3
        end
      end
      object Panel4: TPanel
        Left = 337
        Top = 284
        Width = 260
        Height = 47
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Color = 15723503
        TabOrder = 4
        object Label2: TLabel
          Left = 124
          Top = 25
          Width = 12
          Height = 12
          Caption = #33267
        end
        object Label7: TLabel
          Left = 12
          Top = 7
          Width = 78
          Height = 12
          Caption = #26085#26399#21306#38388#33539#22260':'
        end
        object RzDateTimeEdit1: TRzDateTimeEdit
          Left = 13
          Top = 21
          Width = 104
          Height = 20
          CalendarColors.Days = clWindowText
          CalendarColors.FillDays = clBtnShadow
          CalendarColors.DaysOfWeek = clWindowText
          CalendarColors.Lines = clBtnShadow
          CalendarColors.SelectedDateBack = clHighlight
          CalendarColors.SelectedDateFore = clHighlightText
          CalendarColors.TodaysDateFrame = clMaroon
          ClockFaceColors.Face = clBtnFace
          ClockFaceColors.Hands = clWindowText
          ClockFaceColors.Numbers = clWindowText
          ClockFaceColors.HourTicks = clBtnShadow
          ClockFaceColors.MinuteTicks = clWindowText
          EditType = etDate
          Format = 'yyyy-mm-dd'
          Alignment = taRightJustify
          DropButtonVisible = False
          FrameHotColor = 14593668
          FrameHotTrack = True
          FrameVisible = True
          ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
          TabOrder = 0
        end
        object RzDateTimeEdit2: TRzDateTimeEdit
          Left = 141
          Top = 21
          Width = 104
          Height = 20
          CalendarColors.Days = clWindowText
          CalendarColors.FillDays = clBtnShadow
          CalendarColors.DaysOfWeek = clWindowText
          CalendarColors.Lines = clBtnShadow
          CalendarColors.SelectedDateBack = clHighlight
          CalendarColors.SelectedDateFore = clHighlightText
          CalendarColors.TodaysDateFrame = clMaroon
          ClockFaceColors.Face = clBtnFace
          ClockFaceColors.Hands = clWindowText
          ClockFaceColors.Numbers = clWindowText
          ClockFaceColors.HourTicks = clBtnShadow
          ClockFaceColors.MinuteTicks = clWindowText
          EditType = etDate
          Format = 'yyyy-mm-dd'
          Alignment = taRightJustify
          DropButtonVisible = False
          FrameHotColor = 14593668
          FrameHotTrack = True
          FrameVisible = True
          ImeName = #20013#25991' ('#31616#20307') - '#20840#25340