log.dfm

汽配前台收费,一个具有详细功能的小系统

object frm_log: Tfrm_log
  Left = 283
  Top = 127
  BorderStyle = bsDialog
  Caption = #27773#37197#21069#21488
  ClientHeight = 126
  ClientWidth = 189
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object pe_1: TPanel
    Left = 4
    Top = 7
    Width = 180
    Height = 75
    BevelInner = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 59
      Height = 13
      Caption = #29992#25143#21517#31216':'
    end
    object Label2: TLabel
      Left = 8
      Top = 48
      Width = 59
      Height = 13
      Caption = #29992#25143#23494#30721':'
    end
    object txt_name: TEdit
      Left = 68
      Top = 13
      Width = 104
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      MaxLength = 10
      TabOrder = 0
      OnChange = txt_nameChange
      OnKeyPress = txt_nameKeyPress
    end
    object txt_password: TMaskEdit
      Left = 68
      Top = 44
      Width = 104
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      PasswordChar = '*'
      TabOrder = 1
      OnKeyPress = txt_passwordKeyPress
    end
  end
  object cmdOK: TBitBtn
    Left = 5
    Top = 93
    Width = 65
    Height = 25
    Caption = #30830#23450
    Enabled = False
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = cmdOKClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      5555557777777FF5555557990599905555555777757777F55555790555599055
      55557775555777FF5555555555599905555555555557777F5555555555559905
      555555555555777FF5555555555559905555555555555777FF55555555555579
      05555555555555777FF5555555555557905555555555555777FF555555555555
      5990555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
  object cmdCancel: TBitBtn
    Left = 119
    Top = 93
    Width = 65
    Height = 25
    Cancel = True
    Caption = #21462#28040
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = cmdCancelClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000C40E0000C40E00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      9955557777777FF5555557990599905995555777757777F55555790555599059
      55557775555777FF5555555555599995555555555557777F5555555555559905
      555555555555777FF5555555555599905555555555555777FF55555555595579
      05555555555555777FF5555555955557905555555555555777FF555555555555
      5990555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
  object jm: TComboBox
    Left = 8
    Top = 88
    Width = 145
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    ItemHeight = 13
    TabOrder = 3
    Visible = False
  end
  object db_qp3: TDatabase
    AliasName = 'qp'
    Connected = True
    DatabaseName = 'dn_qp3'
    LoginPrompt = False
    Params.Strings = (
      'DATABASE NAME='
      'USER NAME=dgm'
      'ODBC DSN=qp'
      'OPEN MODE=READ/WRITE'
      'SCHEMA CACHE SIZE=8'
      'SQLQRYMODE='
      'LANGDRIVER='
      'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
      'SCHEMA CACHE TIME=-1'
      'MAX ROWS=-1'
      'BATCH COUNT=200'
      'ENABLE SCHEMA CACHE=FALSE'
      'SCHEMA CACHE DIR='
      'ENABLE BCD=FALSE'
      'ROWSET SIZE=20'
      'BLOBS TO CACHE=64'
      'PASSWORD=dgm')
    SessionName = 'se_qp3_5'
    Left = 64
    Top = 48
  end
  object qe_log: TQuery
    Active = True
    DatabaseName = 'dn_qp3'
    SessionName = 'se_qp3_5'
    SQL.Strings = (
      'SELECT * FROM LOG WHERE USER_NAME = :iuser_name')
    Left = 112
    Top = 24
    ParamData = <
      item
        DataType = ftString
        Name = 'iuser_name'
        ParamType = ptUnknown
      end>
  end
  object se_qp3: TSession
    Active = True
    AutoSessionName = True
    Left = 24
    Top = 40
  end
  object qe_pj: TQuery
    Active = True
    DatabaseName = 'dn_qp3'
    SessionName = 'se_qp3_5'
    SQL.Strings = (
      'select * from pj_title')
    Left = 120
    Top = 64
  end
  object a: TQuery
    Active = True
    DatabaseName = 'dn_qp3'
    SessionName = 'se_qp3_5'
    RequestLive = True
    SQL.Strings = (
      'select * from sysfulltext')
    Left = 80
    Top = 88
  end
end