Count. Firebird

[artemavd]

Добрый вечер! . Столкнулся с проблемкой. Нужна ваша помощь. Нужно посчитать количество записей и вывести результат в ячейку StringGrid-a. Вот мой код:

procedure TForm11.sButton1Click(Sender: TObject);
begin
  Form11.DBGridEh1.DataSource.DataSet.Last;

  Form11.pFIBQuery1.SQL.Clear;
  Form11.pFIBQuery1.SQL.Text:='SELECT COUNT(ID) FROM SPISOK';
  Form11.pFIBQuery1.ExecQuery;

  Form11.SG12.Cells[1,0]:=Form11.pFIBQuery1.FieldByName('ID').AsString;

end;

пишет ошибку, что не может найти поле ID. И сразу второй вопрос по этой же теме: как посчитать количество одинаковых полей?

[soleil@mmc]

1)

 Form11.pFIBQuery1.SQL.Clear;
  Form11.pFIBQuery1.SQL.Text:='SELECT COUNT(ID) cnt FROM SPISOK';
  Form11.pFIBQuery1.ExecQuery;

  Form11.SG12.Cells[1,0]:=Form11.pFIBQuery1.FieldByName('cnt').AsString;

2) что означает "кол-во одинаковых полей"?

[Evgeniy26]

Подсчет одинаковых записей:

SELECT ID, COUNT(ID) FROM SPISOK GROUP BY ID

Ну или сколько записей разных, т.е уникальных:

SELECT COUNT(*) FROM (SELECT ID, COUNT(ID) FROM SPISOK GROUP BY ID) T1

[artemavd]

Спасибо вам всем . soleil@mmc, а можешь пояснить что значит cnt? Ну так, для эрудиции.

[soleil@mmc]

cnt - это псевдоним поля
можешь обозвать как хочешь
лишь бы было понятно о чем речь

[mihali4]

пишет ошибку, что не может найти поле ID.

Делается просто:
Form11.SG12.Cells[1,0]:=Form11.pFIBQuery1.Fields[0].AsString;

[artemavd]

Странно, попробовал первый код из поста номер 3 и в результате запрос возвращает 1. Правильно ли этот результат?)

[Evgeniy26]

SELECT ID, COUNT(ID) FROM SPISOK GROUP BY ID

Выводит список записей по ID и количество данных записей в группе.

Если тебе нужно знать сколько записей в таблице, авляются повторяющимися, можно попробывать так:

SELECT SUM(cnt_count) FROM (SELECT ID, COUNT(ID) cnt_count FROM SPISOK GROUP BY ID
HAVING COUNT(ID) > 1)

Можно заменить COUNT(ID) на COUNT(ID) - 1.

Опиши, что тебе нужно подробнее.

[artemavd]

Мне нужно, чтобы в результат запроса возвращалось количество одинаковых фамилий в БД. Например, есть люди Иванов Александр и Иванов Петр, то запрос выводил бы 2, т.к. фамилия встречается два раза. Вот.

[Stilet]

artemavd

Ну вот тебе же уже сказали - группировать надо:

SELECT фамилия, COUNT(фамилия) as кол_во_фамилия FROM SPISOK GROUP BY фамилия

тогда:

with StringGrid do begin
 RowCount:=pFIBQuery1.RecordCount+1;
 for i:=1 to pFIBQuery1.RecordCount-1 do begin
// Это количество повторов
  cells[0,i]:=pFIBQuery1.FieldByName('кол-во_фамилия').AsString;
// Это сама фамилия
  cells[1,i]:=pFIBQuery1.FieldByName('фамилия').AsString;
 end;
end;

Смысл ясень?