datagrid下一页代码
page:=page+1;
PageCount:=SysUtils.StrToInt(Edit_PageCount.Text);
PageBegin:=SysUtils.IntToStr((page-1)*PageCount);
//填充datagrid
DataSource_xbdm.DataSet.Cancel;
DataSource_xbdm.DataSet.Append;
datasetbzsjj1.Active:=false;
datasetbzsjj1.Database.URL:='Biz:RLZYGLXTRLZYGLXTSJK.Database';
DataSetBZSJJ1.SQL.Text := 'select Top '+SysUtils.IntToStr(PageCount)+' * From xbdm where ID not in (select Top '+PageBegin+' ID From xbdm order by zdxdm) order by zdxdm ';
datasetbzsjj1.Active:=true;
hqzx(SysUtils.IntToStr(page));
原因找到了,是因为你传进去的点击[下一页]或者[上一页]这些按钮时,传进去的SQL语句'select Top '+SysUtils.IntToStr(PageCount)+' * From xbdm where ID not in (select Top '+PageBegin+' ID From xbdm order by zdxdm) order by zdxdm ';
平台解析不了,所以直接发到数据库上去执行,这样在平台的数据字典层定义的属性,例如查找属性,表现类型,显示名称等等都应用不上来,所以就看到2楼截取的界面了,