数据集

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOConnection1.Open;
  ADOCommand1.Connection := ADOConnection1;
  ADOCommand1.CommandText := 'SELECT sum(用量) FROM applicationx';
  ADODataSet1.Recordset := ADOCommand1.Execute();  Edit1.Text := ADODataSet1？？？？？？;
end;怎么把ADODataSet1里的SUM（用量）赋给 Edit1.Text ???谢谢您的指教！

Answer 1

我手里没有Delphi,一年前接触过BCB，你试试
Edit1.Text:=ADODataSet1("Sum(字段名)")