Доброе время суток, есть проблема в создании проекта на Delphi.

[Антон 656]

Доброе время суток, есть проблема в создании проекта на Delphi. Проект следующий: Электронный журнал успеваемости,

всю суть описывать не буду, расскажу о проблеме, имеется база данных Access с таблицам предметы, преподаватели,

ученики, группы. мне нужно чтобы в момент авторизации (при выборе из списка преподавателя, группы, предмета) в

StringGrid выводилась только та группа которая была выбрана. Как ученики попадают в группы, поясняю, у таблицы

группа такая структура: Id, FID, Фамилия, Имя, Отчество, комментарии. когда в справочнике регистрирую ученика, в

DBLookupComboBox выбираю ему группу и в поле FID записывается номер группы, (допустим в списке 110-П, 210-П, 310-

П, выбираем 210-П, в поле FID ученика вписывается цифра 2 т. е номер по порядку в списке) нужно чтобы в момент

авторизации выбрав из списка группу 210-П (к примеру) вывелись в stringGrid Те ученики в поле FID которых

присутствует тот самый номер 2. ..(BDGrid) не предлагайте пожалуйста.
В запросах я не силён, обязательно подучу и перейду на них, сейчас нет времени, нужно сделать до завтра, я понимаю

что делаю коряво, но пока нужно чтоб просто работало.
Вывожу студентов в StringGrid так:

procedure TForm1.Button1Click(Sender: TObject); //загрузка студентов из БД
var
i,j:integer;
b:boolean;
begin
i:=1;
ADOTable1.First;
while not ADOTable1.Eof do
begin
for j:=1 to ADOTable1.FieldCount-2 do
StringGrid1.Cells[j,i]:=ADOTable1.Fields[j+1].AsString;
i:=i+1;
ADOTable1.Next;
StringGrid1.Cells[0,0]:='№п.п.';
StringGrid1.Cells[1,0]:='Фамилия';
StringGrid1.Cells[2,0]:='Имя';
StringGrid1.Cells[3,0]:='Отчество';
StringGrid1.RowCount:=i;

Нужна помощь, как доработать код так чтобы выводилась определённая группа, а не все подряд

[Serge_Bliznykov]

если я правильно понял вопрос, то Вам нужно или
в ADOTable1 настроить свойство Filter и сделать Filtered := true;

либо воспользоваться TADOQeury (вмето TADOTable) и прописать запрос SQL, с условием отбора нужной группы по WHERE ...

(BDGrid) не предлагайте пожалуйста.

Даже не буду спрашивать почему! Просто выскажу своё мнение: ну и зря!!

[Streletz]

Зачем выводить данные из БД в StringGrid?!
Для вывода данных из БД есть компонент DBGrid. Подключаете его к ADOTable через компонент DataSource и весь код внутри процедуры будет не нужен. Всё делается визуально.

Нужна помощь, как доработать код так чтобы выводилась определённая группа, а не все подряд

Смотрите в сторону свойств Filter и Filtered компонента ADOTable.

[Антон 656]

Я как понимаю что если использовать DBGrid оценки придётся хранить в базе данных, что приведёт к её огромному увеличению через какое то время, я знаю что делаю коряво, но пока что лишь бы работало, а там переделаю

[eval]

а со стринггридом они будут храниться в астрале?