Номер строки ADOQuery

//отобразить номер текущей строки
ShowMessage(IntToStr(DM.ADOQuery1.RecNo));

//выбрать случайную строку
DM.ADOQuery1.RecNo:=Random(dm.ADOQuery1.RecordCount)+1;