Задача 21. Отобразить в новой форме Название предмета и Оценка

Отобразить в новой форме Название предмета и Оценка. Название предмета выбирается щелчком мыши по DBGrid.

Необходимо на новую форму поместить новый компонент DataSet, DataSource, DBGrid, для другого sql запроса.

procedure TForm2.FormActivate(Sender: TObject);

begin

Edit1.Text:=Form1.ADODataSet1..FieldValues['subj_name'];

ADODataSet1.Active:=false;

ADODataSet1.CommandText:='select subjects.subj_name, examen.res '+

'from subjects, examen where '+

'subjects.subj_code=examen.subj_code and '+

'subjects.subj_name='+''''+Edit1.Text+'''';

ADODataSet1.Active:=true;

end;

Задача 22.Отобразить в новой форме Фамилию, Имя, Отчество, Текущий курс, Группа, Подгруппу. Фамилия студента выбирается щелчком мыши по DBGrid.

Задача 23.

Отобразить в новой форме Фамилию, Имя, Отчество, Аккаунт и Пароль. Фамилия студента выбирается щелчком мыши по DBGrid.

Задача 24.

Отобразить в новой форме Фамилию, Имя, Номер_Зачетки и Дату_Рождения. Фамилия студента выбирается щелчком мыши по DBGrid.