unit1.dfm

来自「本软件专门用于管理餐饮行业的点菜单、加菜单酒水单等重要票据的领用及回收情况」· DFM 代码 · 共 49 行

object mydata: Tmydata
  OldCreateOrder = False
  Left = 202
  Top = 178
  Height = 165
  Width = 304
  object dba1: TDatabase
    Connected = True
    DatabaseName = 'pj'
    DriverName = 'STANDARD'
    LoginPrompt = False
    Params.Strings = (
      'PATH=e:\pjmanager\data\'
      'DEFAULT DRIVER=PARADOX'
      'ENABLE BCD=FALSE')
    SessionName = 'Default'
    BeforeConnect = dba1BeforeConnect
    Left = 24
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 128
    Top = 16
  end
  object Query1: TQuery
    DatabaseName = 'pj'
    RequestLive = True
    SQL.Strings = (
      'select * from usertable')
    Left = 184
    Top = 16
    object Query1Userid: TStringField
      FieldName = 'Userid'
      Origin = 'PJ."usertable.DB".Userid'
      Size = 4
    end
    object Query1Username: TStringField
      FieldName = 'Username'
      Origin = 'PJ."usertable.DB".Username'
      Size = 30
    end
    object Query1Useerpsd: TStringField
      FieldName = 'Useerpsd'
      Origin = 'PJ."usertable.DB".Useerpsd'
      Size = 10
    end
  end
end