如何把数据库中查询的值赋给变量

怎么把数据库中查询的值赋给变量
如，我想把"select seqserialfs.nextval from dumal“查询出来的值赋给一个变量
AnsiString  serial ，应该怎么写？
[解决办法]
sSql="select seqserialfs.nextval as cnt from dual";
AdoQuery->SQL->Add(sSql);
Open();
AnsiString sTemp=IntToStr(AdoQuery->FieldByName("cnt").AsInteger);