Форум: "Базы";
Поиск по всему сайту: 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.019 c
1-100002          Илья                  2002-01-15 09:48  2002.01.31  
RichEditControl


1-99929           usverg                2002-01-12 21:09  2002.01.31  
access violation error


4-100114          AlexandrH             2001-12-04 13:50  2002.01.31  
Как сделать так что-бы программа один раз запустилась,,,,


4-100122          Котелок               2001-12-05 09:40  2002.01.31  
Подскажите Plss...


4-100097          DeUnDe                2001-11-24 23:22  2002.01.31  
Как программно посмотреть повторяются ли строки в listbox’е или нет?