Специализированный редактор параметров запроса
Рисунок 12.2. Специализированный редактор параметров запроса
Теперь для задания текущих ограничений по дате поступления можно использовать свойство Params:
procedure TForml.RunBtnClick(Sender; TObject);
begin
with Queryl do
begin
Close;
Params[0].AsDateTime := StrToDate(DatelEdit.Text);
Params[l].AsDateTime := StrToDate(Date2Edit.Text);
Open;
end;
end;
При щелчке на кнопке RunBtn при помощи параметров в запрос передаются текущие значения ограничений дат.
Значения параметров запроса можно задать и из другого набора данных. Для этого применяется свойство DataSource компонента набора данных. Указанный в свойстве компонент TDataSource должен быть связан с набором данных, значения полей которого требуется передать в параметры. Названия параметров должны соответствовать названиям полей этого набора данных, тогда свойство DataSource начнет работать. При перемещении по записям набора данных текущие значения одноименных параметров полей автоматически передаются в запрос.
Для иллюстрации работы этого свойства рассмотрим простой пример, главная форма которого представлена на Рисунок 12.3. Этот проект не имеет ни одной строки написанного вручную программного кода.