Добрй день!
А можно ли по нажатию одной кнопки Найти выполнить поиск сначала по организации, а потом по организации за определенный период.
Вот мой код:
Код:
procedure TForm15.SpeedButton1Click(Sender: TObject);
var
StartDate: TdateTime;
FinishDate: TdateTime;
begin
DataModule4.FindQuery.Active:=false;
DataModule4.FindQuery.SQL.Clear;
DataModule4.FindQuery.SQL.Add('SELECT *');
DataModule4.FindQuery.SQL.Add('FROM ТаблицаГИБДД);
DataModule4.FindQuery.SQL.Add('WHERE Кто LIKE ''%'+Edit1.Text+'%''' );
DataModule4.FindQuery.SQL.Add('and [Дата поступления в ИФНС] between :StartDate and :FinishDate');
StartDate:=StrToDate(Edit2.Text);
FinishDate:=StrToDate(Edit3.Text);
DataModule4.FindQuery.Parameters.ParamByName('StartDate').Value := StartDate;
DataModule4.FindQuery.Parameters.ParamByName('FinishDate').Value := FinishDate;
DataModule4.FindQuery.Active:=true;
Form12.ShowModal;
end;