Question

delphi在DBmemo中逐条地显示数据？

我设计了一个delphi程序如下图所示，用的是TADOquery和Tdatasource、DBmemo三个控件连接数据库和显示数据，已经连接好了。

数据库表里的数据如下图所示

我想要实现的功能是：
在编辑框输入“计算机工程系”后，按“查询”按钮在DBMEMO中会显示“李世民”，按“下一条”就会出现下一个符合是“计算机工程系”的学生的名字。
求大神帮我写一下“查询”“下一个”“上一个”的按钮点击事件。控件的名称如下：
dbmmo1: TDBMemo; qry1: TADOQuery; ds1: TDataSource; edt1: TEdit; lbl1: TLabel; btn1: TButton; btn2: TButton; btn3: TButton;





Answer 1

对应上dataset的字段即可
下一个
qry1.next;
上一个
qry1.Prior;