29.3. Цветовое выделение строк бд
Во многих случаях хочется выделить часть строк в DBGrid другим цветом. Давайте будем выделять зеленым хранящиеся в нашей БД фильмы, выпущенные в текущем году. Цветовое выделение – дело не очень простое. Придется самостоятельно выводить весь текст в DBGrid, устанавливая желаемый цвет фона. Для этого напишем обработчик события OnDrawColumnCell компонента DBGrid:
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
WITH DBGrid1.Canvas DO
BEGIN
// ячейка выделена?
IF gdSelected IN State THEN
BEGIN
Font.Color:=clHighlightText; Brush.Color:=clHighlight
END
ELSE
BEGIN
Font.Color:=clBlack;
// текущий год совпадает?
IF dm.dvd.FieldByName('YEARF').AsInteger=CurrentYear THEN
Brush.Color:=clLime // ярко-зеленый цвет
else
Brush.Color:=DBGrid1.Color;
END;
WITH Rect.TopLeft DO
TextRect(Rect, X+2, Y+2, Column.Field.AsString);
END
END;
Весь фокус состоит в задании цвета текста (Pen.Color) и фона (Brush.Color). Собственно отрисовка выполняется методом TextRect объекта Canvas компонента DBGrid. Параметр Rect содержит экранные координаты отрисовываемой ячейки. Текст для отрисовки в текущей ячейке берется при помощи выражения Column.Field.AsString, где Column – передаваемая в обработчик ссылка на текущую колонку компонента DBGrid. Выражения X+2, Y+2 смещают текст на два пиксела относительно линий таблицы, чтобы он с ними не сливался.
Попробуйте самостоятельно выполнить цветовое выделение не строки, а колонки, например, поля "Год". Вам поможет свойство Column.Index.
Аналогично можно менять не только цвет, но и шрифт в ячейках. Добавьте следующий фрагмент перед строчкой WITH Rect.TopLeft DO:
WITH Font DO
IF Column.Index<2 THEN
BEGIN
Style:=[fsItalic];
Name:='Arial'
END
ELSE
BEGIN
Style:=[];
Name:='Times New Roman'
END;
и посмотрите, что будет.
30.Работа с распределенными бд
Распределенные БД должны обеспечивать многопользовательский доступ – к одним и тем же данным одновременно обращаются много программ. Для недопущения конфликтов такой доступ обеспечивается при помощи запросов и так называемой архитектуры "клиент – сервер".
Рис. 30.121 Архитектура "клиент – сервер".
Сервер – это программа, располагающаяся на мощном компьютере и выполняющая большинство операций по обработке данных. Клиенты посылают серверу команды, написанные на специальном языке. Сервер, соблюдая очередность обслуживания клиентов, выполняет получаемые команды. Чаще всего такой командой является получение выборки из базы данных ("найти все записи, в которых в поле "дата" стоит 23 июля 2005 года"). Полученная выборка пересылается обратно клиенту.
Большое преимущество архитектуры "клиент – сервер" – возможность работы с огромными массивами информации на относительно малопроизводительных компьютерах, так как почти все операции выполняются "на стороне сервера". Кроме того, обеспечивается параллельная работа многих пользователей с одной и той же БД (представьте себе базу данных для заказа билетов на самолеты, к которой одновременно и постоянно обращаются кассиры из многих городов). Наконец, запрос на SQL не зависит от физического представления БД и ее формата (запросы для БД формата Paradox и dBase выглядят одинаково).
Для управления серверами наибольшее распространение получил язык SQL, с которым мы сейчас ознакомимся. BDE – один из примеров SQL-сервера, выполняющего запросы на SQL. Помимо BDE, можно использовать и другие серверы, в частности, Interbase.