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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 11.10.2011, 00:37   #1
ShnapS
Пользователь
 
Регистрация: 15.05.2008
Сообщений: 44
По умолчанию Подсчет количества записей

Здравствуйте!
Есть таблица с учениками которые учатся на разных курсах:
0А, 0Б, 0В, 1А, 1Б, 1В, 2А, 2Б, 2В, 3А, 3Б, 3В, 4А, 4Б, 4В.
Нужно реализовать подсчет количества учеников которые учатся на каждом из курсов и результаты вывести например Label или Memo. База данных SQLite.
Пожалуйста помогите, а то у меня нечего не получается.
Вложения
Тип файла: rar Source.rar (886.6 Кб, 13 просмотров)
ShnapS вне форума Ответить с цитированием
Старый 11.10.2011, 02:54   #2
rdama
Форумчанин
 
Аватар для rdama
 
Регистрация: 25.07.2009
Сообщений: 533
По умолчанию

Вот так. И все получится.
SELECT u.[Course],Count(u.[Id]) FROM [_uchenik_] u
GROUP BY u.[Course]
Маразм крепчал. Еноты пели...
R-style Dataknowlege Access Member Account (RDAMA)
rdama вне форума Ответить с цитированием
Старый 11.10.2011, 16:31   #3
ShnapS
Пользователь
 
Регистрация: 15.05.2008
Сообщений: 44
По умолчанию

Спасибо, rdama
Сделал так:

Код:
var
  n : array[1..15] of string=('0А','0Б','0В','1А','1Б','1В','2А','2Б','2В','3А','3Б','3В','4А','4Б','4В');
...
...

procedure TForm_DB.Button1Click(Sender: TObject);
var
  i : integer;
begin
  with _dm_unt do
  begin
    Memo1.Lines.Clear;
    Memo1.Lines.Text:='Кількість учнів на курсі:';
    for i:=1 to Length(n) do
      begin
        ZQuery1.Close;
        ZQuery1.SQL.Clear;
        ZQuery1.SQL.Add('SELECT Count(Course) FROM [_uchenik_] WHERE Course='+QuotedStr(n[i]));
        ZQuery1.Open;
        Memo1.Lines.Add(n[i]+' = '+ZQuery1.Fields[0].AsString);
      end;
  end;
end;
ShnapS вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подсчет количества символов. JoberLord Общие вопросы C/C++ 3 22.09.2011 20:11
Подсчет количества массивов WennY Общие вопросы Delphi 3 29.04.2011 23:33
Подсчет количества слов Driver_09 Помощь студентам 2 24.10.2010 17:14
Подсчет количества часов Fezdipekla Microsoft Office Excel 3 22.06.2010 13:54
Подсчет количества и частоты Ensoph Помощь студентам 6 08.05.2008 10:16