Могу предложить один вариант.
С помощью запроса получить таблицу (фамилия, вид пропуска, кол-во пропусков). А потом уже этот запрос обрабатывать и приводить к тому виду что тебе надо через цикл.
Код:
With adoQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT familia,vid_propuska,COUNT(vid_propuska) from propuski, stud');
SQL.Add('WHERE stud.code_s=propuski.code_s');
SQL.Add('group by familia,vid_propuska');
Open;
end;