[Ildar-tsr]

Что собой представляет таблица Students?
Можно так кстати, без лишних переменных:

Код:

Begin
  DataModule_0.ADO_Query_Student.Close;
  DataModule_0.ADO_Query_Student.SQL.Text:= 'select count(*) as cnt from students';
  DataModule_0.ADO_Query_Student.Open;
  Label1.Caption:= DataModule_0.ADO_Query_Student.FieldByName('cnt').AsString;
End;