Как осуществить поиск заданного значения в столбце таблицы?

[Dux]

Есть ли у кого готовый алгоритм поиска? К примеру мне необходимо посчитать всех Ивановых в таблице. (BDE, Paradox)

[Serge_Bliznykov]

или я не понял вопрос, или Вы что-то не договариваете...
А чем SQL не устраивает?

Select count(*) as Cnt from YourTable 
where Fio = 'Иванов'

[Dux]

Сообщение от Serge_Bliznykov

или я не понял вопрос, или Вы что-то не договариваете...
А чем SQL не устраивает?

Select count(*) as Cnt from YourTable 
where Fio = 'Иванов'

В том то и дело, что в данном случае SQL меня не устраивает.
Необходим алгоритм для построчного перебора данных в конкретном столбце и подсчет определенных наименований

[_SERGEYX_]

var Cnt: integer;

Cnt:=0;
YourTable.First;
while not YourTable.Eof do
begin
if YourTable.FieldByName('Fio').AsString = 'Иванов' then inc(Cnt);
YourTable.Next;
end;
ShowMessage('Всего Ивановых - '+inttostr(Cnt));

А можно установить фильтр на 'Иванов' и получить RecordCount.
Но это все дешевые трюки. Лучший способ - это sql-запрос, как Serge_Bliznykov написал.

[Serge_Bliznykov]

_SERGEYX_, спасибо, тёзка.

Ответ просто отличный. И исчерпывающе полный и с правильным комментарием!
ГППКС

Сообщение от Dux

В том то и дело, что в данном случае SQL меня не устраивает.

Даже представить себе не могу ситуацию, когда SQL имеется, но "не устраивает"... Если это не секретная информация (почему SQL не устраивает) - поделитесь, в каком случае может быть такой нонсенс?...

[evg_m]

К примеру мне необходимо посчитать всех Ивановых в таблице. (BDE, Paradox)

select fio, count(fio) from tabl where fio='Иванов' or fio='Иванова' group by fio

[Dux]

_SERGEYX_ Вот это как раз то, что надо. Спасибо, теперь все заработало!

Serge_Bliznykov Дело в том, что применение подсчета с помощью SQL потянет за собой определенные изменения, которые надо будет вносить, пример от _SERGEYX_ как раз подходит в моей ситуации. Еще раз спасибо вам за помощь!