摘要：CREATE PROCEDURE GetDataByRow( @SqlStr varchar(8000), --起始语句 @FirstRec int, --首条记录 @LastRec int --最后记录)AS--一个字符型的随机数 结果放入临时表中,表名随机生成SELECT @dt = substring( Convert( varchar,rand()), 3, 10 )-- STUFF(原字符串 , 开始替换的位置 , 被替换的字符数 , 用于替换的字符串 )select @SqlStr = stuff(@SqlStr,charindex('FR... 阅读全文

摘要：create procedure GetDataByPage( @sqlStr varchar(8000), @pageSize int --页面大小 @currentPage int --当前页面)as declare @firstRec int declare @lastRec int declare @dt varchar(20) declare @tempTableName varchar(16) --计算页面算法 select @firstRec = ( @currentPage - 1) * @pageSize select... 阅读全文

摘要：今天维护一个老项目是用delphi5 + BDE写的。为了更方便查询数据，就增加一个查询功能.由于数据量查询出来后就比较少，于是就想到Filter like但 BDE并不支持 Filter = 'name like' BDE的模糊查询只有' name = A*' 匹配只能从第一个字母开始，无法达到要求.后来在OnFilterRecord中解决由于TQuery.Filtered := False;TQuery.Filtered := True;会触发OnFilterRecord事件于是写一个事件处理过程procedure OnFilterRecord(DataSe 阅读全文