ADODataSet组建问题，高手指点

Question

ADODataSet已经连接成功，如何将某表某字段值提出到一个变量里或是edit1.text里面

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADODataSet1.ConnectionString := 'Provider=SQLOLEDB.1;Integrated Security=SSPI;'
   + 'Persist Security Info=False;Initial Catalog=pubs;Data Source=CHARLES';
  ADODataSet1.CommandText := 'select * from jobs';
  ADODataSet1.Open;
  ADODataSet1.First;
  edit1.text := ADODataSet1.FieldByName('job_id').asstring;
end;

Answer 2

edit1.text:=ADODataSet1.FieldByName('字段名').asstring;