delphi数据库的增删改查.docxVIP

查询： Var strSQL:String; begin strSQL:=Select Checkupid,CustomCode,CustomName,CheckupDate,LeftMoney,CurrMoney,OperatorName,Note from T_Fee_CheckupRecord Where ; strSQL:=strSQL+ CheckupDate between ++FormatDateTime(yyyy-mm-dd, DateTPbegin.DateTime)++ and ++FormatDateTime(yyyy-mm-dd, DateTPend.DateTim