Работа с распределенными БД

END

WITH Rect.TopLeft DO

END;

Else

BEGIN

ELSE

END

BEGIN

IF gdSelected IN State THEN

BEGIN

WITH DBGrid1.Canvas DO

Цветовое выделение строк БД

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

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;

DataCol: Integer; Column: TColumn; State: TGridDrawState);

begin

// ячейка выделена?

Font.Color:=clHighlightText; Brush.Color:=clHighlight

Font.Color:=clBlack;

// текущий год совпадает?

IF dm.dvd.FieldByName('YEARF').AsInteger=CurrentYear THEN

Brush.Color:=clLime // ярко-зеленый цвет

Brush.Color:=DBGrid1.Color;

TextRect(Rect, X+2, Y+2, Column.Field.AsString);

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.1 Архитектура "клиент – сервер".

Сервер – это программа, располагающаяся на мощном компьютере и выполняющая большинство операций по обработке данных. Клиенты посылают серверу команды, написанные на специальном языке. Сервер, соблюдая очередность обслуживания клиентов, выполняет получаемые команды. Чаще всего такой командой является получение выборки из базы данных ("найти все записи, в которых в поле "дата" стоит 23 июля 2005 года"). Полученная выборка пересылается обратно клиенту.

Большое преимущество архитектуры "клиент – сервер"– возможность работы с огромными массивами информации на относительно малопроизводительных компьютерах, так как почти все операции выполняются "на стороне сервера". Кроме того, обеспечивается параллельная работа многих пользователей с одной и той же БД (представьте себе базу данных для заказа билетов на самолеты, к которой одновременно и постоянно обращаются кассиры из многих городов). Наконец, запрос на SQLне зависит от физического представления БД и ее формата (запросы для БД формата Paradox и dBase выглядят одинаково).

Для управления серверами наибольшее распространение получил язык SQL, с которым мы сейчас ознакомимся. BDE – один из примеров SQL-сервера, выполняющего запросы на SQL. Помимо BDE, можно использовать и другие серверы, в частности, Interbase.