大家帮帮忙看看delphi中的这个是啥意思啊

Question

procedure Tkcxg.ADOQuery1AfterScroll(DataSet: TDataSet);
begin
edit1.Text:=ADOquery1.FieldValues['courseID'];
edit2.Text:=ADOquery1.FieldValues['courseName'];
edit3.Text:=ADOquery1.FieldValues['courseType'];
edit4.Text:=ADOquery1.FieldValues['teacher'];

这是干嘛用的啊？大家帮帮我解释下吧

Answer 1

procedure Tkcxg.ADOQuery1AfterScroll(DataSet: TDataSet);
//是一个过程
begin
edit1.Text:=ADOquery1.FieldValues['courseID'];
//控件EDIT1的TEXT属性的值等于ADOQUERY1（控件）中COUSERID的值
//adoquery1是一个查询的控件，里面设置好链接数据库方式，查询语句，完了之后，就是ACTIVE=TRUE，相当与开始查询，返回一个记录集，FIELDVALUES，就是在这个记录集里面通过某种方式进行检索出所需要的字段值，回答完毕！！！给分！！！