ВУЗ:
Составители:
Рубрика:
57
begin
B:=RecNo; //Запомнили номер записи
DisableControls;
First;
try
Result:=FieldValues[f];
except
ShowMessage('Ошибка при задании поля в Remember_rec');
exit;
end;
While not Eof do
begin
Next;
if (Result<FieldValues[f]) then Result:=FieldValues[f];
end;
EnableControls;
RecNo:=B; //Переместили курсор в начальное положение
end;
except
ShowMessage('Ошибка при выполнении функции Remember_rec');
end;
end;
При реализации функции Remember_rec использованы вложенные бло-
ки
try...except, что позволяет локализовать ошибки. Внутренний блок реа-
гирует на ошибки при задании имени поля.
2.10. Создание диаграмм
Для построения диаграмм в приложениях, использующих базы данных,
предназначен компонент DBСhart, который позволяет строить диаграммы раз-
личных типов, в том числе и объёмные. Важнейшим свойством DBСhart явля-
ется
Series[Index:Longint]:TChartSeries, представляющее собой мас-
сив диаграмм, выводимых в области компонента. Каждая серия содержит по-
следовательность значений, по которым выполняется построение графика (диа-
граммы). Один компонент DBChart позволяет построить несколько графиков в
одних координатах.
Для отображения серии данных используются классы
TAreaSeries,
TBarSeries, TLineSeries, TFastLineSeries, THorizBarSeries, TPie-
Series
, TPointSeries и др., соответствующие разным типам диаграмм.
begin B:=RecNo; //Запомнили номер записи DisableControls; First; try Result:=FieldValues[f]; except ShowMessage('Ошибка при задании поля в Remember_rec'); exit; end; While not Eof do begin Next; if (Result
Страницы
- « первая
- ‹ предыдущая
- …
- 55
- 56
- 57
- 58
- 59
- …
- следующая ›
- последняя »