Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.12.2006, 13:47   #1
Руслан
 
Регистрация: 20.12.2006
Сообщений: 4
По умолчанию Help! Немогу написать код для посчета и вывода результатов.

Немогу написать код для посчета и вывода результатов.


Нужно выбрать из БД (стандартным драйвером), допустим RRR, с поля ( statys) выбирать строки с одинаковыми полями(цифрами) подсчитать количество и результат вывести на Форму.
Руслан вне форума Ответить с цитированием
Старый 22.12.2006, 06:34   #2
Руслан
 
Регистрация: 20.12.2006
Сообщений: 4
По умолчанию

подобный код такой
var i, N, M: Integer;
begin
N:=0
M :=DataModule2.Table1.RecordCount;
DataModule2.Table1.First;
for i := 1 to M do
begin
if DataModule2.Table1.FieldByName('SOC STATUS').Asboolean
then ins(N);
DataModule2.Table1.Next;
end;
Unit3.Form3.Label1.Caption:=IntToSt r(N);

end.


как переделать ?

Есть кто небудь кто помочь может ?
Руслан вне форума Ответить с цитированием
Старый 22.12.2006, 13:29   #3
Alar
Александр
Администратор
 
Аватар для Alar
 
Регистрация: 28.10.2006
Сообщений: 17,758
По умолчанию

А в чём собственно проблема?

ins(N); по-моему правильно inс(N);
http://www.programmersclub.ru/inc
Alar вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Немогу зарегиться на regmefast.org Altera Свободное общение 2 28.07.2008 13:33
Немогу решить задачу Санячос Общие вопросы Delphi 2 11.06.2008 15:35
Печать Qreport результатов Query - проблема nataly_ukr БД в Delphi 2 05.11.2007 10:12
Немогу установить GLSCENE !!!! UnD)eaD)Snake Gamedev - cоздание игр: Unity, OpenGL, DirectX 3 18.07.2007 14:06
Вывод результатов в другой Grid Barbara БД в Delphi 7 20.02.2007 15:14