client.dfm

网吧商品销售平台

object ClientForm: TClientForm
  Left = 376
  Top = 199
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = ' '#32593#21543#21830#21697#38144#21806#24179#21488#23458#25143#31471' '#65288#25480#26435#32473#65306#39030#23574#39640#25163#32593#21543#22478#65289
  ClientHeight = 349
  ClientWidth = 496
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 8
    Top = 16
    Width = 105
    Height = 12
    AutoSize = False
    Caption = #25152#26377#21830#21697#20449#24687#65306
  end
  object Label2: TLabel
    Left = 56
    Top = 277
    Width = 385
    Height = 12
    AutoSize = False
    Caption = #21451#24773#25552#31034#65306#35831#19978#26426#30340#21516#26102#20445#31649#22909#33258#24049#30340#29289#21697#65292#20080#19996#35199#26102#35831#20934#22791#22909#29616#37329#65281
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 248
    Top = 16
    Width = 105
    Height = 12
    AutoSize = False
    Caption = #24744#30340#36141#29289#20449#24687#65306
  end
  object Label4: TLabel
    Left = 16
    Top = 300
    Width = 105
    Height = 12
    AutoSize = False
    Caption = #32473#26381#21153#31471#21457#36865#28040#24687#65306
  end
  object Shape1: TShape
    Left = 248
    Top = 200
    Width = 241
    Height = 33
    Brush.Color = 16769992
    Brush.Style = bsCross
    Pen.Style = psDashDot
    Shape = stRoundRect
  end
  object Label5: TLabel
    Left = 263
    Top = 208
    Width = 130
    Height = 21
    AutoSize = False
    Caption = #25152#26377#21830#21697#24212#20184#27454#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #40657#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label6: TLabel
    Left = 407
    Top = 208
    Width = 78
    Height = 21
    Alignment = taCenter
    AutoSize = False
    Caption = '0.00'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = #40657#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label7: TLabel
    Left = 392
    Top = 208
    Width = 17
    Height = 21
    AutoSize = False
    Caption = #65509
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = #40657#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object PageControl1: TPageControl
    Left = 8
    Top = 32
    Width = 201
    Height = 233
    ActivePage = Drinks
    TabOrder = 0
    TabPosition = tpBottom
    object Drinks: TTabSheet
      Caption = #39278#26009
      object DrinkListview: TListView
        Left = 0
        Top = 0
        Width = 193
        Height = 208
        Align = alClient
        Columns = <
          item
            Caption = #21830#21697#21517#31216
            Width = 110
          end
          item
            Caption = #21333#20215'('#20803')'
            Width = 70
          end>
        GridLines = True
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ShowWorkAreas = True
        TabOrder = 0
        ViewStyle = vsReport
        OnClick = DrinkListviewClick
      end
    end
    object Food: TTabSheet
      Caption = #39135#21697
      ImageIndex = 1
      object FoodListview: TListView
        Left = 0
        Top = 0
        Width = 193
        Height = 208
        Align = alClient
        Columns = <
          item
            Caption = #21830#21697#21517#31216
            Width = 110
          end
          item
            Caption = #21333#20215'('#20803')'
            Width = 70
          end>
        GridLines = True
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ShowWorkAreas = True
        TabOrder = 0
        ViewStyle = vsReport
        OnClick = FoodListviewClick
      end
    end
    object Ciga: TTabSheet
      Caption = #28895#31867
      ImageIndex = 2
      object CigaListview: TListView
        Left = 0
        Top = 0
        Width = 193
        Height = 208
        Align = alClient
        Columns = <
          item
            Caption = #21830#21697#21517#31216
            Width = 110
          end
          item
            Caption = #21333#20215'('#20803')'
            Width = 70
          end>
        GridLines = True
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        ShowWorkAreas = True
        TabOrder = 0
        ViewStyle = vsReport
        OnClick = CigaListviewClick
      end
    end
  end
  object Button1: TButton
    Left = 216
    Top = 96
    Width = 25
    Height = 25
    Caption = '>'
    Enabled = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 216
    Top = 128
    Width = 25
    Height = 25
    Caption = '<'
    Enabled = False
    TabOrder = 2
    OnClick = Button2Click
  end
  object SaleList: TListView
    Left = 248
    Top = 32
    Width = 241
    Height = 161
    Columns = <
      item
        Caption = #21830#21697#21517#31216
        Width = 105
      end