lssfcx.dfm

来自「房屋出租信息管理系统,房屋出租信息的录入、查询、删除以及用户管理等功能」· DFM 代码 · 共 33 行

inherited LsSfCxForm: TLsSfCxForm
  Left = 231
  Top = 162
  Caption = #20919#27700#25910#36153#26597#35810
  OldCreateOrder = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    inherited BitBtn_find: TBitBtn
      OnClick = BitBtn_findClick
    end
    inherited BBtn_Ok: TBitBtn
      OnClick = BBtn_OkClick
    end
    inherited BBtn_Print: TBitBtn
      OnClick = BBtn_PrintClick
    end
  end
  inherited ADQ_SfCx: TADOQuery
    SQL.Strings = (
      
        'SELECT A.ID,A.fangno, A.manid, B.manname,A.Jkrq, A.Sybd, A.Bybd,' +
        ' A.Sys, A.lsdj, A.Yfj,'
      
        '       A.sfj,case A.status when '#39'1'#39' then '#39#24050#20132#27454#39' else '#39#26410#20132#27454#39' end as' +
        ' status'
      'FROM dbo.Zf_Lenshui A INNER JOIN'
      '      dbo.Zf_Man B ON A.manid = B.manid'
      '')
  end
end