Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];




Вниз

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 в помощи смотри, правда там далеко не все



Delirium   (2001-12-26 16:09) [6]

www.sql.ru



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

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




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.059 c
1-100008          Gilbert               2002-01-14 08:44  2002.01.31  
Компонент Label который показывает системное время


1-99958           Romul                 2002-01-12 14:28  2002.01.31  
Как удерживать бегунок у ScrollBar внизу?


1-100013          IronHawk              2002-01-14 12:16  2002.01.31  
Кто поможет, ПЛИЗ. Родное Previev от QuickRep ....


1-99968           DeNNiss               2002-01-14 13:40  2002.01.31  
Уважаемые Мастера!


6-100028          Landgraph             2001-11-08 10:34  2002.01.31  
Перехват запросов...