Цитата:
|
Сообщение от th_bav
Я бы написал SQL-запрос и засунул его в Query, или у Вас вся сложность в самом запросе??? Тогда необходимо структуру базы посмотреть
|
Ну наверное в SQL-запросе, У меня проблема в выводе названий предметов в заголовках столбцов, это наверное не просто sql-запросом делается.
Есть таблицы:stud(id,stud_fam,id_gr,GodPostup)
group(id_gr,name)
ucheb_plan(id_semestr,id_spec,id_discip)
discip(id_discip,name)
vedomost(id-spec,id_gr,id_stud,id_discip,id_semestr)
Код для заполнения таблицы, я пока только смогла сделать заполнение фамилий сортируя по группе и году поступления
Код:
procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT ss.Stud_fam FROM stud ss, groups g');
Query1.SQL.Add('WHERE ss.Id_gr=g.Id_gr and g.Name='+TreeView1.Selected.Text+'and');
Query1.SQL.Add('ss.GodPostup='+QuotedStr(ComboBox1.Text));
Query1.Open;
dbgrid1.Columns.Items[0].Width:=100;
dbgrid1.Columns[0].Title.Caption:='ФИО';
end;