Функции элементов правой части главного окна программы.

Правая часть главной формы содержит элемент отображения данных DBGrid, позволяющий выдавать данные определенной таблицы. Для этой цели используется связь:

При активации главной формы выполняется запрос, рассмотренный выше, данные из которого выводятся именно в DBGrid. Помимо прочего, элемент отображения данных DBGrid позволяет выбрать для отображения только те столбцы, которые нам действительно нужны, и скрыть ненужные. Для этой цели предусмотрено свойство Columns. Для его вызова нужно два раза щелкнуть на DBGrid. В модуле «Электронная медицинская карта» не отображаются столбцы epikriz и idPacient. Однако, они остаются существовать в базе данных и с ними можно работать.

При работе программы предусмотрена возможность просмотра дополнительной информации о пациенте посредством двойного нажатия на соответствующую ячейку в элементе DBGrid. Для этого используется свойство OnDBLClck этого элемента. Исполняющийся код приведен ниже:

procedure TKart.DBGrid1DblClick(Sender: TObject);

begin

bi2:=DBGrid1.DataSource.DataSet.Fields.Fields[0].Value;

idi:=DBGrid1.DataSource.DataSet.Fields.Fields[12].Value;

PacientInfo.Show;

end;

Код означает следующее: при двойном щелчке в переменную bi2 записывается содержимое (value) ячейки в 0-ом столбце выбранной строки. Значение переменной bi2 в дальнейшем будет использоваться в качестве данных для выполнения запросов. Далее делаем тоже самое с переменной idi, с тем различием, что присваиваем ей значение 12 столбца, соответствующего idPacient. После присваивания открываем (Show) форму PacientInfo. Форма представлена ниже: