Trouble Поиск

← →
Dorixe © (2001-12-26 13:31) [0]

with tablel do
begin
first;
while not EOf do
begin
f_f:=datamodule1.table.FieldByName("ID").asstring;
while not EOf do
begin
if table1.FieldByNam("ID").asstring=f_f then error:=error+1;
next;
end;
next;
Задача: хочу найти количество записей с одинаковыми полями
сам знаю что код неверный, надо чтоьы сверялось со второй позиции (3,4,5, и т д) чем поможете

← →
Delirium © (2001-12-26 13:40) [1]

Почему бы не использывать TQuery с запросом ?
select ID, Count(*) as Err from My_Table group by ID

← →
Val © (2001-12-26 13:45) [2]

select count(id),id from abonent group by id order by id

← →
Val © (2001-12-26 13:47) [3]

извиняюсь за повтор-не обновил страницу

← →
Dorixe © (2001-12-26 15:56) [4]

Если честно я не знаком с query
есть где нибудь набор стандартных команд для query

← →
gek (2001-12-26 16:07) [5]

Ну если у тебя delphi то стоит databasedesctop в помощи смотри, правда там далеко не все

www.sql.ru

← →
_Kirill_ (2001-12-27 15:09) [7]

http://kraft.ms.km.ua/developing/

Trouble Поиск Найти похожие ветки