Программирование на Delphi 7


         

Специализированный редактор параметров запроса



Рисунок 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. Этот проект не имеет ни одной строки написанного вручную программного кода.



Содержание раздела