+ -
当前位置:首页 → 问答吧 → 如何实现在dbgridth中,从第一行起,显示间隔N行的数据

如何实现在dbgridth中,从第一行起,显示间隔N行的数据

时间:2011-12-02

来源:互联网

我用combobox作为选择条件,里面的items分别为1、2、3、5、10,要达到以下目的,如何实现?请给上源码?

我选择下拉列表框中的items值,如选择了节点值为3,那么要把数据库中第1、4、7、10、13....(每次间隔3行)的数据显示出来,如选择节点值5,要把数据库中1、6、11、16、21....(每次间隔5行)的数据依次显示出来,依次类推,如何实现?

作者: ytpsp   发布时间: 2011-12-02

组件
  ComboBox
  ADOQuery
  Memo

var
  SelVal:Integer;
  i:Integer;
Begin
  SelVal:=StrToInt(ComboBox.Text);
  
  ADOQuery.Close;
  AdOquery.SQL.Clear;
  ADOquery.SQL.Add('Select * from TestTable');
  ADOQuery.Open;
  
  i:=1;
  while Not ADOQuery.EOF do
  begin
  ADOQuery.RecNo:=i;
  Memo.Lines.Add('Rec='+Inttostr(i)+' '+ADOQuery.FieldbyName('TestColumn').Asstring);
  i:=i+SelVal;
  end;
end;

作者: wooden954   发布时间: 2011-12-04

热门下载

更多