pfm_userpass.dfm

主要是介绍DELPHI三层应用以及分布式数据库的应用

object fm_userpass: Tfm_userpass
  Left = 265
  Top = 237
  BorderStyle = bsSingle
  Caption = #31995#32479#29992#25143#24080#21495#31649#29702
  ClientHeight = 211
  ClientWidth = 592
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDefault
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 592
    Height = 211
    Align = alClient
    Caption = #21152#20837#25110#20462#25913#29992#25143
    TabOrder = 0
    object Label1: TLabel
      Left = 76
      Top = 32
      Width = 26
      Height = 13
      Caption = #24080#21495
    end
    object Label3: TLabel
      Left = 76
      Top = 68
      Width = 26
      Height = 13
      Caption = #22995#21517
      FocusControl = DBEdit3
    end
    object Label2: TLabel
      Left = 56
      Top = 104
      Width = 245
      Height = 13
      Caption = #26032#29992#25143#23494#30721#37117#20026'"123456",'#30331#38470#21518#33258#24049#20462#25913
    end
    object BitBtn1: TBitBtn
      Left = 32
      Top = 140
      Width = 57
      Height = 25
      Caption = #26032#22686
      TabOrder = 2
      OnClick = BitBtn1Click
    end
    object BitBtn3: TBitBtn
      Left = 88
      Top = 140
      Width = 57
      Height = 25
      Caption = #21024#38500
      TabOrder = 4
      OnClick = BitBtn3Click
    end
    object BitBtn2: TBitBtn
      Left = 144
      Top = 140
      Width = 57
      Height = 25
      Caption = #20445#23384
      TabOrder = 3
      OnClick = BitBtn2Click
    end
    object Button2: TButton
      Left = 200
      Top = 140
      Width = 57
      Height = 25
      Caption = #21462#28040
      Enabled = False
      TabOrder = 7
      OnClick = Button2Click
    end
    object DBGrid1: TDBGrid
      Left = 347
      Top = 15
      Width = 243
      Height = 194
      Align = alRight
      Color = clInfoBk
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 5
      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
          Width = 92
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pname'
          Title.Caption = #22995#21517
          Width = 126
          Visible = True
        end>
    end
    object DBEdit1: TDBEdit
      Left = 144
      Top = 28
      Width = 97
      Height = 21
      Color = clInfoBk
      DataField = 'username'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 0
    end
    object DBEdit3: TDBEdit
      Left = 144
      Top = 60
      Width = 97
      Height = 21
      Color = clInfoBk
      DataField = 'pname'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 1
    end
    object Button1: TButton
      Left = 256
      Top = 140
      Width = 65
      Height = 25
      Caption = #36820#22238
      TabOrder = 6
      OnClick = Button1Click
    end
  end
  object Query1: TQuery
    Active = True
    BeforePost = Query1BeforePost
    DatabaseName = 'zxjx'
    RequestLive = True
    SQL.Strings = (
      'select username,pname,userpass from t_user'
      '')
    Left = 4
    Top = 28
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 2
    Top = 74
  end
end