pfm_userpass.dfm

POS收银系统

object fm_userpass: Tfm_userpass
  Left = 153
  Top = 189
  Width = 529
  Height = 311
  Caption = #31995#32479#29992#25143#24080#21495#31649#29702
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 521
    Height = 284
    Align = alClient
    Caption = #21152#20837#25110#20462#25913#29992#25143
    TabOrder = 0
    object Label1: TLabel
      Left = 48
      Top = 32
      Width = 39
      Height = 13
      Caption = #29992#25143#21517
    end
    object Label2: TLabel
      Left = 52
      Top = 72
      Width = 26
      Height = 13
      Caption = #23494#30721
    end
    object Label3: TLabel
      Left = 52
      Top = 104
      Width = 26
      Height = 13
      Caption = #22995#21517
      FocusControl = DBEdit3
    end
    object BitBtn1: TBitBtn
      Left = 32
      Top = 140
      Width = 61
      Height = 25
      Caption = #21152#20837
      TabOrder = 0
      OnClick = BitBtn1Click
    end
    object DBGrid1: TDBGrid
      Left = 288
      Top = 15
      Width = 231
      Height = 267
      Align = alRight
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'username'
          Title.Caption = #29992#25143#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pname'
          Title.Caption = #22995#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'userpass'
          Title.Caption = #23494#30721
          Visible = True
        end>
    end
    object DBEdit1: TDBEdit
      Left = 120
      Top = 28
      Width = 97
      Height = 21
      DataField = 'username'
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBEdit2: TDBEdit
      Left = 120
      Top = 64
      Width = 97
      Height = 21
      DataField = 'userpass'
      DataSource = DataSource1
      TabOrder = 3
    end
    object BitBtn2: TBitBtn
      Left = 116
      Top = 140
      Width = 57
      Height = 25
      Caption = #20445#23384
      TabOrder = 4
      OnClick = BitBtn2Click
    end
    object BitBtn3: TBitBtn
      Left = 192
      Top = 140
      Width = 57
      Height = 25
      Caption = #21024#38500
      TabOrder = 5
      OnClick = BitBtn3Click
    end
    object DBEdit3: TDBEdit
      Left = 120
      Top = 96
      Width = 97
      Height = 21
      DataField = 'pname'
      DataSource = DataSource1
      TabOrder = 6
    end
  end
  object Query1: TQuery
    Active = True
    BeforePost = Query1BeforePost
    DatabaseName = 'posdb'
    RequestLive = True
    SQL.Strings = (
      'select username,pname,userpass from t_user')
    Left = 12
    Top = 60
    object Query1username: TStringField
      FieldName = 'username'
      Origin = 'POSDB."dbo.t_user".username'
      FixedChar = True
      Size = 8
    end
    object Query1pname: TStringField
      FieldName = 'pname'
      Origin = 'POSDB."dbo.t_user".pname'
      FixedChar = True
      Size = 10
    end
    object Query1userpass: TStringField
      FieldName = 'userpass'
      Origin = 'POSDB."dbo.t_user".userpass'
      FixedChar = True
      Size = 8
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 56
    Top = 60
  end
end